邢唷 > 4 7
! " # $ % & ' ( ) * + , - . / 0 1 2 3 G 6 8 F 9 : ; < = > ? @ A B C D E H S d I J K L M N O P Q R T X U V W e r Z [ \ ] ^ _ ` a b c f g h s j k l m n o p q u t v x w y z { | R o o t E n t r y F 08t5 繰 W o r k b o o k E T E x t D a t a _ V B A _ P R O J E C T _ C U R " 饹t 脨t
羳 \ p
A d m i n i s t r a t o r B a = T h i s W o r k b o o k = )m.8 X@ " 1 媅SO1 媅SO1 媅SO1 媅SO1 媅SO1
媅SO1 I{縹1 I{縹1 I{縹1
I{縹1 h 6 I{縹 L i g h t 1 I{縹1 , 6 I{縹1 6 I{縹1 6 I{縹1 > I{縹1 ? I{縹1 4 I{縹1 I{縹1 4 I{縹1 I{縹1 I{縹1 < I{縹1 I{縹1 I{縹1 A r i a l + " " # , # # 0 ; " " \ - # , # # 0 5 " " # , # # 0 ; [ R e d ] " " \ - # , # # 0 7 " " # , # # 0 . 0 0 ; " " \ - # , # # 0 . 0 0 A " " # , # # 0 . 0 0 ; [ R e d ] " " \ - # , # # 0 . 0 0 i * 2 _ " " * # , # # 0 _ ; _ " " * \ - # , # # 0 _ ; _ " " * " - " _ ; _ @ _ W ) ) _ * # , # # 0 _ ; _ * \ - # , # # 0 _ ; _ * " - " _ ; _ @ _ y , : _ " " * # , # # 0 . 0 0 _ ; _ " " * \ - # , # # 0 . 0 0 _ ; _ " " * " - " ? ? _ ; _ @ _ g + 1 _ * # , # # 0 . 0 0 _ ; _ * \ - # , # # 0 . 0 0 _ ; _ * " - " ? ? _ ; _ @ _ / \ $ # , # # 0 _ ) ; \ ( \ $ # , # # 0 \ ) 9 \ $ # , # # 0 _ ) ; [ R e d ] \ ( \ $ # , # # 0 \ ) ; \ $ # , # # 0 . 0 0 _ ) ; \ ( \ $ # , # # 0 . 0 0 \ ) E \ $ # , # # 0 . 0 0 _ ) ; [ R e d ] \ ( \ $ # , # # 0 . 0 0 \ ) c / _ - * # , # # 0 . 0 0 _ - ; \ - * # , # # 0 . 0 0 _ - ; _ - * " - " ? ? _ - ; _ - @ _ - u 8 _ - " " * # , # # 0 . 0 0 _ - ; \ - " " * # , # # 0 . 0 0 _ - ; _ - " " * " - " ? ? _ - ; _ - @ _ - S ' _ - * # , # # 0 _ - ; \ - * # , # # 0 _ - ; _ - * " - " _ - ; _ - @ _ - e 0 _ - " " * # , # # 0 _ - ; \ - " " * # , # # 0 _ - ; _ - " " * " - " _ - ; _ - @ _ - @ @ @ @
P P / 攆f 7 ` a > * - + > , 1 5 / / / 7 3 + + 1 , , 9 * + 9 1 1 1 $@ @ 1 1 1 | | I 湾駀}- }
}- }
8^膲 鑜蕬
鑜蕬
f婮T噀,g f婮T噀,g h槝 h槝 銐蕬'`噀,g 5 銐蕬'`噀,g
h槝 1 h槝 1
h槝 2 h槝 2
h槝 3 h槝 3
h槝 4 h槝 4 搹eQ 搹eQ 搹鶴 搹鶴 ! 梴 梴 " 纇錱USCQ 4 0 % - :_寚eW[湗r 6 2 3 4 0 % - :_寚eW[湗r 6 ! ? 6 0 % - :_寚eW[湗r 6 2 4 6 0 % - :_寚eW[湗r 6
@ 8^膲 2
A 8^膲 3 c c PK
嘚釦 theme/PK
嘚釦 theme/theme/PK 嘚釦ky} theme/theme/themeManager.xml
蘉
@醹愘7c(Eb菜 CA菭覠圩邈7芜諞K
Y,
奺.埛饇,ㄚH ,l崆骈x纱逫萻Q}#諓叚递 值+!,較$j=婫W栌)釫+&
8PK 嘚釦Nl& + theme/theme/theme1.xml鞾Ko7X旖慸[徃崫憭"Gj椱e腯
$eG 9
H媆
紧P
贑K]$H !w"%*~绹4堨儢糖7潢收 1劌-縭╈{8
XH舀暹>轨{B4D敟稿习鸠n%c渀霺眳Z~,錮玊 #q塎p
鱂'H%廕!GG7ˉ峳筤JI}/E 附9 {盔沲Oz%垠]
丷)訞@y_E罇∑嗐夿垯hS "隍!\葞鴣=妱-楷?~i鸍 m錐T5靭鷵坼醲C卿寻Z澛P箠6乎n金(`踘c捅(疠it6+摒抗聐Е,e+鴁
Y答斸k+ns穋 __7;漥抿疉1%閤]7垠Nx砎56r 瑔bu#柺uk-A@)$蹁l侴(跑F 9聆IKmad芟2"z"郿"[徢码/ =?~糅胥乔弤1絒v{(峀7?~w~蛽o残藊a鈅奴|泏x Z>{觞偎浸閴名GC>
|漭f LPg擎儑黮培坩+c xc啫 穻掊#.嗟閩媖?鍿I 懐菈<`岊2頛纔巳餪欶钹|j鈔#t鑺軫︰囝tJ\.1秇蔻(()枮呵;fw+$郘皯纛ogJdh- I.3A(禃泝晦.．Yw稹崉Q〥壦 %訪>挶媎* a始n垍p佘0_ｈ譇C躤?牫腇rI.燐1賏鉽寬 'ilb?cX⑷慌 ~漓'D]C P憾躻 妒}4)-埡3鍘Z^锰Z魁 !琔暂韯'*x徕帝咙bT垌厥抽'围foIプ狺囑蹵郁喦a7}愭异亏壹頨緓A^h0瘸f鹠禁N謓綠勔緶Q/酤[@ {0豉嚤I _論 ,\膽恶8摕鱟4伣{臰N"懟巹7a螌z亻[衢49`av娆T赠2佷b糪+漆 3t奖8G5跦焪旐YH羖嶚燡>]C $籼.凟恿獠r?/
燰T禙 l╖~
&`&Dq敃z^]]虌篸Z+ 7皑tSq];=5籰⒁ c官$tft1
q:砧ih湹滞EI-z*y. 嵥ocq轟冚6性T
歾G-烤Y%營 临 &X;Bmi嵿=X y隼烥Y&\q杙-:$Db頠挻|5 4⒐U6@轞rM悤w .2 峱 筒#*淤%(|位邳黗e搔P額 yC:宸,盳＂/x*Y6C$ ![テ斔RPl 袸岒巄妝識^醒WE尗|螑P#%y# F欼岛i52k活蒄*s唄.zΕ*猭篣虋0oK<_7X蚐 硪祓檛/Kns畊K麆@聥9侯)侫m挞耙靯灶 濦4M翽茼R迠 冪挈`芳jah4遅闘脒0踢仞>圙掬N橜h婿PK
嘚釦 _rels/PK 嘚釦ブх 6 _rels/.rels厪蟡0 囷吔冄}Q颐%v/C/ (h"脎O
劋秣=畫旂 毆免C?薶醰=偵叅%[xp啠{鄣_糚眩<10堎O糝瓸d焉襃E4b$q_ 槥6L吁R7`畯ㄉ趁0虨O,錏n7擫i鋌〃/鉙綈╡ 械根铸PK
嘚釦 theme/theme/_rels/PK 嘚釦
褠煰 ' theme/theme/_rels/themeManager.xml.rels厪M
0匃倃oo雍&輬协勪5
6?$Q祉
,.嘺緳i粭澤c21h:闀q毩m胳嶡RN壻;d癭値o7g慘(M&$R(.1榬'J摐袏T鶂8V"＆A然蠬鱱}狇|$絙{ 朠除8塯/ ]As賲(⑵锑#洩L蔥汉倪PK 嘚釦 $银 [Content_Types].xml瓚薔0E鱄鼉-J湶@%閭菐洽|廊$韶钵UL襎B l,巽圭x\銧v擉T閁^h卍}悒)徽*1P'揯讞彐0)棣T闉9搇#ぼ$┐>幚矋 `?燙s]7苲b$蝬市u鶂-lV弡9>欴 扸髑锣,皹 5(貰去s緭z視hhs0U~,}2氳ToF0,從*=雽琽[g瘪v; 9蜾'3悓3y ; 橓o隣PK 嘚釦 $银 T [Content_Types].xmlPK
嘚釦 ) _rels/PK 嘚釦ブх 6 M _rels/.relsPK
嘚釦 theme/PK
嘚釦 $ theme/theme/PK
嘚釦 0 theme/theme/_rels/PK 嘚釦
褠煰 ' ` theme/theme/_rels/themeManager.xml.relsPK 嘚釦Nl& + theme/theme/theme1.xmlPK 嘚釦ky} N theme/theme/themeManager.xmlPK ? }
X T a b l e S t y l e M e d i u m 2 P i v o t S t y l e L i g h t 1 6 ` 0 纇錱裿鵞aRh垍 7 輳膲婲yRh垰 V V 5 7; - 魦f
T饄kX橯cknx剉
T饄邁 N>yO酧(u鉔x孴鑜孮鱏臺{榢X橯 Ny, 臺(W鑜孮鱏MR燫
NUS_鱏( 駛噀搹eQ誰秗`) 0W@W臢U\:y
N O鰁颯
N橯T鹼5u輯臢U\:y
N O鰁颯
N橯
纇錱篘kX橯cknx剉纇錱篘Yta翂kX橯cknx剉Yta翂 騗 gpenc剉^椑h錱觺済酧o`R
N颯頞9e
纇錱觺済鲖kX橯cknx剉纇錱觺済
纇錱鰁魰鲖kX橯cknx剉纇錱鰁魰 yO酧(u鉔x 鑜孮鱏 0W@W T鹼5u輯 裿/ 纇錱USMO 纇錱篘 輳膲婲y 纇錱觺済 纇錱鰁魰 Yta翂 `l轢)Y`l}lf .U
g gP杔Q鳶 9 1 3 4 1 7 0 2 M A 2 P 0 D G E 5 7 3 4 1 7 0 0 0 0 0 0 8 8 2 5 5 `l轢^s^)YVn螛of:S擭猲飴2 3 9 鱏 1 8 9 0 5 6 4 2 1 5 6
`l轢^篘汻D崘n孴>yO軴湒@\ S*t, UIN 砇≧T T蔛踒(u錧t臽礠剉纇錱 裇皊顣槝騗#嶄N9eck 2 0 2 5 - 6 - 2 5 #嶄NvQ7 *N錧\O錯匭te9e 鯺塠RZ褃b gP杔Q鳶`l轢RlQ鳶 9 1 3 4 1 7 0 2 M A 8 N 8 E 0 4 7 0 3 4 1 7 0 0 0 0 0 1 8 9 4 5 7 塠絖w`l轢^5峘l:S賨MR:S`l轢]NNSq\[OYe噀S蜽1 b^4 2 6 1 8 6 1 0 8 1 0 0 0 3 *g裇皊 _U\,g!k絙錱塵蔛剉蟸%;m≧ lQ鳶鄀砇≧(u錧 b龕N)Y褃b gP杔Q鳶`l轢RlQ鳶 9 1 3 4 1 7 0 2 M A D B U E A 7 3 5 3 4 1 7 0 0 0 0 0 2 6 7 3 7 1 # 塠絖w`l轢^5峘l:S昣lWS飴N體蜽'YS悿N蒘鉙$N3 鱏0WWWFUO'Y2 7 0 3 1 5 1 5 8 7 7 6 0 9 3 2 0 2 5 - 7 - 2 3 塠絖8愶崏[褃b齆 gP杔Q鳶`l轢RlQ鳶 9 1 3 4 1 7 0 0 M A 2 T 1 8 0 E 9 7 3 4 1 7 9 2 0 0 0 0 4 5 4 9 6 塠絖w`l轢^5峘l:S昣l-N飴T^:W1 3 |i1 3 0 0 7 1 8 9 5 5 6 3 2 3 6 8 錧D/e豊蔛錧Dh芉錧D/e豊孴gbL gNO錧Dh芉臽礠剉纇錱 膲鄗6R膲鄗6R6R歔臽礠剉纇錱 u悎[錧\O鰁魰孴Oo`OGP膲歔臽礠纇錱 >yO軴id;S梪軴i0 u瞼軴iY 誰媉誰膲gbL埮`礠纇錱
- )
羳 % G6
d 褚MbP?_ * + % & ?' ?( ?) ? " d XX ? ? & c 荱 } ` } } } } } } }
q @ @
E
F
F
F
F
F
F
F
F
F
F
F
C
C
C
C
C
C
C
G
H
H
H
C
C
C
C
C
C
C H
H
G
H
C
C
C
C !
C "
C
C
G
H
H #
G
C $
C %
C &
C '
C (
C
C H
H
G
G x > @ < d
^*g裇皊顣槝 裇皊顣槝騗#嶄N9eck
NMT纇錱臽倐%N蛻 惽弡v皨剉OO@b蟸%:W@b 鄀誰T鹼 vQ諲 *g c膲歔lQ:y擽S_lQ:y剉酧o` *g裇皊 _U\,g!k絙錱塵蔛剉蟸%;m≧ 裇皊顣槝卂T韣Yt T ? D ! D " D # D $ D % D & D ' D ( D ) D * D + D , D - D . D / D 0 D 1 D 2 D 3 D 4 D 5 D 6 D 7 D 8 D 9 D : D ; D < D = D > D ? D D l
@ A B C D E F G H I J K L M N O P Q R S T U V W X Y Z [ \ ] ^ _ @ D A D B D C D D D E D F D G D H D I D J D K D L D M D N D O D P D Q D R D S D T D U D V D W D X D Y D Z D [ D \ D ] D ^ D _ D D l
` a b c d e f g h i j k l m n o p q r s t u v w x y z { | } ~ ` D a D b D c D d D e D f D g D h D i D j D k D l D m D n D o D p D q D r D s D t D u D v D w D x D y D z D { D | D } D ~ D D D l
D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D l
D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D l
D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D l
D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D D l
D D D D D D D D D D
D D D
D D D D D D D D D D D D D D D D D D D D l
! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ? D ! D " D # D $ D % D & D ' D ( D ) D * D + D , D - D . D / D 0 D 1 D 2 D 3 D 4 D 5 D 6 D 7 D 8 D 9 D : D ; D < D = D > D ? D D l
@ A B C D E F G H I J @ D A D B D C D D D E D F D G D H D I D J D J
> @ < d g g D S h e e t 3
! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ? @ A B C D E F G H I J K L M N O P Q R S T U V W X Z [ \ ] ^ _ ` a b c d e f g h i j k l m n o p q r s t u v w x y z | } ~ N wI 罙 . 罙 .
#磤 0* pH d
VBAProje坈t 4 @j
=
r Xc J<
rstdole> s t d o l e
h %^ *\G{00020430- C
004 6}#2.0#0 #C:\Wind ows\Syst em32\e2. tlb#OLE Automati on ` 僂OffDic凟O f i c侲瀫攢丒 2DF8D04C -5BFA-101B-BDE5E訟AC42圗 gram Fil es\CommonMicros oft SV B A 饹t 脨t d i r ' !jWW1 3 S h e e t 1 Y y har ed\OFFIC E15\MSO.0DLL#僊 1@5.0 Ob伭 Library K MSForms> S F m s 3 D452EE1-E08F`A-8 -02608C@4D0BB4SsaSFM20L'B ＠_&/ ; "1 僯IqAHq00}t#0Bq# 504 吚 A5807D纄-AE8 B-4138-9 00E-CB39 2474D7E76Users\t opnet\Ap pData\Lo cal\Temp0\VBEb7.e
" L L <0 <8 < p % ` (`T . ` x 8k `刋 `刏 `刓 F `
x % i8 @攂L `刓 獉T 8 @ 蕗V @ X 僐 x 0 ` @ @H @ @ @ ` @@ @ @ @h @P @ H 0 @@ X @8 X H ( ( Xc $ * \ R f f f f * 0 7 6 6 a 0 d 4 1 0 $ * \ R f f f f * 0 6 6 6 a 0 d 4 1 0 * \ R 1 * # 1 3 6 * \ R 1 * # 1 2 1 * \ R 0 * # f 3 " " H P X ` H h X F X ( 8 P & v h :
" 8 " @ h ( ] ] X ] Dim 违规事项明细() As String ?] ] ' \ ' X 违规事项列表 (% ^ A \ 7 6 ! @' Z Z$ ` G | j Z a X ' X \ ' \ A \ 7 6 ! @' Z MsgBox 违规事项条数 X T \ X A \ 7 6 ! @ \+ T 4 UserForm1.ListBox1.AddItem .Range("A" & i + 1).Value \ q o ] | Dim 选择违规事项 Dim Str_Tmp ] Str_Tmp = "6 违规6|9 违规9" 8 b$ d ' V ! For i = 0 To UBound(选择违规事项) MsgBox 选择违规事项(i) Next i o ' Attribut e VB_Nam e = "模 1"
Pub lic 违规 事项明细() As S 袆ng选择HD
Sub
p 〉()
D刬m.条数N Integer
' n 临蔪贝娲 i
Pi 2
p = 0
Wit h ThisWo rkbook.Sheets("嗔斜" X8 = .Range ("A" & i ).Value
If Trim*()仼"6en Exit 剙o Until唵?唄 緟"刌
+ 1
乵i C!擰Loop'繫sgBox
cA Re塝a1 To )I]
For A# 'B>i罜'A1哘
AA'User m@1.List@+1 .AddItem蘞
Next i
End ?AzC俔$ 3截 取(Str_T mpG5纝Cons t 分隔符p|纃搂K粋C/K 礒纔6 6|:99ISphlit#, @#'臱0羈UBoun|d(侺Du(i臘蔅 . 燧 # x ME ( SL S S <6 N 0 { 0 0 0 2 0 8 2 0 - 0 0 0 0 - 0 0 0 0 - C 0 0 0 - 0 0 0 0 0 0 0 0 0 0 4 6 } 2 X )4x % `8 `: `< % Xc " ( B 8 @
0 @ H P ` p ] ] >! @' 8 A1 B% 6 ' : ( 违规事项所在列的下标在sheet2页的A1单元格 ? :' < 4! D < 8 违规事项 9 动态获取违规事项所在列 8A F UserForm1.Repaint HB@J MsgBox Err.Number k L! N LB@P | k o A Attribut e VB_Nam e = "She@et1"
鐱ast0{00020820- C $0046}
|Global!腟pac扚alse dCreatabl Pre decla Id 玊ru
BExpose Temp lateDeriv$払ustomlizD2P Sub Works亽_Selec tionChan ge(ByVal Target As R
)
On Error Resu 砃e xt
Dim Str_Tmp ing col'$ !
, NumIntegepr
= A DveCel @ P K g {g U g q g q gX agPq h ` hg g( / g q@ gv q agPq h `g8+ T 8 hg @ g g { D > 8 h H i a S Z rU@ @ @ ( 8 ` @ a ` P b rU@ @ @ 8 P ! Q ` D rU@ @ @ x b 8 e 旃 # _ _ S R P _ 7 j U s e r F o r m 1 Y ^ T h i s W o r k b o o k _ V B A _ P R O J E C T i L ] x ME ( SP S S S 0 { 7 1 1 C B 7 B F - 2 8 7 0 - 4 C 7 9 - 8 5 2 C - C 2 9 6 2 7 3 B 8 7 F 5 } { 8 F 8 3 3 6 6 7 - 4 F E 4 - 4 8 B 5 - 9 7 E 9 - C B 8 A E B E 5 8 1 1 3 } f . . `刓 `刪 `凾 x zh `刓 | ~0 `刓 v `刓
`刓 `剟 ` X ( % 侢 ` % 0 h 0 ( ` Xc e " ( 0 @ X p
0 > @
" 8 ` p x " "
"
( " 0 8 @ X p x "
" 0 P ` h
p
p ] X ] p ] ' T H! j! l' h \ h \ j% n T ? \ j% p ' T d ` T | \ j% p ' Tk 8 MsgBox ListBox1.List(i) k \ MsgBox 违规事项明细 T >( @ L! N $ 所选行没有对应企业，禁止录入违规信息 t 错误提示A@r HA@r | h L! N e LB@P k @ ListBox1.Clear
Call 选取清除 HA@r UserForm1.Hide For i = 0 To 条目数 - 1 ListBox1.Selected(i) = False Next i A v Call 已选择项目标注 o ` A v o H ] P \ H! j! l \ j, n \ o h HA@r o ] \ T \$ T H! jB@ A o x 0 ] \ H! j! l \ j, n \ o ] ] \ V H! j! l j% p \$ V j, n y k \ o h ` 鞒 Attribut e VB_Nam e = "Use rForm1"
"
Bas0{ 711CB7BF -2870-4C 79-852C- C296273B 87F5}{8F 833667-4 FE4-48B5 -97E9-CB 8AEBE58113}
dGlob刟l婼paco False 奀r@eatabl Predecla DId 訲ru
BE`xpose0T emplateDerivCus tomiz婦
P ! Sub Command Button1_Click() On Error Resu繬ext Dim i As Inte ger
条目数 违 媸孪蠲飨JS雗g#
駙 &= 苵.ListBox1Cou n #
@剙#= 0 To
- 1#If Se lected(i)_ Then %
(>E倠
& "|" &/ nd If'Mlsg@KXEH
乿 iCE "CAct淐ell.Va|lu伕
繺缼.@Number@Z1004孭("所 选行没有 对应企业 ，禁止录入 信息", vbInf ation, " 错误提示F!*Unload嘒FC!Exit#0 <>罣
A餋lea繹!$h&'='Call 选取清齼''[Hid鸴 '^Zg Z咥 'i:#已选 择项目标渥
AC`儯t}枀2噮l h63'強
陖s2弣
"_ 帷4K /9 _Initializea/ '. 1翗UB沝(﹌@瞾` p"AddIte黰 I唩 5?鵭"
@&Y_4a1b礯4爠腤e4( 1 Q_UjgVjQ_+%S0W j@ regh
Q繣F(鶃 (j裦y e[+sH rM
'!q 鵣j3S
# % & ' ( * + , - / 1 2 3 4 6 7 8 9 : < = > @ A B C E F G H I J p яE[Q#M攧E*蚿蓋 F 8A*@殧3i#U" x 8A*@殧3i#U"яE[Q#M攧E*蚿蓋 ME ( P SL S S 6"
<0 <8 < N 0 { 0 0 0 2 0 8 1 9 - 0 0 0 0 - 0 0 0 0 - C 0 0 0 - 0 0 0 0 0 0 0 0 0 0 4 6 } , ` k p X x % 凗 % 偁( % . 8 X X x xp Xc $ * \ R f f f f * 0 6 6 6 a 0 d 4 1 0 $ * \ R f f f f * 0 7 6 6 a 0 d 4 1 0 ` " ( ( 0 P
Dim i As Integer癆A . ! For i = 1 To UBound(违规事项明细) * UserForm1.ListBox1.AddItem 违规事项明细(i) Next o h ` O Attribut e VB_Nam e = "Thi sWorkbook"
孊as0{00020P819- 0C $0046}
|GlobalSpac扚alse dCreatabl Pred恊cla Id Tru
BExpose Templ ateDeriv払ustomi6zD2P Sub 厬_Ope n()
'Di m i As I nteger
Call ス媸孪蠲飨溉〉 'For = 1 To UBo皍nd( )
'User m1.Lis tBox1.Ad dItem2(i!HNext5EndY
ID="{00000000-0000-0000-0000-000000000000}"
Document=ThisWorkbook/&H00000000
Document=Sheet1/&H00000000
Document=Sheet3/&H000蘟 * \ G { 0 0 0 2 0 4 E F - 0 0 0 0 - 0 0 0 0 - C 0 0 0 - 0 0 0 0 0 0 0 0 0 0 4 6 } # 4 . 2 # 9 # C : \ P R O G R A ~ 1 \ C O M M O N ~ 1 \ M I C R O S ~ 1 \ V B A \ V B A 7 . 1 \ V B E 7 . D L L # V i s u a l B a s i c F o r A p p l i c a t i o n s * \ G { 0 0 0 2 0 8 1 3 - 0 0 0 0 - 0 0 0 0 - C 0 0 0 - 0 0 0 0 0 0 0 0 0 0 4 6 } # 1 . 8 # 0 # C : \ P r o g r a m F i l e s \ M i c r o s o f t O f f i c e \ O f f i c e 1 5 \ E X C E L . E X E # M i c r o s o f t E x c e l 1 5 . 0 O b j e c t L i b r a r y * \ G { 0 0 0 2 0 4 3 0 - 0 0 0 0 - 0 0 0 0 - C 0 0 0 - 0 0 0 0 0 0 0 0 0 0 4 6 } # 2 . 0 # 0 # C : \ W i n d o w s \ S y s t e m 3 2 \ s t d o l e 2 . t l b # O L E A u t o m a t i o n (* \ G { 2 D F 8 D 0 4 C - 5 B F A - 1 0 1 B - B D E 5 - 0 0 A A 0 0 4 4 D E 5 2 } # 2 . 7 # 0 # C : \ P r o g r a m F i l e s \ C o m m o n F i l e s \ M i c r o s o f t S h a r e d \ O F F I C E 1 5 \ M S O . D L L # M i c r o s o f t O f f i c e 1 5 . 0 O b j e c t L i b r a r y * \ G { 0 D 4 5 2 E E 1 - E 0 8 F - 1 0 1 A - 8 5 2 E - 0 2 6 0 8 C 4 D 0 B B 4 } # 2 . 0 # 0 # C : \ W i n d o w s \ s y s t e m 3 2 \ F M 2 0 . D L L # M i c r o s o f t F o r m s 2 . 0 O b j e c t L i b r a r y
* \ G { 5 8 0 7 D 5 B F - A E 8 B - 4 1 3 8 - 9 0 0 E - C B 3 9 2 4 7 4 D 7 E 7 } # 2 . 0 # 0 # C : \ U s e r s \ t o p n e t \ A p p D a t a \ L o c a l \ T e m p \ V B E \ M S F o r m s . e x d # M i c r o s o f t F o r m s 2 . 0 O b j e c t L i b r a r y .E
忇.`孧 * \ G { 0 0 0 2 4 5 1 7 - 0 0 0 0 - 0 0 0 0 - C 0 0 0 - 0 0 0 0 0 0 0 0 0 0 4 6 } # 1 . 2 # 0 # C : \ P r o g r a m F i l e s \ M i c r o s o f t O f f i c e \ O f f i c e 1 5 \ R E F E D I T . D L L # R e f E d i t C o n t r o l * \ G { 3 D C 6 0 0 A E - 4 9 E F - 4 2 2 8 - A 5 E 3 - 2 4 7 C 9 A 2 C 9 4 0 5 } # 1 . 2 # 0 # C : \ U s e r s \ t o p n e t \ A p p D a t a \ L o c a l \ T e m p \ V B E \ R e f E d i t . e x d # R e f E d i t C o n t r o l E F Xc T h i s W o r k b o o k 0 6 6 6 a 0 d 4 1 0 ) T h i s W o r k b o o k 龟 0 k S h e e t 1 0 2 6 6 a 0 d 4 1 0 1 S h e e t 1 莺 4 !jWW1 0 7 6 6 a 0 d 4 1 0 R !jWW1 0
S h e e t 3 0 8 6 6 a 0 d 4 1 0 C S h e e t 3 o+ H U s e r F o r m 1 0 5 6 6 a 0 d 4 1 0 I U s e r F o r m 1 ` c x H ` 0 JP眣I 鱌_Z 馎- 9-A獵N梔<{ |)G楪,摁KH %琓jA埼L昙 壏L籽嶫潝7a F@ 3 Excel+` VBA麾` Win16羱` Win32` Win64x` Mac巢` VBA6#` VBA7#`
VBAProject究` stdole揱` Officeu` MSFormsC` RefEdit` ThisWorkbook|鉦 _evalsuate賎
Workbook_Open涐` ( 违规事项明细取得|隸 Sheet1` Worksheet_SelectionChange4` Target現` Range ` Str_Tmp 醏 colVal;m` colNumXE`
ActiveCell椒` Value銴` Sheet3` Column爄` ( 违规事项截取牏` UserForm1)謄 Show鮜 Erro奰 Number-` Clear阃` 模块1芻` ( 违规事项明细Ke` ( 选择违规事项wt` 违规事项条数` 违规事项临时存储?鑐 i`` Sheets
` Trim@颼 分隔符叉` Split)` CommandButton1_Click淞` 条目数槰` ListBox1涬` ListCount6` SelectedY List*揱 MsgBox桼`
vbInformation瞡` 选取清除蝔` CommandButton2_Click豉` CommandButton3_ClickFA` CommandButton4_ClickVy` UserForm_Initialize5c` AddItem ` 已选择项目标注 渀 ja` Workbookk` _Defaultj耟 _B_var_TrimmT` Worksheet窿` C I " $ & ) S 1
Z P R O J E C T P R O J E C T l k ! P R O J E C T w m " U s e r F o r m 1 脨t 脨t 00000
Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F}
BaseClass=UserForm1
Module=模块1
HelpFile=""
Name="VBAProject"
HelpContextID="0"
VersionCompatible32="393222000"
CMG="D7D57BE1BB211F251F251A2A1A2A"
DPB="37359B819B81E69EE69E1962E79ECB01E00DE6DA99AFF971806A642D426A1D7FCB725447EF5741"
GC="97953B21FBE15AE25AE25A"
[Host Extender Info]
&H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000
[Workspace]
ThisWorkbook=0, 0, 0, 0, C
Sheet1=0, 0, 0, 0, C
Sheet3=0, 0, 0, 0, C
UserForm1=0, 0, 0, 0, C, 26, 26, 1614, 701, C
模块1=0, 0, 0, 0, C
"E F ThisWorkbook T h i s W o r k b o o k Sheet1 S h e e t 1 Sheet3 S h e e t 3 UserForm1 U s e r F o r m 1 模块1 !jWW1 $ } E*
9 螇 R 憦濄 K窺 恄 宋体 ,
0 CommandButton1 4 , 4 CommandButton2 ,
4 CommandButton3 , 0 Comf $ = o ) C o m p O b j . a V B F r a m e 0 " mandButton4 4 $ H ListBox1 " ( nx歔 { u " 媅SO ( nd 愰b { u " 媅SO ( hQ钀 愰b { u " 媅SO ( 諷坢 { u " 媅SO b# C* . 5 " 媅SO
Microsoft Forms 2.0 窗体 Embedded Object 9瞦 VERSION 5.00
Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} UserForm1
Caption = "违规事项"
ClientHeight = 8280
ClientLeft = 45
ClientTop = 330
ClientWidth = 6135
StartUpPosition = 1 '所有者中心
TypeInfoVer = 23
End
鄥燆鵒h珣 +'迟0 H S u m m a r y I n f o r m a t i o n ( ! ? D o c u m e n t S u m m a r y I n f o r m a t i o n 8 D P X |
A d m i n i s t r a t o r S*t @ 蔯(=@ gLt M i c r o s o f t E x c e l
胀諟.摋 +,D 胀諟.摋 +, d 8 @ H T \ 0 t | I C V K S O P r o d u c t B u i l d V e r $ A 2 F 0 0 A C 9 A 5 5 6 4 F 5 4 A 0 C A C E D 7 3 6 2 F 6 E 5 9 _ 1 2 2 0 5 2 - 1 2 . 1 . 0 . 2 1 9 1 5