? @ A B C D E F G H I J K L M N O P Q ўџџџS T U V W ўџџџY ўџџџ[ \ ] ^ _ ` 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 { | } ўџџџ
F Щ B Щ Щ@A aџџp љ Є %ђ э Є Є 7і !& $є ї Ь і Є Є 7і ќ 5њ !Ќ Є 7і % 7Ю Ь !& Џ '< rџџи hџџа ї Ь і Р O5 hџџИ < ( ( Ў wkmnu_ConfirmAdd %" !$ !& F D Ў $$
ь % Щ B Щ Щ@A g aџџ8 љ Є Є Є Є ќ 5њ !Ќ Є 7і % %~ % э
Є 7ю (& Є 7ю (& nџџР @B @A. hџџ nџџ hџџ Z Ў !The workbook must be saved first. ъџџџџ
Z Ў The file Ў $$ Ў already exists on the Work menu. ъџџџџ Zъџџџџ Zъџџџџ Zъџџџџ Zъџџџџ љ э 5 '
5 ' nџџ А
џџџџ F Щ B Щ Щ@A L aџџ h љ Є %ђ э!1BBBJ Є Є 7і !& $є Rи ї Ь і Є Є 7і ќ 5њ !Ќ Є 7і % 7Ю љи Ь !& Џ '< rџџР hџџИ ї Ь і Р hџџ < ( ( Ў wkmnu_ConfirmAdd %" !$ !& F D Ў $$
ь % Щ B Щ Щ@A g aџџ љ Є Є Є Є ќ 5њ !Ќ Є 7і % %~ % э
Є 7ю (& Є 7ю (& $ % nџџЈ @B 4 <@A. hџџ nџџ hџџx џџџџ џџџџ
p џџџџ џџ ` џџ ma џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџџџџџ ЈА Attribut e VB_Nam e = "mod About"
O ption Ex@plicit в в в џџ§Ј` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ > -Й -с џџџџџџџџџџџџ 0
` џџџњ`
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ 0 . P "
0 џџџџ " 8 @
H X џџџџ " ` ( @ h џџџџ "
" Ј Иџџџџ ЈХџџ x Zъ Ј Zъ 0 џџ@B| lџџ H p Џ 'Ђ џџ@B|
lџџ А Ў Really delete , Ў ? (8 lџџ h № Џ 'Ђ Џ (М lџџ @ џџџџ 8 и +******************************************* и
Properties P jџџ p ',џџџџ ` jј Ђ ' ш џџџџ и '*************************************** и
Private subs џџџџ џџџџ џџ Єh џџ 0џџh ` ` ( t` џџ 8 <џџ X (џџ` H Л l џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџџџџџ В Attribut e VB_Nam e = "Wor kMenuCon firmFormD"
ЄBasЄ0 {D56EB2B 0-CA58-1 1D8-AE95 -000A95E 03B8A}{98766D98J2J cCreatablhFalse Predec$la Id ЕTru !Expose>TemplateDeriv CustomizBOption .licit
D im sFile!As S Љng bResult
Boolea n
'*'
' Properti`es
y Let Del eteWhat(иsIn2=)L= EndЖ # *G ,(Ч9Ф0= D3Ѕ4
' iv] subs
PР^Sub btnNo_CРTkФ Me.HiXde
С+@
YЬesЪ [= Т?!UserСЖ_Act%Ф lblDО.Ca{ ХRea lly d\ " &}& "?"г)Initia№lize+ЇС+СA.DefaA2Х? џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ B ,б љ ?! б б б џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
F .б 9 ?A г г г џџ§Ј` џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ` a й y ё D Ф Ф ё 4Ф m P $Ф
! Ф б 8јџ№& Ф mH+ $ H Ф Ф ы Ф mNv Ж џџ џџџџ џџ Pџџ ьХШLиЅ
р;E ђЮШ
иЅ
р;9Nж Ш
иЅ
р; ьХ9ШLиЅ
р; џџџџџџџџ џџџџ x * џџџџ хО џџ ьХ9ШLиЅ
р;ьХШLиЅ
р;џџ Щ в : џџџџ > б B г FEM џџџџџџ џџ џџ п џџ ,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ PSџџџџ Sџџџџ Sџџџџ Sџџџџ ">џџџџ Lџџџџ џџџџ Lџџџџ џџџџ Lџџџџ џџџџ < 0џџ < 4џџ < 8џџ < <џџ <џџџџ џџ M0{D56EB2B0-CA58-11D8-AE95-000A95E03B8A}{98766D98-CA52-11D8-AE95-000A95E03B8A}@оW *\Rffff*ce40de905b А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#29 А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#56 А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#44 А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#54 п
h А 0 Иџџџџџџџџ p №џџџџџџџџ $ bЂџџџџ 8џџџџ @ 8 џџџџџџџџџџ $ $ $ А` џџџџџџџџ 0 k џџџџџџџџЌ №` џџџџџџџџ
џєk џџџџџџџџА Іџџџџ` џџџџџџџџ Xџќk џџџџџџџџД а џў `џџџџ X џџ 0 џџџџџџџџ Ј $ џўџџџџџџџџ џџ ` џџџџџџџџ~ ( $ $ $ $ b, 0 4џџџџ @ 4 џџџџџџџџ@ 8 $ $ џџџџ џўџџџџ џџ ( џџџџџџ џџџџџџџџ rџџџџџўџџ 8 џџџџџў џџџџџџџџ $ џўџџџџ џџ h џџџџџџ џџџџџџџџ $ џџџџX џўџџџџ џџ џџџџџџ џџџџџџџџ И $ rџџџџџўџџ а џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ џџџџџџ џџџџџџџџ $ i џџџџ џџџџ џџџџ $ џўџџџџ џџ X џџџџџџ џџџџџџџџџџ $ rџџџџџўџџ џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ И џџџџџџ џџџџџџџџџџ $ џўџџџџ џџ X џџџџџџ џџџџџџџџ № ! h џџџџџџџџ
рџ№+ (џџ Є М Ќiџўџџџџџџџџџџ џџџџ џџџџ $ A шh џџџџџџџџ
8 + џџџџ џџџџ p` џџџџџџџџ k џџџџџџџџЈ џџЈ pџџџџ џџџџџџџџџџџџџџџџ P А № Ј 0 шџџџџ rџџџџџўџџ ` џџџџџў џџџџџџџџџџџџџўџџџџ џџ h џџџџџџ џџџџџџџџџџџџџўџџџџ џџ џџџџџџ џџџџџџџџџџџџ rџџџџџўџџ џџџџџў џџџџџџџџџџџџџўџџџџ џџ џџџџџџ џџџџџџџџџџџџџўџџџџ џџ а џџџџџџ џџџџџџџџџџџџ rџџџџџўџџ и џџџџџў џџџџџџџџџџџџџўџџџџ џџ ( џџџџџџ џџџџџџџџџџџџџўџџџџ џџ H џџџџџџ џџџџџџџџџџ $ џџџџ` rџџџџџўџџ p џџџџџў џџџџџџџџџџџџџўџџџџ џџ а џџџџџџ џџџџџџџџџџџџ $ џўџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ rџџџџџўџџ 0 џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ ` џџџџџџ џџџџџџџџџџџџ $ џўџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ rџџџџџўџџ Р џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ № џџџџџџ џџџџџџџџџџџџ $ џўџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ rџџџџџўџџ P џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ џўџџџџ џџ А џџџџџџ џџџџџџџџџџџџ $ rџџџџџўџџ р џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ џўџџџџ џџ @ џџџџџџ џџџџџџџџџџџџ $ rџџџџџўџџ p џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ џџџџ, џџџџџџџџ
8 Hџџџџ џџџџ џџџџ Р џџџџџџџџЂ јџџџџ @џўџџџџџ№џџџџ џџџџ| џџџџШ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Јџџџџџџџџ џџџџџџџџџџџџџџџџџџџџ Рџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Р ш иџџџџ
8 џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџ
р џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ иџџџџџџџџ џџџџЂ|џџџџџџџџџџџџ џџџџџџ,џџџџџџџџџџџџ џџ@џў
8џќџџџџ џџџџ@џўџџџџџјџџџџ џџџџ@џўџџџџџєџџџџ џџџџџџџџЂџџџџџџџџџџџџ џџ 8 Иџџџџџџџџ 0 џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ №џџџџ@џўџџџџџќџџџџ џџџџ џќџџџџ џџџџ Ј џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
Pџџџџџџџџ
А Pџџџџ Ј 0џџџџ №џџџџ 0 `џџџџџџџџ H x T И џџџџџџџџџџџџџџџџџџџџџџ
а Ъў ! џџџџ 2 Ш џџџџ Ё" џџџџ ЁB
@ 8 T (Ф Ф Еџџс 8Ф ы Ф m ( LФ Ф @П з 4 №dџќП №dџєьџјi ыџјiD Г џќџєџјФ m` L џќ џє џј h 8Ф Ф с 8Ф "Еџџьџќi ыџќi 8 џќФ m 8 џќ
1 џџџџ # t
Љ џџџџ # t
F a q ! p ! p
: й щ ! p ! p
> Q
a ! p ! p
> Щ й ! p ! p C Ur џџџџџџџџ T $ й h Ёџџџџџџџџџџ i 0 $ Q h Ѕџџџџџџџџџџ џџџџ / ` Ј џџџџџџџџ ` Ќ џџџџџџџџ љ ` А џџџџџџџџ q ` Д $џџџџџџџџ p W o r k M e n u P r e f e r e n c e s F o r m 0 џџџџџџџџџџџџ з B _ _ S R P _ A џџџџ њ ъ _ _ S R P _ B џџџџџџџџџџџџ Р m o d B u i l d M e n u џџџџџџџџџџџџ + 6bJ 4џџџџ @ 4 џџџџџџџџ@ : $ $ џџџџџџџџџџџџ Р ` ` р шџџџџ џџџџџџџџ р џџџџ lџџџџџўџџ X џџџџџў џџџџџџџџ џўџџџџ џџ А џџџџџџ џџџџџџџџ $ џўџџџџ џџ р џџџџџџ џџџџџџџџџџџџ $ lџџџџџўџџ џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ @ џџџџџџ џџџџџџџџџџџџ $ џўџџџџ џџ p џџџџџџ џџџџџџџџџџџџ $ $ $ $ џўџџџџ џџ И џџџџџџ џџџџџџџџџџџџ $ lџџџџџўџџ ш џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ џџџџџџ џџџџџџџџ $ џўџџџџ џџ H џџџџџџ џџџџџџџџџџџџ $ lџџџџџўџџ x џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ Ј џџџџџџ џџџџџџџџџџџџ $ iџўџџџџџџџџџџџџ џџџџ џџџџџџІ (` џџџџџџџџ рџk џџџџџџџџр B џџ $ $ џўџџџџ џџ џџџџџџ џџџџџџџџџџџџ lџџџџџўџџ p џџџџџў џџџџџџџџ ј $ џўџџџџ џџ џџџџџџ џџџџџџџџ $ џўџџџџ џџ а џџџџџџ џџџџџџџџџџџџ $ lџџџџџўџџ џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ 0 џџџџџџ џџџџџџџџџџџџ $ iџўџџџџџџџџџџџџ џџџџ џџџџџџb ` 8џџџџ @ 8 џџџџџџџџ ` lџџџџџўџџ x џџџџџў џџџџџџџџ џўџџџџ џџ џџџџџџ џџџџџџџџџџџџ lџџџџџўџџ џџџџџў џџџџџџџџ џўџџџџ џџ џџџџџџ џџџџџџџџ @ $ џџџџ` џџџџџџџџ иў|k џџџџџџџџф ] џџ ш $ $ џџџџ џўџџџџ џџ џџџџџџ џџџџџџџџ bњ <џџџџ @ < џџџџџџџџџџџџ@џџџџџ№џџџџ џўџџџџ џџ џџџџџџ џџџџџџџџ $ $ $ lџџџџџўџџ џџџџџў џџџџџџџџџџџџџўџџџџ џџ џџџџџџ џџџџџџџџ џўџџџџ џџ h џџџџџџ џџџџџџџџџџџџ lџџџџџўџџ p џџџџџў џџџџџџџџџџџџџўџџџџ џџ № џџџџџџ џџџџџџџџџџџџ $ $ $ $ b$џџџџ Dџџџџ @ D џџџџџџџџџџџџ $ $ $ $ lџџџџџўџџ џџџџџў џџџџџџџџџџџџџўџџџџ џџ џџџџџџ џџџџџџџџ џџџџ
џџџџџџџџ ( иџџџџ ` џ Ж џџ џџџџ џџ |џџ ьк§ШLиЅ
р;EЉИxШ
иЅ
р;9NчrШ
иЅ
р; ькОШLиЅ
р; џџџџџџџџ џџџџ x z ^
џџџџ хN џџ ькОШLиЅ
р;ьк§ШLиЅ
р;џџ +W =W ; ^ к F л J б N в R м V д Z г ^ е b џџџџ f н j и n й rEM џџџџџџ џџ џџ п џџ Dџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ PSџџџџ Sџџџџ Sџџџџ Sџџџџ ">џџџџ < џџ < џџ < џџ < џџ < џџ < $џџ < (џџ < ,џџ < 0џџ < 4џџ < 8џџ < <џџ < @џџ Lџџџџ *џџџџ Lџџџџ Lџџџџ *џџџџ Lџџџџ џџџџ
џџџџ Lџџџџ џџџџ Lџџџџ Lџџџџ Lџџџџ Lџџџџ Lџџџџ џџџџ Lџџџџ "Њџџџџ џџџџ џџџџ < џџ < џџ < Єџџ < Јџџ < Ќџџ < Аџџ < Дџџ < Иџџ < Мџџ < Рџџ < Фџџ < Шџџ < Ьџџ < аџџ < дџџ < иџџ < мџџ < рџџ < фџџ < шџџ < ьџџ < №џџ < єџџ < јџџ < ќџџ <џџџџ џџ M0{D58BC384-CA58-11D8-AE95-000A95E03B8A}{98769292-CA52-11D8-AE95-000A95E03B8A}@оW *\Rffff*cf40de905b А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#45 А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#56 А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#29 А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#47 А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#58 А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#44 А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#54 *\Rffff*d240de905b А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#51 А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#69 *\R1*#b5 *\R1*#11c *\R1*#11b *\R1*#cd А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#4a А*\H{AC2DE821-36A2-11CF-8053-00AA006009FA}#2.0#0#:..:..:..:..:..:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\6#Microsoft Forms 2.0 Object Library*#60 *\Rffff*c740de905b *\R0*#1b *\R0*#1cп
ш Иb X 6џџџџ @ 6 џџџџџџџџџџ џўџџџџ џџ P џџџџџџ џџџџџџџџ $ $ b Ј :џџџџ @ : џџџџџџџџџџ bю
@џџџџ @ @ џџџџџџџџ џўџџџџ џџ 0 џџџџџџ џџџџџџџџ
P ` џџџџџџџџ 8џќk џџџџџџџџР
z ` џџџџџџџџ иџk џџџџџџџџФ ` џџџџџџџџ ` k џџџџџџџџа , $ и` џџџџџџџџ ( k џџџџџџџџд 0 4 ` џџџџџџџџ р k џџџџџџџџи 4 L `Lџџџџџўџџџџ џџ $ џў hџџџџ ` џџ 8 џџџџџџџџ $ џўџџџџџџџџ џџ h џџџџџџџџ $ ь а` џџџџџџџџ иџ№k џџџџџџџџм
8 @џџџџџџџ и X џџџџ Јџџџџ X и аџџџџ иџўџџџџ џџ ј џџџџџџ џџџџџџџџџџџџ lџџџџџўџџ
џџџџџў џџџџџџџџ џўџџџџ џџ
џџџџџџ џџџџџџџџџџ џўџџџџ џџ
8 џџџџџџ џџџџџџџџџџџџ lџџџџџўџџ
@ џџџџџў џџџџџџџџџџџџџўџџџџ џџ
H џџџџџџ џџџџџџџџџџџџџўџџџџ џџ
P џџџџџџ џџџџџџџџџџџџ lџџџџџўџџ P џџџџџў џџџџџџџџџџџџ $ џўџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ џўџџџџ џџ А џџџџџџ џџџџџџџџџџ $ lџџџџџўџџ р џџџџџў џџџџџџџџџџ $ $ $ $ $ џџџџ№ $ $ $ џџџџ № џўџџџџ џџ ш џџџџџџ џџџџџџџџџџџџџўџџџџ џџ № џџџџџџ џџџџџџџџ lџџџџџўџџ ј џџџџџў џџџџџџџџџџџџџўџџџџ џџ
џџџџџџ џџџџџџџџџџ $ $ $ џџџџ h џўџџџџ џџ
џџџџџџ џџџџџџџџџџ lџџџџџўџџ
џџџџџў џџџџџџџџ ( џўџџџџ џџ
џџџџџџ џџџџџџџџ џџџџt џАџџџџ џџџџ
` и` џџџџџџџџ Иџиk џџџџо Ш џџџџџџiџўџџџџџџџџџџџџ џџџџ џџџџџџџўџџџџ џџ
а џџџџџџ џџџџџџџџъц@џўџџџџџќџџџџ џџџџ
ш lџџџџџўџџ
и џџџџџў џџџџџџџџџџџџџўџџџџ џџ
р џџџџџџ џџџџџџџџџџџџџџџџ ошкZ џџ џўџџџџџќџџ И` џџџџ $ џџџџ џџџџџџ X$ м X` џџџџџџџџ k џџџџм Ь ( џџџџџџiџўџџџџџџџџџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ pџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ x џџџџ рџџџџ pџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Р@џў Шџјџџџџ џџ L$ џџџџ а @џў јџшџџџџ 8џџџџ џџџџИ @џў (џфџџџџ џџџџ@џў џаџџџџ џџџџ@џў џРџџџџ џџџџ@џў XџАџџџџ џџџџ@џў @џЌџџџџ џџџџ@џўџџџџџЈџџџџ џџџџ@џўџџџџџџџџџ h @џўџџџџџџџџџ џџџџ@џўџџџџџџџџџ џџџџ t џџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџ аџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ p џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ XџџџџџџџџJоцќъшџџ џџ@џўџџџџџьџџџџ џџџџ@џўџџџџџиџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ HџџџџџџџџH џџџџJџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџJџ№џџџџ џџџџp џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ШџџџџџџџџJ оњ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџJ и @ џџџ џџџџJъш џџџ @џўџџџџџќџџџџ џџ L$ џџџџx џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Ш Аџџџџџџџџџџџџџџџџ Аџџџџџџџџџџџџџџџџ xџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџјџџ а` џџ џџџџ x р № џџџџ @џўџџџџџєџџџџ џџџџ@џўџџџџџ№џџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Шџџџџ Аџџџџ џџџџџџџџџџџџџџџџ Шџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ А рџџџџJ @џў јџќџџџџ џџ @џўџџџџџшџџџџ @џў рџиџџџџ @џў (џШџџџџ ош@џў џФџџџџ @џўџџџџџРџџџџ @џў HџАџџџџ џџџџ @џўџџџџџ џџџџ џџџџ( њоюшъцќ$ џџ@џўџџџџџџџџџ џџџџ@џўџџџџџџџџџ џџџџ hкКИџџџџџџџџџџ џџ џџџџџџџџџ ` џџџџџџџџ Ш џџџџџџџџџџ оњ џџ@џў pџјџџџџ џџ @џў Xџшџџџџ џџџџ @џў џиџџџџ @џў џШџџџџ @џў џФџџџџ @џў ИџАџџџџ @џў Рџ џџџџ @џў xџџџџџ џџџџЈ џџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџ @џџџџ иџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Ј @џў Јџџџџџ џџ @џў џ|џџџџ @џў иџhџџџџ @џў HџXџџџџ џџ @џў џHџџџџ џџџџ џџџџА @џў 0џ8џџџџ џџџџ@џў Рџ4џџџџ џџџџ@џў `џ џџџџ џџџџ@џў №џџџџџ џџџџ@џў xџ џџџџ џџџџ@џў ў№џџџџ џџџџџџџџ ЈџџџџџџџџX №шюк$ИAAAAAA A@џў ўьџџџџ rz3b@џўџџџџўшџџџџ AkgA@џў Pўиџџџџ DUV@џў 8ўШџџџџ ACAA@џўџџџџўФџџџџ AkAA@џў hўАџџџџ ApF7@џўџџџџў џџџџ GhQY@џў ўџџџџ G46R@џўџџџџўџџџџ UYXN џџџџџџў|џџ Ш` uYWwџџџџ
иџџџџ и 8џџџџ (џџџџ
hџџџџџџџџ 8 ` шРџџџџџџџџџџџџџџџџџџџџџџ
Ј
Ъў e џџџџ ` ( Ј џџџџ " 0
" 8 H џџџџ " P X * ` . * Р * № . № 0
и (
" 0 @ џџџџ " Ш X ` * Ј $ и $ ј $ $
а џџџџ "
(
8
0 џџџџ " H ш h џџџџ " p P џџџџ " x И џџџџ " Р Ш а : и ш №
ј џџџџ " * , P . ` , * , а * р , . p $ ` J $ 8 $ H $ X $ h 0 А , x
Ј А џџџџ " И Р0 L
H ( 0 8 @ Hџџџџ 0Х` Zъџџџџ Zъџџџџ Zъџџџџ Zъџџџџ ` џџ@At lџџ 8 !& Ў wkmnu_ShowSplash 7" !$ (& (& n 0 @C џџ@At lџџ ( р J @A hџџ lџџ J @A hџџ р lџџ и ` J @A hџџ И lџџ А Џ 'J Ў wkmnu_ShowSplash %" !$ !& ' (& Ў wkmnu_ConfirmDelete %" !$ !& ' (& Ў wkmnu_ConfirmAdd %" !$ !& ' (& љ К эЏ 9` Џ 9М nџџР Џ И (` Џ 'J lџџ р Zъџџџџ љ И э L 9` L 9М nџџ( Zъ иџџџџ љ э !& Ў wkmnu_ConfirmDelete 7" !$ (& дџџџџи џџџџР џџџџ0 !& Ў wkmnu_ConfirmAdd 7" !$ (&џџ џџџџ lP lџџ0 lџџ( @A џџџџ а lџџX Џ 'J @C n Џ 'J џџџџ0 Zъџџџџ Ў wkmnu_SeparatorEvery %" !$ !& ш (&rosoft
!& !& !& ъ !f U ю 'Lџџџџџџџџ8 ш !& U 9f ( љ ъ эџџџџ№ ш !& U ъ (fџџи џџџџ ш !& Ў wkmnu_SeparatorEvery 7" !$ (& Zъџџџџџџџџ Ў wkmnu_AutoGroup %" !$ !& 'њ њ о (&џџџџ њ ц (`џџџџ њ ќ (`џџџџ њ ъ (` њ ш (` џџџџј Zъ Zъ X Zъ ` Zъ Ј Zъ и џџ@At lџџР љ э !& Ў wkmnu_ShowSplash 7" !$ (& !& Ў wkmnu_ConfirmDelete 7" !$ (& !& Ў wkmnu_ConfirmAdd 7" !$ (& ш !& Ў wkmnu_SeparatorEvery 7" !$ (&Co@C nџџр џџ@At Confir lџџШ X J F@A g J lџџ J F@A g@A lџџx и h о !& ' lџџP Џ 'J љ ъ э ш !& U 9fut@C nџџ @A Џ 'J lџџ а Џ 'J Ў wkmnu_ShowSplash %" !$ !& ' ThisW (&s("w Ў wkmnu_ConfirmDelete %" !$ !& 'tx (&ext Ў wkmnu_ConfirmAdd %" !$ !& 'r1.Ena (&gina Ў wkmnu_AutoGroup %" !$ !& 'њrigina њ о (& t ш !& U ъ (fginalA њ ц (` Wit њ ќ (` њ ъ (` = T њ ш (`.Def љ К эЏ 9` Џ 9М nџџ@ Џ И (`ed = FЏ 'J lџџ ( Zъ l P ц (` g J F@A g ќ (`igin ъ (` U ш (`shSc љ И э L 9` L 9М nџџ lџџ џџџџ Zъ а ю ш (& Ў wkmnu_SeparatorEvery %" !$ !& 'ю џџџџ Zъ
Ў wkmnu_AutoMacroOptions %" !$ !& '$џџџџ
џџџџ
о !& Ў wkmnu_AutoGroup 7" !$ (&irstItџџџџ
и lџџ
` J F@A g
" * !& !& !& о !& њ ш !& ю к !& $ 'L џџџџ ј к !& Ў wkmnu_AutoMacroOptions 7" !$ (&џџџџ
А $ 'кџџџџ @AZ џџџџ 0 џџ @` џџ ь ` џџ H 4
џџ ` $ ` џџ 0` t џ` L ` И ` Ш ` и џ ` џџ t ј џџ` Р Ј ш 0 џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџџџџџ ГД Attribut e VB_Nam e = "Wor kMenuPre ferences@Form"
ДBasД0{D58 BC384-CA 58-11D8- AE95-000 A95E03B8 A}{98769h292J2J cCreatablh`False d eclaredI"d ЙTru !Ex0pose>Te mplateDerivCustomizBOption .lic it
Dim bEnEven ts As Bo oleangb OriginalS9shScreenConfiРrmDele Ю&Add%Aut@oGroupnIeparatoТrLongЬ,`Macro>J7
P@O@Q Sub btnCa l_C@Fk()
Unload M e
EndС
Save Wit@h ThisЃbXook.Љs ("wkmnu_ShowCT").RСЋsToRange.ValuјcbxG У]У^џY
Ёiр@ Цs7й SХ}Vryёі spn&^щD=i
AB"4aFСAJDEMХUpdРNLјist"L @f"*M'Hw
IfLzThќen"СPЄ}FРI Ќlbl&1.
/ЁЦ 2 txt& џ j: С1Butto8nStР.!3Ifџz!)<Ъ.В+Ў ! рџы
@ Do@e
!
џcЎџ
џ
ф
_ _ A ёI8_ChЎФJDб|= пСVтЊiE'.TextP,CSt їSO#А) Or _цП9 !T<ѓpџae>џ:7Cк GCЏЎ/ x(я; џ! џ; `жЩ& 9c>)1 џ(= З7)Кv)%& В џиџШџАџ Ф ,б 8јџиьџќi ыџќiє џќџиФ ьџ И hџАьџРьџФИ hџШhџиЦџш ьџќЋ | ї i ыџќi 4 ыџФi ыџРiШ цџ Vс :Д џќџФџРВ џиџШџАџ Ф ,б :јџиьџќiЄ ыџќiє џќџиФ ьџ И hџАьџРьџФИ hџШhџиЦџш
ьџќЋ | ї i ыџќi 4 ыџФi ыџРiШ цџ Vс <Д џќџФџРВ џиџШџАџ Ф ,б <јџиьџќiЌ ыџќiє џќџиФ ьџ И hџАьџРьџФИ hџШhџиЦџш ьџќЋ | ї i ыџќi 4 ыџФi ыџРiШ цџ "т @Д џќџФџРВ џиџШџАџ Ф $в @ьџќiД ыџќi<
џќФ JьџьџќiД ыџќi@ тџ ўdџьџФiИ ыџФil џД џќџФФ $б <ьџќiА ыџќiL џќФ $б <ьџќiМ ыџќiL џќФ $б <ьџќiИ ыџќi џќФ $б <ьџќiД ыџќi, џќФ ьџ И hџАьџРьџФИ hџШhџиЦџш ьџќЋ | ї i ыџќi 4 ыџФi ыџРiШ цџ Vс DД џќџФџРВ џиџШџАџ Ф ,б DјџиьџќiЈ ыџќiє џќџиФ ьџќi bџќџџФ Еџџыџi< Ф Еџџыџi 8 Ф И јџФ ьџќi ыџќi< џќФ Еџџс 4Ф m pА ( џ ЁБСг , џ џќ џФ џР џи џШ џА џ ( Ф ФLьџшьџјi ыџјiј цџшб 6јџи <џШьџАьџФi ыџФiј цџАб 8јџ <џ џьџhьџ|iЄ ыџ|iј цџhб :јџX <џH џ8ьџ ьџ4iЌ ыџ4iј цџ б <јџ <џ ў№ьўшьўьiД ыўьi@ тўшв @ 8јўи ўШьўАьўФiЈ ыўФiј цўАб Dјў <ў ўVёџўД џјџФџ|џ4ўьўФВ
џшџАџhџ ўАФ ьџјi bџјџў|Ф сџўыў|i< Ф сџўыў|i 8 Ф И јў|Ф m ( ў| ЁБСг ` џј џФ џ| џ4 ўь ўФ џш џШ џА џ џ џh џH џ8 џ џ ў№ ўШ ўА ў ў
^ 1
A
! p ! p
Z Љ
Й
! p ! p
r !
1
! p ! p
n
Љ
! p ! p
b
!
! p ! p
R
o O Q џџџџ \ C o m p O b j џџџџџџџџџџџџ X C o m p O b j џџџџS џџџџ Б E V B F r a m e џџџџџџџџџџџџ Г 3 Ur +и
#щ 01 *x :1 ^q T =a U љ ё ЉQ D )ё Y q < еС ещ ж ж9 џџџџ е F ,б љ I к к к џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
J q Q л л л ` Б
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ N S GЩ б б б џџ§` 9
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ R S O в в в џџ§` С
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ V 61 й С м м м џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
Z .б 9 4Щ д д д џџ§Ј` с
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
^ .б 9 5) г г г џџ§Ј` i
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ b S S9 е е е џџ§` I
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ f -Й Б -с џџџџџџџџџџџџ џџџњ` )
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ j ,б љ i н н н џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ n S и и и џџ§` б
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ r S q й й й џџ§` Y
џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
h Y
б
I
С
9
Б
)
Ё
\ ,Ф Ф "ш џќЋ | ї i џќФ m , џќ < шФ Ф Ћ | і јџќФ ьџшьџјi ыџјiј эџшИ hџьџЈьџЌИ hџАhџРЦџа ьџфыџќi ыџфi 4 ыџЌi ыџЈiЬ Д џјџфџЌџЈВ џРџАџџшФ ьџшьџјi ыџјiј эџшИ hџьџЈьџЌИ hџАhџРЦџа ьџфыџќi ыџфi 4 ыџЌi ыџЈiЬ Д џјџфџЌџЈВ џРџАџџшФ ьџшьџјiЄ ыџјiј эџшИ hџьџЈьџЌИ hџАhџРЦџа ьџфыџќi ыџфi 4 ыџЌi ыџЈiЬ Д џјџфџЌџЈВ џРџАџџшФ ьџшьџјiЌ ыџјiј эџшИ hџьџЈьџЌИ hџАhџРЦџа
ьџфыџќi ыџфi 4 ыџЌi ыџЈiЬ Д џјџфџЌџЈВ џРџАџџшФ ьџьџјiД ыџјi@ тџiџИ hџАьџЈьџЌИ hџРhџшЦџа ьџфыџќi ыџфi 4 ыџЌi ыџЈiЬ Д џјџфџЌџЈВ џшџРџАФ ьџшьџјiЈ ыџјiј эџшИ hџьџЈьџЌИ hџАhџРЦџа ьџфыџќi ыџфi 4 ыџЌi ыџЈiЬ Д џјџфџЌџЈВ џРџАџџшФ И ыџќi
Ф И јџќФ ѓ Ф "ш џјЋ | ї i џјФ mrt ш ( џќ key> , џј џф џЌ џЈ џш џР џА џ рФ Ф б 4 жФ *ьџиьџьiЌ ыџьiј цџиіџ№џьФ $цџ№VьџьiА ыџьiL џьФ $цџ№VьџьiМ ыџьiL џьФ $цџ№VьџьiИ ыџьi џьФ $цџ№VьџьiД ыџьi, џьФ
jф Ф Ф m ( р ( џ№ џь џи P $Ф Ф б 4 Ф
jф Ф mСг $ P $Ф Ф б 4 Ф
jф Ф mСг $ P $Ф Ф б 4 Ф
jф Ф m $ P $Ф Ф б 4 Ф
jф Ф mH+ $ и Ф Ф с 4Ф ьџќiИ bџќџџјФ :ьџєьџќiД ыџќi@ тџє ўdџ№ыџјil џ№џќФ ыџјi Ф И јџјФ
jф Ф Еџџс 4Ф m ( џј k џ№ џќ АФ Ф с 4Ф ьџ И hџАьџРьџФИ hџШhџиЦџш ьџќЋ | ї i ыџќi 4 ыџФi ыџРiШ цџ Vс 6Д џќџФџРВ џиџШџАџ Ф ,б 6јџиьџќi ыџќiє џќџиФ ьџ И hџАьџРьџФИ hџШhџиЦџш ьџќЋ | ї i ыџќi 4 ыџФi ыџРiШ цџ Vс 8Д џќџФџР
! p ! p
N
! p ! p
J y
! p ! p
f ё
! p ! p
i
џџџџ ! p ё Ur
џџџџџџџџ й
` Р џџџџџџџџ Q
` Ф џџџџџџџџ Щ
` Ш џџџџџџџџ A
` Ь џџџџџџџџ
Й
` а џџџџџџџџ
1
` д џџџџџџџџ Љ
` и џџџџџџџџ !
` м џџџџџџџџ
` р џџџџџџџџ
` фџџџџџџџџџџ p Ur ~ } ! @ х !ь .4@B Ў JEMWorkMenu Щд 4 !а %в @B№ и 7Check to see if the default worksheet menu bar is open. # и $If it is, proceed. If not, bail out.Р 5` 5\ F u g х к Щn Що 7в !р ЩмЏ Щт 5ж %и .D Z Єu:ъ h:=ms Zъ џџџџ ` љ D э Ў Work 98 џџџџ Џ 4 (N.ContrЏ 9\ nџџ nџџ Џ 4 (N Typeџџџџ Џ 9` и Add "Add to Work Menu" Control_Men љ ф Щn 5ж %и э џџџџЈ Ў Add to Work Menu 98 nШ 0 и Add "Edit File List" controlkMenuA T 9д Ў JEMWorkMenuAddItem 9ц љ ф Щn 5ж %и э Ў Edit file list 98 Ў JEMWorkMenuEditFileList 9цџџџџ Џ 9\ Џ 9ш nџџ и Add "Run Auto Macros" control љ ф Щn 5ж %и э Ў Run AutoMacros 98 Ў JEMWorkMenuToggleAutoMacros 9ц X 9д Џ 9\ Џ 9ш nџџh Џ 9\ и Add "About" control љ ф Щn 5ж %и э 9 Ў About Work Menu 98 Ў JEMWorkMenuAbout 9цџџџџ№ Џ 9\ Џ 9ш nџџ8 и Add Preferences control 5 љ ф Щn 5ж %и э < Ў Work Menu preferences 98 Џ 9ш nџџА @AZ џџџџ и
Add the files џџџџр и .Enabled = False џџџџи Ў JEMWorkMenuPreferences 9ц џџџџ` љ Є 4 %а э џџџџx Џ 9` Џ 9\ џџџџx џџ ` џџ o d џџ $ H@ 8 L џџџџ џџ ћd d џџ џџ џџ џџ џџ x џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџџџџџ їГ Attribut e VB_Nam e = "mod BuildMen u"
Optio n Explicit > 5џџџџџќџџ X *P $ џџџџ ` џџџџ u:џџC Dџџџџџјџџ $ џџџџ ( џџџџ Pџџџџ џџ и џџџџџџ џџџџџџџџ xг $ Pџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ Pџџџџ џџ 8 џџџџџџ џџџџџџџџџџџџ $ Pџџџџ џџ h џџџџџџ џџџџџџџџџџџџ $ Pџџџџ џџ џџџџџџ џџџџџџџџџџ $ Pџџџџ џџ Ш џџџџџџ џџџџџџџџџџ $ n n n n n n n n n n n џџџџF кLфTXZ @џў xџєџџџџ n @џў рџрџџџџ @џў рџмџџџџ X n џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ @џџџџ hџџџџџџџџџџџџ џџџџџџџџџџџџ @ 0џџџџ ` p Шџџџџџџџџџџџџџџџџ Hџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ( n n џў јџиџџ `` $ $ n n n n n n n n n n n n n n` n n n n n n0 H џџџџ n n n n n n n n n џџџџ а @џў аџжџџџџ n n џџџџ@ n n n n n џџџџp @џўџџџџџдџџџџ n n џџџџ n P ј n n џџџџа @џў `џРџџџџ n n џџџџ @џў џАџџџџ џџџџ n @џў Аџ џџџџ џџ n n n P @џў џџџџџ џџџџ@џўџџџџџџџџџ @џў 8џxџџџџ n nИ nА nЈ n n џџџџ n( @џў hџhџџџџ ( ж џџџџј @џўџџџџџXџџџџ n n n8 @џў ШџHџџџџ џыыы n n џџџџ @џўџџџџџ8џџџџ r:Us@џўџџџџџ4џџџџ icro џў (џ0џџ h` up 1 p X rtupnoџџџџh @џў Xџ,џџџџ ` n o n n nј @џў џ(џџџџ ` john и "/MicroџџџџШ @џў Рџ$џџџџ ` rd/s n n nX џџџџP @џў шџ џџџџ ` Р * @џўџџџџџ џџџџ ` џџџџ ш 1v
0Рџџџџh џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџ Ј 0 Ъў A
џџџџ" P @ ` џџџџ " H
џџџџ > * Р 4 6 № D Њ p x ( H @ $ и 4 p 8 " @ 4 Ј Р h ш № ј $ 4 ( @ $ X Ј 4 Ш р ј ( 0 4 P h ј Ј а Ј А
И џџџџ XХџџ x Хџџ p lџџ ` @AF L 9дС @ С Zъ Befor.Find(Id:=
).Index!Tempora ry:=TrueЫHRЩ:6.CaCХK@Ы"OTaДg csJEM_WOФRKЛTAGЯ
_O РKХOk= r'@` "@A$ йФ" ФJ Т8 p3ButtonK# & ЎЏ
Р.OnќAc"`&`"a №Item/(A
S #{С4 EW!у!Ed YFile List" coтU{Ў!l!`Є Bf§AlAN
ЂT!aЁ3ЊJEDIT_ FILE_LIS§ E-тc
џ/!ЇO>№! ЎДЂ)PrefeРrences/@§/@(O)џPд p aтWџ@{џMЁOQ џъ:o=1OQ0 BЛБqJsЮ822eёHџ^8i@Џ[@$ ?бtё _ _ S R P _ 1 5 ! ' џџџџ Х _ _ S R P _ 1 4 џџџџџџџџџџџџ + e m o d D e l e t e M e n u 4 џџџџџџџџ - _ _ S R P _ 6 * $ џџџџ R u Y Ё Д ё q Ё ЕA Y #Щ Е ! I Љ ё й Ес ЖQ й Љ Жй ЗY Зс И1 И Ф )ё ! P иФ Ф ѓ Ф "ьџєЋ | ї i bџєџџќФ И ыџќiд Ф 4ьџмРџр ьџєыџќi h ыџєi L bџмџџиџєФ 0ьџжыџиi сџжьџдыџиi є сџд " П ЎФ еФ Њьџьџєhџhџ hџАСџр u:hџРыџиi ыџєi Ь ьџ4eџXтџiџhhџ8hџHСџx
ьџмыџиi ыџмi ( шџ4ђ џџјД џєџмџ4В џРџАџ џџHџ8Ф шџјјџ0Ф П ыџ0i Ф П ыџ0i Ф ыџ0i$ Ф ыџ0i Ј Ф 4Сџр ыџ0џР
Ї џА 4јџ,В џРџАФ Цџр
ыџ, Ф Цџр ыџ, Ф eџрыџ, Ф И јџ,Ф 4Сџр ыџ0џР
Ї џА 4јџ(В џРџАФ Цџр ыџ( Ф Цџр ыџ( Ф Цџр ыџ( Ф fџрыџ( Ф eџрыџ( Ф И јџ(Ф 4Сџр ыџ0џР
Ї џА 4јџ$В џРџАФ Цџр ыџ$ Ф Цџр ыџ$ Ф Цџр ыџ$ Ф fџрыџ$ Ф eџрыџ$ Ф И јџ$Ф 4Сџр ыџ0џР
Ї џА 4јџ В џРџАФ Цџр ыџ Ф Цџр ыџ Ф eџрыџ Ф eџрыџ Ф И јџ Ф 4Сџр ыџ0џР
Ї џА 4јџ В џРџАФ Цџр ыџ Ф Цџр ыџ Ф fџрыџ Ф И јџ Ф ѓ Ф Еџџыџ0i Ј Ф Еџџыџ0i$ Ф И јџ0Ф И јџиФ ЕџџИ ыџќiд Ф е ши H 0 џи џ0 џ, џ( џ$ џ џ џќ џј џџјa 0 џє џм џ4 џР џА џ џ џH џ8 Б l I Ur џџџџџџџџ ` џ§џџџџџџџџџџ p Ж џџ џџџџ џџ џџ џџџџџџџџ џџџџ x № д Mџџџџ хJЇ џџ џџ W 3 [ д EM џџџџџџ џџ џџ п џџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ P
6џџџџ Lџџџџ Lџџџџ Lџџџџ џџџџ Lџџџџ џџџџ
џџџџ џџ @оW *\Rffff*d140de905b *\R4*#58 *\R4*#55 *\R1*#b3 *\R1*#17d *\R1*#c4 *\R1*#180 *\Rffff*ca40de905bп ш Fџџџџ` џџџџџџџџ рџ o џџџџџџџџџџ Мр џџџџ 8 џџџџ Rџџџџ џџ x џџџџџџ џџџџџџџџ $ Rџџџџ џџ Ј џџџџџџ џџџџџџџџџџџџ $ Rџџџџ џџ и џџџџџџ џџџџџџџџџџџџ $ Rџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ Rџџџџ џџ 8 џџџџџџ џџџџџџџџџџџџ $ Rџџџџ џџ h џџџџџџ џџџџџџџџџџџџ $ џџџџLьџџџџџџџџџџџџ џџ@џў џќџџџџ џџџџ@џў 8џјџџџџ џџџџ@џўџџџџџшџџџџ џџџџ@џў џиџџџџ p џџџџ ` @џў џШџџџџ џџџџ@џў PџИџџџџ $ џџџџШ @џўџџџџџДџџџџ џџџџ@џўџџџџџ џџџџ $ џџџџ Ј ( џШџџџџ џџ @џў џИџџџџ viseџџџџ8 џџџџ ( џДџџџџ @џў џ џџџџ џџџџp џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ аџџџџ Иџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ pџџџџџџџџ8 џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ @ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџ H 0 Ъў
џџџџ" v ( H џџџџ XХџџ x Хџџ p lџџ ` С X L Щд ь !а %в @B№ џџџџС 0 џџџџ ( џџ P` џџ t џџџ $ < џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџџџџџ иА Attribut e VB_Nam e = "mod DeleteMe nu"
Opti on ExplicitFO rror Resu рNext Apdap.Co mmandBar s.FindCo ntrol(Ta g:=gcsJE M_WORK_M ENU_TAG).tMjGoToD 0End
Ur ~ } Y ( 9 ЕA Ё и Ф Ф џџФ vhџ ьџДhџИЦџш hџШhџиьџјьџќЋ | ї i ыџќi h ыџјi H ыџДi Д џќџјџДВ џиџШџИџ Ф џўФ е ` ( џќ џј џД џи џШ џИ џ Б l Щ _ _ S R P _ 7 џџџџџџџџџџџџ X e m o d U p d a t e L i s t
џџџџ " F# _ _ S R P _ 1 6 џџџџџџџџџџџџ Z ы _ _ S R P _ 1 7 & џџџџ ~ г Ur џџџџџџџџ ` џ§џџџџџџџџџџ p Ur ~ § $ Y ( ЕA Ё Нљ *x ё љ ! # ё Й ` B1 ё й )ё ЉQ Љ Ќ Э Y ! Й 9 #Щ $ ! ОС Љ 'A й 4Ф Ф `ьџhџЦџШF Р " ј & X x Ј " А а и р а ш № < ј . l 8
И , 4 0 ( X 8 ш L ` p J ^ H џџџџ " ( @ r ` & <
H 0 џџџџ $" р 0 ш А И p џџџџ џџџџ xХџџ x Хџџ p lџџ ` lџџ P lџџ @ џџџџ 8 Zъ X ї d і Рndbarsџџџџ ї d і L Щд а %в !ж џџџџ P d !д V F d@B№ gд@A` џџџџ X и Set up grouping и Delete existing file items и Add file items џџџџ p Zъ №џџџџ љ Є %ђ э = .Ra Zъ P Zъ Ш Ў wkmnu_AutoGroup 7Ю !& '
џџ
F Ў wkmnu_SeparatorEvery 7Ю !& ' g Є Є 7і !& $є et.cli х L Щд а %в .lџџџџ P Џ T Щд а %в (\ aџџ№ џџџџш Џ T Щд а %в (\ Є 'p ї Ь і 5њ !Ќ Є Є Є Є 7~ % и Determine groupingџџџџШ т Є H Q Є H QЏ 'r Pџџ p Є
Є 'r/d kџџX
aџџH 1 1 1 Ј hџџ Є Є Ь % !& 'x/strin p Є Є Є $x 'r p Є 'p ї Ь і Рmworkm Zъ џџџџ Є Є $x Є Є $x r p@A^ ), bbeџџџџИ Zъ P Zъ h h0 Ш Є Ў wkmnu_names 7Ю % !& '~ sNameџџџџx ~ Є Є
` nџџа и %Hide Edit file list item if no files. nP 0 џџџџ ї p і Є ~ Є ange(w и Determine grouping status
т Є J Q p Є
Є 'rд Є H QЏ 'r Pџџ kџџx aџџp p Є p Є $~ 'r hџџH ї p і Р џџџџ0 p Є $~ U p Є $~ U r p@A^ џџџџш nџџј џџџџ№
98 z 9ў Ў JEMWorkMenuOpenFile 9ц r V 9д r 9шџџџџј џџџџp џџџџ Ж џџ џџџџ џџ џџ џџџџџџџџ џџџџ x № д }џџџџ хЅо џџ џџ Џ Ч Ѓ д EM џџџџџџ џџ џџ п џџ џџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџ 0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ @ < Pџџ
>џџџџ < џџ < џџ < џџ < џџ < џџ L(џџj < џџ џџџџ Lџџџџ Lџџџџ L(џџФ Lџџџџ "џџџџ L*џџџџ Lџџџџ Lџџџџ џџџџ
џџџџ < Tџџ < Xџџ < \џџ < `џџ < dџџ < hџџ < lџџ < pџџ < tџџ < xџџ < |џџ <џџџџ џџ @оW *\Rffff*d240de905b *\R4*#5a *\R4*#30 *\R4*#57 *\R1*#b8 *\R4*#58 *\R1*#cd *\Rffff*c740de905b *\R4*#58 *\R4*#55 *\R1*#c4 *\R1*#180 *\Rffff*ca40de905bп џџџџ А Z ` џџџџџџџџ hџTk џџџџџџџџџџ 0 0 џџџџ џџџџ Јџџџџ\џџџџ џџ 8 џџџџџџ џџџџџџџџ ` Ј` џџџџџџџџ иџk џџџџџџџџџџ 3 џџџџ 8 lџџџџџќџџ р
G $ џџџџ `
џџџџџоџџџџ \џџџџ џџ 0 џџџџџџ џџџџџџџџ $ $ $ n `џџџџџфџџџџ џџџџ $ $ nм n $ $ nм nм ^џџџџ` џџџџџџџџ Аџ|k шџџџџџџ
: џџџџ i
џџџџ џџџџ X џџџџ\џџџџ џџ 0 џџџџџџ џџџџџџџџџџџџ $ $ $ nм `rџџџџџмџџџџ P`~ Шџшџџџџ 8`pџџџџџрџџџџ 8\џџџџ џџ @ џџџџџџ џџџџџџџџџџџџ\џџџџ џџ h џџџџџџ џџџџџџџџџџ \џџџџ џџ p џџџџџџ џџџџџџџџџџ \џџџџ џџ џџџџџџ џџџџџџџџџџ џџџџLа`^ nм izџџџџ џџџџ xџџ Pirџџџџ џџџџ џџџџџџipџџџџ џџџџ џџџџџџџџџџ\џџџџ џџ џџџџџџ џџџџџџџџџџ \џџџџ џџ 8 џџџџџџ џџџџџџџџџџ \џџџџ џџ @ џџџџџџ џџџџџџџџџџ @џў hџиџџџџ џџ <$ џџџџ( џџџџP џџџџ
џџџџџџџџџџџџ №џџџџџџџџ Pџџџџџџџџџџџџ P hџџџџџџџџџџџџџџџџ p 0 џџџџ џџџџ иџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџ №џџџџџџџџџџџџџџџџ 8 @џў ЈџШџџџџ @џў 8џИџџџџ @џў PџЈџџџџ @џў Рџџџџџ @џўџџџџџџџџџ @џў Аџџџџџ ` џџџџ @џўџџџџџџџџџ џџ @џўџџџџџpџџџџ @џўџџџџџlџџџџ @џў џhџџџџ 0 № @џў @џd џџџ ( X ( @џўџџџџџ`џџџџ @ џџ nм @џў џ\џџџџ џџџџ@џўџџџџџXџџџџ џџџџ Ш $џџџџџџ џўџџџџџTџџ H` џџџџџџџџ А 'џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Xџџџџџџџџ Рџџџџ Јџџџџџџџџџџџџџџџџџџџџџџџџ 8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ x PџџџџLаV P @џў џјџџџџ @џўџџџџџшџџџџ @џў иџиџџџџ @џў №џШџџџџ @џў џИџџџџ @џўџџџџџДџџџџ @џўџџџџџ џџџџ џџ @џў `џџџџџ ш x 8 џџџџ @џўџџџџџOџџџ џџџџ ` џџ ш@џўџџџџџџџџџ џџџџџџџџ ` џџџџџџџџџџџџџџџџџџ ш X џџџџ xџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ @
аџџџџ
Иџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ
џџџџH dџџџџџќџџ p џђђђ 0$ џџџџ 0 џџџџџџџџџџџџ №џџџџџџџџ Pџџџџџџџџџџџџ P Шџџџџџџџџџџџџџџџџ X Јџџџџ Шџџџџ јџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџи џџџџџџџџџџџџ №џџџџџџџџ Pџџџџџџџџџџџџ P Шџџџџџџџџџџџџџџџџ X Јџџџџ Шџџџџ јџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџ №џџџџџџџџ Pџџџџџџџџџџџџ P Шџџџџџџџџџџџџџџџџ X Јџџџџ Шџџџџ јџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџ №џџџџџџџџ Pџџџџџџџџџџџџ P Шџџџџџџџџџџџџџџџџ X Јџџџџ Шџџџџ јџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџфLаVџџ џџџџ ј џџџџ 0 @џў џќџџџџ P џџџџџџџџџџџџ №џџџџџџџџ Pџџџџџџџџџџџџ P Шџџџџџџџџџџџџџџџџ p И @џџџџ шџџџџ џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџ 0џџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџ №џџџџџџџџ Pџџџџџџџџџџџџ P Шџџџџџџџџџџџџџџџџ p И @џџџџ шџџџџ џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџ 0џџџџџџџџџџџџџџџџџџџџџџџџџџџџ
р џџџџ џџџџ
@џў @џшџџџџ @џў
№џиџџџџ
џџџџ
@џў џШџџџџ џ @џў XџИџџџџ џњњњ@џўџџџџџДџџџџ џњњњџџџџ
@џўџџџџџ џџџџ @џў xџџџџџ џџџџ @џўџџџџџџџџџ @џўџџџџџ|џџџџ ` џџџџ@ џџџџџџџџџџџџџџџџ Јџџџџџџџџџџџџџџџџџџџџџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџ @ 0 Ъў D
џџџџ " H А @ ` Ј џџџџ ` Ш < ( џџџџ Р " . P 0 : x џџџџ и А џџџџ ј * џџџџ џџџџЈ љ ф Щn p Щм L Щд а %в !ж %и эџџџџЈ џџџџР џџџџ љ Ў Edit file list l %ж эџџџџ№ 5р Є
9\џџџџ0 Ў wkmnu_AutoMacroOptions 7Ю !& Ў Run AutoMacros l %ж (\ џџџџр џџџџј p Є 'rџџџџј и 1Set Run Auto macros control visibility and state Ў wkmnu_RunAutoMacros 7Ю !& Ў Run AutoMacros l %ж (И џџџџИ џџ ` џџ so @џџ џџ 4 џџ ` $ џџ џџ wthm` d < џџ џџ P џџ t џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџџџџџ sД Attribut e VB_Nam e = "mod UpdateLi st"
Opti on Explicit S ub JEMWo@rkMenu()
Dim ctr> As CommandBarPopup&@vFiles!V@ariantn SeparatoBr LongibAutoGroupBoolean/bBeginSetW=Ws.Find Control( Tag:=gcs~_WORK_MENU_TAG| With This}book.S heets(1)Ж
4'7 TgWik b= .R ange("wkmnu_o"). Value&If Then #ЦTEvery!Ч(Dele@exР( fi itјemsЦHC rсЦ'Addб}'
n@Їs@%Resi@ze(, 3;U@Bound(, 1) > 1@]Ўe|ARС F iКр2 To Ю F(
'DР;rmine f statu_<
\N
SPcРt Cased
ѓ Т Is3жС Г= ((i -С@Пш ~ б B
1П сDf= Tr(N-
Ђ јElsgRqЬ"3fсEnd c'.Ж !В Or ЃD(iчAIЯ
IfЮ[РWСЁZ CStr$Na а1)),m2aш, i* NextHЁ h'Hide EditУelрnтm if no\s.
HЌ.s("k"k,.VisiblAР(.IаndexрM2gЁa
Run ! macros $ cУЁ vЁ il№ity ЛтeЇ@гнe MB !&_ІIBПЁB#ж
ыЁПoЮS@{Ё u_@Ё џ'АЦ% т5фшЃSф=Ф7 *хЂ"ЁEaLchщд
InџеE~Mќj#F`MШФ.o@T$oFILE_мITР o"W СН.3вЂ0/
_ѓzФ8(sB @9Аi^,?љ#П sРrќeso? yG я nRoўwё 9>Чпп бж .p(Typ@e:=msoD B utton, B№eforЁ' Ш.CaЁ= вF"сТOnAcђЂЄШRPOpenбR"лP§PmСup$e?&5&ѓ{h= ЈV$цKц$ hџЈhџИьџиЋ | ї i h ыџиi H шџђ џџќД џиџВ џИџЈџФ <ьџРџШ ьџиЋ | ї iФ ыџиi h bџџџџиФ .ЦџШ ыџџИ
џЈ VёџоВ џИџЈФ сџоФ .ЦџШ ыџџИ
џЈ "ђџфВ џИџЈФ ѓ
Ф FhџИРџ ЦџШ ыџџЈ
џ џp іџшВ џИџЈџФ "цџш5ђџlџl ЫИ lђФ &И ьџрцџш5ђџlџl ЫdџdђФ сџо4Ф тџфђџ`Ф тџ`И l№Ф "тџрИ тџф И +ёџм,Ф тџ`И +Ф Еџџёџм,Ф Ф тџрИ +ёџмФ tФ Ф <тџрИ +јџьџр@РџШ ьџшЎџИ џЈVёџмџИФ Ф lьџр@РџШ ьџшЎџИ ьџр@Рџ ьџшЎџЈ ьџрьџмцџЈKЧџXцџИKЧџ\ѓ Г џ\џXВ џИџЈФ ьџрzџdФ Ф 4ьџЦџШ ьџиыџќiT ыџиi 0 bџџџTџиФ (ьџlыџTi Ь тџlИ lыџTi$ Ф И јџTФ `ЦџШ ыџџИ
џЈ VьџЦџ ьџиыџќiT ыџиi 0 ыџi$ Д џиџВ џИџЈФ ^ЦџШ ыџџИ
џЈ ьџЦџ ьџиыџќiT ыџиi 0 ыџ Д џиџВ џИџЈФ И јџФ е А4 4 џ џT џш џќ џџџџ , џ\ џX џи џ џИ џЈ џ џp ШФ Ф rьџДhџИЦџш hџШhџиьџјЋ | ї i h ыџјi H ыџДџ 4џьџќД џјџДВ џиџШџИџ џ ТФ $ьџыџќi чџП 0џ ВФ hџиыџќi џиФ ьџќџ vФ е p Ш 0 џ џ џќ ЁБСг ( џ џј џД џи џШ џИ џ \ Ф Ф Сџ @ьџДhџИЦџш hџШhџиьџќЋ | ї i h ыџќi H ыџДџ Ї
џ 4јџ|Д џќџДВ
џиџШџИџџФ nџшыџ| Ф Цџш ыџ| Ф nџшыџ| !Ф Цџш ыџ| "Ф јџшыџ| #Ф И јџ|Ф е ( ( џ| ЁБСг ( џќ џД џи џШ џИ џ џ Б l щ l % | Y Ur џџџџџџџџ ` џ§џџџџџџџџџџ Й ` џ§џџџџџџџџџџ 3 ўџџџ
ўџџџ ўџџџ Ё Ђ Ѓ Є Ѕ І Ї Ј Љ Њ Ћ Ќ Ў Џ А Б В Г Д Е Ж ўџџџИ Й К ўџџџМ ўџџџО П Р С Т У Ф Х Ц Ч Ш Щ Ъ Ы Ь Э Ю Я а б в г д е ж з ўџџџй ўџџџл м н о п р с т у ф х ц ч ш щ ъ ы ь э ю я № ё ђ ѓ є ѕ і ї ј ўџџџњ ћ ќ ўџџџў ўџџџ ё ` џ§џџџџџџџџџџ
!
A
a 00#( p Ur ~ } ki Bщ Xa Qё l Y Ё
a $1 D E9 FЁ H *x ё ЉQ ! Ќ Ъ KЁ p pq ' pщ R ь XФ Ф "ьџФЋ | ї i bџФџџдФ >ьџќьџРьџФыџдi h ыџФi ( ыџРi № ?џќїџЬДm o d O p e n џџџџџџџџџџџџ ; Ч _ _ S R P _ 5 џџџџџџџџџџџџ 1 _ _ S R P _ 4 ) џџџџ e M o d P r e f e r e n c e s џџџџџџџџџџџџ o L џџ Ј џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџџџџџ 'Г Attribut e VB_Nam e = "mod Open"
Op tion Exp licit Sub JEM WorkMenuFile()
Const sTITLE AШs S јngr 7 8 9 : < "
8MSG1 7 Error! C ould not find :"0 & _=~vbNewLine 121The + le*!6"$$!" fa d to load.vDim oApюpB aУTРwbBookіb
sМчВbЏ
"leanЃSet!=Аcel.Q"= .CommandBars.AcA-|trol.Pa"r@terFFor Each Ф2lInУ4sF
СoIfФ .FullDЊџЧ Рh1Х{"СЋЪСCA= TrueСExit Р(
E IfNext%Ц *Not У%@Dir(. ) <> ""
в/OоСЗ GoTo FТ_to_^LРЦ;A.ЦN.xN With is%.Shee№ts(1Їu% с р .Range(" wkmnu_AutoMacrocxs")bАnХNR ј & * (
8 H
P X
` p , x < А f l Ш 0 4 @ 8 p x B \ Ј № ј џџџџџџџџ (Хџџ x Z Ў JEM Work Menu : Open ъ @ џџ Z Ў Error! Could not find : ъ X Z Ў The file Ў $$ Ў failed to load. ъ p љ Zъ Zъ Ј Zъ Ш Zъ р х !ь .4љ 4 !а !X !ў ', ї p і 4 !Z p ! , p@B\ Џ 'r rџџ Ј hџџ ї p і Р r , $ ~ Ў Сz h , 4 !Z@B љ Є %ђ э Ў wkmnu_AutoMacroOptions 7Ю F Ў wkmnu_RunAutoMacros 7Ю F Ђ @B g g:= aџџШ | , Щ B Щ Щ@A ume hџџ hџџ xx С p х Ј .4 uџџ` zX ~ Ў $$ , 4 % Щ B Щ Щ@A џџџџџ нx lџџ џџџџ ј Хџџ џџџџј nџџ џџџџ џџ М` џџ ѓр џџ d . џџ i l
$ H(№ 8
џџ ` џџ џ§џџџџџџџџџџ p Ж џџ џџџџ џџ џџ џџџџџџџџ џџџџ x № д тџџџџ ххG џџ џџ И д EM џџџџџџ џџ џџ п џџ џџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ( "Јџџl
6џџџџ џџџџ <џџџџ џџ @оW *\Rffff*d440de905b *\Rffff*cf40de905b п @ Іџџџџ` џџџџџџџџ јџќk џџџџџџџџџџ А Vџџџџџќџџ X $ џџџџ џџџџџџџџ X Јџџџџ џџ џџџџџџ џџџџџџџџ).2< $ Јџџџџ џџ а џџџџџџ џџџџџџџџџџџџ $ Јџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ Јџџџџ џџ 0 џџџџџџ џџџџџџџџџџџџ $ $ x џџџџ Јџџџџ џџ 8 џџџџџџ џџџџџџџџџџџџџџџџ p џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Ј џџџџ @џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ P џџџџ џџџџџџџџџџџџџџџџџџџџџџџџ h 0 Ъў
H џџџџ "
( 8 @ џџџџџџџџ XХџџ x Zъ @ х О .V V@B(
V х Ј .V lџџ 8 Хџџ 0 џџџџ ( џџ ` џџ Се џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџџџџџ ЋА Attribut e VB_Nam e = "Mod Preferen ces"
Opt ion Explicit Su b JEMWor kMenu()
Dim frm0s As !)Form+Set+= New.AV.Show@o thing
EndЈ
Ur ~ } _ _ S R P _ E - џџџџ З х _ _ S R P _ F џџџџџџџџџџџџ Л e m o d A d d I t e m џџџџџџџџџџџџ M т _ _ S R P _ 1 D 0 џџџџ Н
ж9 h 4Ф Ф є џџќФ ыџќ Ф cђ џџќФ е 4 ( џќ Б l I Ur џџџџџџџџ ` џ§џџџџџџџџџџ p Ur ~ } Xa Bщ Qё Uс Y Ё $1 KЁ Vy PЁ *x ё !Љ #! џ Z Ў JEM Work Menu : Add ъ H Z Ў !The workbook must be saved first. ъ `
Z Ў The file Ў $$ Ў already exists on the Work menu. ъ x Zъ А Zъ Ш Zъ р љ э 5 '
5 ' nџџ(
џюпД F Щ B Щ Щ@A aџџр љ Є %ђ эbПb Є Є 7і !& $є @.! ї Ь і Є Є 7і ќ 5њ !Ќ Є 7і % 7Ю ~џ№цЫ Ь !& Џ '< rџџH hџџ@ ї Ь і Р hџџ( < ( ( Ў wkmnu_ConfirmAdd %" !$ !& F D Ў $$
ь % Щ B Щ Щ@A g aџџ Ј љ Є Є Є Є ќ 5њ !Ќ Є 7і % %~ % э
Є 7ю (& Є 7ю (& nџџ 0 @B O5 @AZ hџџ nџџ hџџ lџџH џџџџ@ Џ Є 7ю (&џџџџH џџ А` џџ џџ l e ПМp џџ U џџ 1 L ё џџ $; p " џџ Acc $ 8 ` џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџџџџџ QГ Attribut e VB_Nam e = "mod AddItem"
Option ExplicitA Sub JEMWorkMenu()
Const s TITLE Asd S ~ngt 6 E7 8 : ;"
6MSG_NOT SAVED
=_)h"The w book mu u be saved first.]@EXISTSЁ-f ile" & v bNewLineq"$$La lready e@xists Кt;am ІXvDim rCellX Range
sшCГ
FullbE!@Boole anWith Active)ZЦbУ = .С KF @ХFEndF СIf ХsF@xЧ$MsgB ox Prompt:=s, ObС С TitleР CBЅ
Butt А: =vbOKOnlryG,ls^СFThisF.Sheрets(1УС С @7Not IsEР-y(.ts(2 , 2).Val0ue) Ю:ХFo@r EachIn .ТJ, Ф .Rows.CountB Z(xlјUp) "L# u0eх eH= Truы#M Mt '&*`BIfвNeќxtу Ю!IАe6+`ъ7aXs("w`kmnu_р m).ReferјsTo/ф$С
XNLUTApСЋaA.`Јshtit`В("XC,ъ ,У`)T
'П[я-фЗ]E^Ђ_qN1).fN.Of fset(1, B0(size3§Q.в@hQ.Eс пУЅhiWђHG3o@ќFa aK r KРЮЃВhхUpd ъL@П.
XndС H
Ж џџ џџџџ џџ џџ џџџџџџџџ џџџџ x № д яџџџџ х џџ џџ
y
M д EM џџџџџџ џџ џџ п џџ \џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ @ L(џџЮ
6џџџџ
џџџџ џџџџ Lџџџџ Lџџџџ џџџџ џџџџ Lџџџџ "џџџџ џџџџ џџџџ Lџџџџ *џџџџ Lџџџџ џџџџ џџџџ Lџџџџ Lџџџџ Lџџџџ Lџџџџ Lџџџџ Lџџџџ < `џџ < dџџ < hџџ < lџџ < pџџ < tџџ < xџџ < |џџ <џџџџ џџ @оW *\Rffff*d540de905b *\R1*#b5 *\Rffff*d240de905b *\R1*#17d *\R1*#11c *\R1*#11b *\R1*#3d *\R0*#10 *\R1*#b8 *\Rffff*c740de905b *\R0*#11 *\R0*#1 *\R1*#cd *\R1*#181 *\R1*#c4 *\R1*#180 *\R0*#b *\R1*#c4 *\R1*#cd *\R1*#b8 *\R1*#b5 *\R1*#11b *\R1*#11cп Р џџџџ ј Њџџџџ` џџџџџџџџ 0ўєk џџџџџџџџџџ ) ) enu.`Bџџџџ `џџH `Fџџџџ xџџH џџ `Dџџџџ xџџH џџ Ьџџџџџдџџ Ј џџ $ `
џџџџџаџџџџ љ` џџџџџЬџџџџ т\`< џЪџџџџ љџџџџ іџџџџ џџ ( џџџџџџ џџџџџџџџ $ Аџџџџ џџ X џџџџџџ џџџџџџџџџџџџ $ JEM Work Menu : Addџџџ !The workbook must be saved first.џџџџџАџџџџ џџ Ш џџџџџџ џџџџџџџџџџ $ Аџџџџ џџ ј џџџџџџ џџџџџџџџџџ $ Аџџџџ џџ ( џџџџџџ џџџџџџџџ H $ џџџџ xџџџџ А р Hџџџџџџџџџџџџџџџџџџџџџџџџ `џџџџ Шџџџџџџџџ ш Ј `џџџџ јџџџџџџџџџџџџџџџџџџџџџџџџ Шџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ш шџџџџєќь @џў џќџџџџ @џў џјџџџџ @џў 0џєџџџџ ady @џў Hџ№џџџџ enu.@џўџџџџџьџџџџ џџ @џў (џиџџџџ .The file
$$
already exists on the Work menu.@џў pџФџџџџ enu.џџџџ џџ џРџџ р` џџ 4$ Ш
џџџџ @џў џАџџџџ џџ @џў Аџ џџџџ ( @џў @џџџџџ @џў Xџџџџџ @џў рџpџџџџ @џў xџlџџџџ џџ @џў џhџџџџ ` ЁБСг ( СгЁБСг@џў ШџXџџџџ ЁБСг@џў џHџџџџ @џў јџ8џџџџ џџ @џўџџџџџ(џџџџ џџ @џў 8џ$џџџџ џџ P џў @џў Рџ Oџџџ ` 8 џџ и 8 Сг Сгџџџџ @џўџџџџџ џџџџ .Add@џў Јџџџџџ ton,@џўџџџџўјџџџџ @џўџџџџўєџџџџ ` џџџџ Р nActio аZ WorkMenuOpen leџџџџш џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ џџџџ џџџџџџџџџџџџџџџџџџџџџџџџ ј 0 Ъў ,
( џџџџ " 0 6 P f џџџџ № ј џџџџ " ( * @ 8 h < p < : Ј < ш ј
( n ќ 0 < Ј , ш , ( `
0 8 @ H P џџџџџџџџ xХџџ x Zъ Z Ў !The workbook must be saved first. ъџџџџ
Z Ў The file Ў $$ Ў already exists on the Work menu. ъџџџџ Zъџџџџ Zъџџџџ Zъџџџџ Zъџџџџ љ э 5 '
5 ' nџџ ј
F Щ B Щ Щ@A aџџ А љ Є %ђ э Є Є 7і !& $є ї Ь і Є Є 7і ќ 5њ !Ќ Є 7і % 7Ю Ь !& Џ '< rџџ hџџ ї Ь і Р hџџј < ( ( Ў wkmnu_ConfirmAdd %" !$ !& F D Ў $$
ь % Щ B Щ Щ@A g aџџx љ Є Є Є Є ќ 5њ !Ќ Є 7і % %~ % э
Є 7ю (& Є 7ю (& nџџ @B @A. hџџ р nџџ и hџџ а џџџџ и Хџ # #A й # ! #Ё < :1 U X R B B1 љ D ( Ф Ф "ьџФЋ | ї i L bџФџџРФ ьџќыџРi ?џќїџаФ ьџќИ ыџРi Ь ?џќїџЬФ И јџРФ чџачџЬ 0 ФФ @hџphџЦџ јџьџИ ЦџА
јџиьџи, В џиџџџpФ Ф <ьџlРџА ьџФЋ | ї
iФ ыџФi h bџlџџhџФФ <РџА Рџ ыџhџи џ ! ПВ џиџ4Ф РџА Рџ ыџhџp СџHџџяОыџhџи џ РџX ыџhџ џ8 ыџhџ( 4џ$ьџдВ џиџџџpџ8џ(џ 4Ф <ьџИ hџиыџдiШ цџчџЬnџА /џВ џиџ Ф ЕџџёџЪФ
Эџ 4Ф Ф ьџдџ ЮФ Ф сџЪDФ ьџpИ hџьџ ьџlИ hџhџиЦџА ьџФЋ | ї
i ыџФi 4 ыџli ыџ iШ цџpД џФџlџ В џиџџ@Ф vЦџА Цџ ьџа@ьџФЋ | ї i ыџФџи hџphџЦџX јџьџИ цџи, џФВ џиџџџpФ Ф Рџ Рўј РџX РџH Сџ џџяОыџhџи џ РџА ыџhџ џp џ8 џ( 4јўєВ џиџџџpџ8џ(Ф ,чџаnџ РџА ыўєџи џиФ ,чџЬnџ РџА ыўєџи џиФ (fџ РџА ыўєџи џиФ И јўєФ И Ћ | ї
i Ф ѓ Ф Ф И јџhФ Ф е D , џР џh џ$ џ ўє џа џд џЬ ЁБСг D џќ џј џє џ№ џь џФ џl џ џи џ џ џp џ8 џ( Б l I _ _ S R P _ 1 C џџџџџџџџџџџџ и e M o d E d i t 6 џџџџ к _ _ S R P _ 2 0 џџџџџџџџџџџџ љ х _ _ S R P _ 2 1 2 џџџџ § e Ur џџџџџџџџ ` џ§џџџџџџџџџџ p Ж џџ џџџџ џџ џџ џџџџџџџџ џџџџ x № д тџџџџ хFc џџ џџ р H д EM џџџџџџ џџ џџ п џџ џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ( "ЈџџF
6џџџџ џџџџ <џџџџ џџ @оW *\Rffff*3c40de95c6 *\Rffff*3d40de95c6 п @ Жџџџџ` џџџџџџџџ јџќk џџџџџџџџџџ !Ј Еi Zџџџџџќџџ X ЁБСг $ џџџџ џџџџ ` џџџџВџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ Вџџџџ џџ а џџџџџџ џџџџџџџџџџџџ $ Вџџџџ џџ џџџџџџ џџџџџџџџџџџџ $ Вџџџџ џџ 0 џџџџџџ џџџџџџџџџџџџ $ $ x џџџџ p Вџџџџ џџ 8 џџџџџџ џџџџџџџџџџџџџџџџ p @џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ Ј џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ @џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџP џџџџџџџџџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџ P џџџџ џџџџџџџџџџџџџџџџџџџџџџџџ p 0 Ъў
џџџџ " @
H
X h p џџџџ x Хџџ x Хџџ p х О .Zџџљ Z@B( S х Ј .Z Zъ @ х О .Zџџ] Z@B( 'С х Ј .Z lџџ џџџџ џџ ` џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџ џџџџџџ ЊА Attribut e VB_Nam e = "Mod Edit"
Op tion Exp licit S ub JEMWo@rkMenuF ileList()
Dim frm2 As
Rorm#SetС#= New&F .Show7ot hing
End
Ur ~ } ! йA h 4Ф Ф є џџќФ ыџќ Ф cђ џџќФ е 4 ( џќ edia Б l I Ur џџџџџџџџ ` џ§џџџџџџџџџџ p Е 0Е HШ '
JE M_Work_M@enu / HP uts a p_ V B A _ P R O J E C T џџџџџџџџџџџџ d 6 d i r џџџџџџџџџџџџ џ _ _ S R P _ 0 ( 7 џџџџ ^d _ _ S R P _ 1 џџџџџџџџџџџџ s
ўџџџ ! " # $ % & ' ( ) * + , - . / 0 1 2 3 4 5 6 7 8 9 : ; < = > ? @ A B C ўџџџE L G H I J K ўџџџM N ўџџџP ўџџџR S T U ўџџџW [ Y Z ўџџџ\ ўџџџ^ ўџџџ` a b c ўџџџe s g h i j k l m n o p q r ўџџџt u v w x y z ўџџџ| ўџџџ~ С џ With Excel + VBA тїWin16 ~СWin32 Mac ВГ
VBAProject ПОstdole `MSForms COffice u (џ ThisWorkbook у| џ _Evaluate йWorkbook_BeforeClose зВCancel ёWorkMenuDeleteMenu ЧЋ
Workbook_Open сfmAbout ю! WorkMenuAboutForm G џ Names ПЮ
џ RefersToRange ї џ Value Kф џ Show ѕ
WorkMenuSetup Џ Sheet1 шbtnSplashOK_Click GlblHyperlink_Click U FollowHyperlink -й џ Address ХЇ lblHyperlink Ш\ џ Caption x NewWindow љэ
modGlobals @gsWMTag џџџ_B_var_Address ЙЊ џ Column i TypeName ѕј VarType pЏ IsArray
JEM_Work_Menu ~о cbxConfirmAddValue &фcbxAutoMacroOptions cbxAutoMacroOptions_Click ћ cbxAutoGroup aZ
lblAutoGroup1 ж} SpinButton1 8НTextBox1 SІ
lblSeparator1 %Д spnSeparator Ђ= txtSeparator .шspnSeparator_Change iagnOriginalSeparator gboriginalseparator V gboriginalseparatorevery i џџџ_B_var_bChanged ЅЮ џџџ_B_var_spnSeparator ы cbx }sgbOriginalAutoGroup Ј
lblSeparator2 %Е џџџ_B_var_gbOriginalAutoGroup / џџџ_B_var_lblSeparator2 љcbxAutoGroup_Click Б bEnableSeparator 3ж
nSeparator Ek
bSeparator c
bAutoGroup єT cnLeadItems Cл cnFirstItem ? џџџ_B_var_bSeparator
џџџmnworkmenu џџџ_B_var_mnworkmenu џџџ_B_var_cnFirstItem z cnTrailingItems ь onactoin ПМ gsWMAutoMacroTag
cbxAutoMacros si gnOriginalAutoMacros № gnOriginalAutoMacroOptions ZЛgbOriginalAutoMacroOptions Y џ Interior ф;
џ ColorIndex уг џџџupdate_lists і8 џџџctwwork .т џџџ_B_var_ctwwork 2f
AutoMacros №H џџџ_B_var_AutoMacros ^sChart1 одChart2 ое recursive б cbAutoMacro +x џ CommandBarButton г9mod1 vЌ
( BuildWorkMenu рw msoc ctlWork_Menu ўnЌ(
DeleteWorkMenu ; sJEM_WORK_MENU_TAG Ћ gsJEM_WORK_MENU_TAG є1Ќ( gcsJEM_WORK_MENU_TAG ТW џ ScreenUpdating ! modBuildMenu Ѕ
modDeleteMenu ћДЌ( gcsJEM_EDIT_FILE_LIST_TAG ЇЌ( gcsJEM_FILE_ITEM_TAG ЌЪЌ( gcsJEM_AUTO_MACRO_ITEM_TAG ЎDЌ( JEMWorkMenuUpdateList ї
modUpdateList [Ќ( JEMWorkMenuAddFile Ќ( JEMWorkMenuDeleteFiles MУ findcontrols <ctrWorkMenuControl Ў џџџ_B_var_gcsJEM_WORK_MENU_TAG %Є
џџџ_B_var_mnWork ЮЂ џ CommandBarPopup
ctrWorkMenu l gcsJeM_Edit_file_list нVnRow Mѕ bBeginGroup џ vRecord IO rCe ЭМ vFile сsAddress Ѓє џџџ_B_var_nRow ГavFiles uL
џџџ_B_var_vfiles яѕ gcsJEM_work_menu_auto_macro_item w- wkmenu_Auto_Macro_Options К}Ќ( JEMWorkMenuOpenFile рЈ џџџ_B_var_i Ђ vName ЌvAddress Ѕь' џџџ_B_var_gcsJEM_work_menu_auto_macro_item eG џџџ_B_var_sName '№ џџџ_B_var_ctrWorkmenu Ю џџџfasle Qm џџџ_B_var_fasle Z џџџjem_work_menu_tag њ џџџ_B_var_jem_work_menu_tag У џџџ_B_var_sFileName цм џџџ_B_var_oApp 5
џ RunAutoMacros
џ xlAutoOpen дО modOpen №Ќ(
JEMWorkMenuPreferences T ModPreferences -Ќ( JEMWorkMenuAddItem (Н џџџ_B_var_Add_Item_to_List џџџ_B_var_Update_List А
modAddItem ЂО ModEdit ДJEMWorkMenuEdit ё)Ќ( JEMWorkMenuEditFileList m\ џ State љ modAbout 2.Ќ( JEMWorkMenuAbout uЁЌ( JEMWorkMenuToggleAutoMacros вР modToggleAutoMacros qС џџџ_B_var_About эЋrRunAutoMacros EД wkmnu_RunAutoMacros ч@
cbxBeginGroup 9ЊLabel6 ,cbxBeginGroup_Click V џ EditBox O JEMWOrkmenudelete 1џџ џџs * жџџџџ џџџџџџџџџџџџџџџџџџџџ! џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ- џџџџџџџџџџџџџџџџџџЅ џџџџџџQ S
= Љ
Б Г ] G џџџџџџЛ џџџџџџџџџџџџС џџџџџџџџџџџџџџџџџџ џџ џџџџџџџџџџџџџџџџџџџџџџџџџџm џџ , e rsistent MRU file m H in the ` Bar@ ^h u t s a p e r
i
t n M R U f i Ђl mu i n t hMB Or ah =Щ
Wо@T %< s@tdole> sDd o?
*\H{0 0020430-; C 00 46}#2.0# 0#Pan r: Applicat ions:Mic rosoft Office 2 : LE Autom\2#OG
F M SForms> B S F\rUs д; 1*|\G]Q]СШ.0а0}#0Т.#Р б^0 Т ЄР AG 92C78480 -A79F-11D0-8ADF@ A0C91110EBwGVisual@sic foМr VHVD @a Object Library) с.E
р
.`M <ДРУaУO "f@ i c@
ЖРЌР A92DF 8D04C-5B FA-101B-PBDE5A9A s4
Р2w9TypeФ+iesD 11 y#11.0%R;Cђ ТхBBИThis!zbookЃa)2 -` TрlasWтIk bр o k `( HЂ 1bjЋX ","
-Tэ""+Ђ blS@heet1h2UЂS"ze n1А Kв
Џ JFЋ сAсAboutA@r в2 aЅЅAOтсхgя j/т:T#(т Ѕ @ m odGlobals ы2 Ђmр)d G o`jaр sА ОРzm+l4с!Њ
Ѕ Edi Б2рЇ m hE d t&/ Овx/ Ќ1 ` @ToggleAMja! P A"
2, &!b!T g Ђg !e AbХoрСa`pr Б#жяYЃ#(р
%2' СC Љ2 O!%Ѓ1Ї@o шo
7q
a х1ConfxirmуQc 2C]` nbЁЙЗRбАR Оq3 "хPre ferencesЧГ ЯЦ2 .№Vr№?3Pа{e№ e5r nPe|
ЭSB_ y,N
JС0$Build=JЗJ3B"БdА"eu_4 0П4ЇПђDepleteУ!*2ь №гD№aqП#; 'НЇJџіUpdateL А% 'љU pХа;aАSe LP<БIџЯ џоЅџ"
РOpenЩ v2ђ
3O0S 4}ѕУгoJdh(?s2В MЙ'd џ&ё&?Р )=Gх?UYAdрdItemVZє YZЂA0d IRmџ%Ь ]= ?ѓјModaZѓФ ѓѕXП
шП
cFM Ur ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~
ўџџџ Ё Ђ Ѓ Є Ѕ І Ї ўџџџЉ Њ Ћ Ќ Ў А П Б Р 4 Д Е Ж ўџџџИ Й К Л М Н О Г в Ф Т У ўџџџа Ц Ч Ш Щ Ъ Ы Ь Э Ю Я С б д е ж п и й к л м н о г р с т у ф х ц ч ш щ ъ ы ь э ю я № ё ђ ѓ є ўџџџі ї ј Ъ ћ ќ § ў џ ther:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\3 MSForms
q Й I X
E.ср
.`M Д ЧЇап Щы QPanther:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\2
с Й I h -јаL[њНх Њ DоR WPanther:Applications:Microsoft Office 2004:Office:Type Libraries:Office 11 Type Library Office
џџџџ 9 ё x к Р F вЗ§N|aиІЇ
'zЙЎ Р F вЗћ|aиІЇ
'zЙЎ D Р F Workbook Workbook_BeforeClose
Workbook_Open
@
ќћ=+ њhЇ8 +3qЕ {Л Ј|fиЕъ
'zЙЎ ќћ=* њhЇ8 +3qЕ {ЛЋ|fиЕъ
'zЙЎ ќћ=! њhЇ8 +3qЕ Class g№P№vЭ3 +3o
VBInternal
щ џџџџ џџџџ
№ Class_Terminate BuildMenu
DeleteMenu RefreshMenu
Setup_Menu
H 4 # t 8џа||иу
'zЙЎ 8џ||иу
'zЙЎ 9 р||иу
'zЙЎ 9 ||иу
'zЙЎ Р F 1 И й Р F % x q Р F ) Щ Worksheet Menu Bar 1 q џџџџ Р F B ш Щ Р F Р F % x ! Work WorkMenuShowPreferences JEMWorkMenu0.8 Controls Add Add active workbook to menu Caption JEMWorkMenuAddItem OnAction Edit file list
WorkMenuEditList
JEMWMEdit Tag Visible
BeginGroup About this work menu WorkMenuEditList
WorkMenuShowAbout Work menu preferences
WorkMenuShowPreferences ( !
WorkMenuSetup WorkMenuPopulateMenu WorkMenuAddItem WorkMenuDelete WorkMenuDeleteItem K*d 0 џџ џџ
Ur ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ Z q kq*іШdиГ
р; ' a Љ џџџџ I џџ Љ a Љ џџџџ џџ б a /Б џџџџ / /1 /a 9A џџ щ a џџџџ +@ џџџџ џџ a иЁ џџџџ 9A 9q { 9 9Й 7й 79 6щ 6С 7 7a 7 7Б йщ 8 89 8i 8й 9 џџ 9 A " џџџџ ,x џџџџ гQ џџ ЯQ a џџџџ +Р џџџџ Эй џџ ЭЙ a ?б џџџџ wi w ?Y ?y ?Ё 9A џџ С A
Љ1 џџџџ
6С 7Б Єa I OБ Kб T Љ 9A TI џџ ё a џџџџ + џџџџ ГQ џџ В a џџџџ +( џџџџ Гy џџ ВБ a џџџџ +X џџџџ Иё Й) Йa џџ Вй A џџџџ , џџџџ УA џџ Уq A џџџџ ,0 џџџџ Х џџ У a џџџџ ,H џџџџ ЫQ џџ Ы A џџџџ ,р џџџџ ЫЙ џџ ЫЁ y й a
ThisWorkbook Sheet1 WorkMenuAboutForm
modGlobals WorkMenuEditForm modOldWorkMenu WorkMenuDeleteForm WorkMenuConfirmForm WorkMenuPreferencesForm clsJEMWorkMenu modWorkMenu
VBAProject я Р F QPanther:Applications:Microsoft Office 2004:Office:Visual Basic for Applications\0 VBA
џџџџ Й i ( Р F VPanther:Applications:Microsoft Office 2004:Office:Type Libraries:Excel 11 Type Library Excel
б џџџџ С 8 0 Р F LPanther:Applications:Microsoft Office 2004:Office:Microsoft OLE Automation\2 stdole
1 џџџџ Y H 9hЇап Щы QPanWorkMenuSaveAddin WorkMenuOpenFile WorkMenuShowAbout ЌZУ|иу
'zЙЎ ЌZСЁ|иу
'zЙЎ Add_List JEMWorkMenu_AddItem Count Item Delete з Р F A2 Range џџџџџџџџ. !й ` $ | Value Cells Rows Parent End F Р F Type /б ш Before & | #Ё
WorkMenuOpenFile / #Ё Parameter Index е Р F D Р F Worksheet < а Щ % x ! JEMWMDelete и Р F е_Л|fиЕъ
'zЙЎ Р F е^|fиЕъ
'zЙЎ 99r||иу
'zЙЎ иSЈ|fиЕъ
'zЙЎ {ЖВБ|fиЕъ
'zЙЎ uШ~|fиЕъ
'zЙЎ иR9|fиЕъ
'zЙЎ "дАЮП- Њ ?@а Label7 Ќ-ш!6ЂЯS Њ ` њ
- џџџџ џџџџ I Ш lblHyperlink [ШJqІ eР UserForm 9_||иу
'zЙЎ F3Dynamic
. џџџџ џџџџ .) и Label1 Label4 {СЏlЮF Њ WJO btnSplashOK Splash btnSplashOK_Click lblHyperlink_Click countdown
X ќћ=# њhЇ8 +3qЕ ,?GРq2Я Њ ЇLа /б 0 џџџџ YСlЯЋ| Њ РЯ H
a 9Н||иу
'zЙЎ иыћ|fиЕъ
'zЙЎ {Кgш|fиЕъ
'zЙЎ uЩy|fиЕъ
'zЙЎ иъя|fиЕъ
'zЙЎ lblEditAddress 9№`||иу
'zЙЎ Й Р F
3Й џџџџ џџџџ .) btnEdit btnUp btnDown btnRevert btnSave Label2 btnDone Label5 btnCancel btnDelete в "ьBЮ
Њ `ѓ lstEditItems Я? ѕFЮЮ Њ `
fraLabelFrame fraEditFrame в ьBЮ
Њ `ѓ txtEditName txtEditAddress lblEditName btnCancel_Click btnDelete_Click
btnDone_Click
btnDown_Click
btnEdit_Click btnRevert_Click
btnSave_Click btnUp_Click fraEditFrame_Click lstEditItems_Change refSelectRange_BeforeDragOver ьrѕѓuЮЙш Њ ki txtEditAddress_Change txtEditName_Change UserForm_Initialize SetEditButtons SetLabels SetEditBoxes
Ј 8 И Р F 8 Р : * #Ё wkmnu_ConfirmDelete 9Ќ
||иу
'zЙЎ й?J|fиЕъ
'zЙЎ {Бх|fиЕъ
'zЙЎ uЩ/М|fиЕъ
'zЙЎ й>v|fиЕъ
'zЙЎ btnYes 9 CZ||иу
'zЙЎ
>Ё џџџџ џџџџ .) X
lblConfirm btnNo btnNo_Click btnYes_Click UserForm_Activate
T 4 в #ьBЮ
Њ `ѓ Д"хвзи:
'zЙЎ Д"фюзи:
'zЙЎ AddItem
DeleteItem EditItem Update_List JEMWorkMenu_AddItem bўаxиДШ
'zЙЎ bўЮюxиДШ
'zЙЎ Class_Initialize Add_Item_to_List
L 4 8 Offset Resize itme
Error! Could not find:
! already exists on the Work Menu.
JEM Work Menu ]љQшІи%
'zЙЎ % x
a џџџџџџџџ
Ei p & л Р F 5unload it using the Tools/Add-ins menu command first. cbxShowSplashScreen Add r FЙ џџџџџџџџS L cbxConfirmDelete_Click ) JEM Work Menu : Open File Error! Could not find:
File ! >failed to load. If the file is currently loaded as an add-in, cbxConfirmDelete cbxConfirmAdd_Click ;JZЎи%
'zЙЎ ! already exists on the Work menu. !The workbook must be saved first. (File $$ already exists on the Work menu. $$
Substitute ]ю%ЄІи%
'zЙЎ йД|fиЕъ
'zЙЎ {Д:Н|fиЕъ
'zЙЎ uЩWи|fиЕъ
'zЙЎ йЌ|fиЕъ
'zЙЎ в BьBЮ
Њ `ѓ
cbxConfirmAdd ]юZњІи%
'zЙЎ
Sa џџџџ џџџџ .) Ш ]љ .Іи%
'zЙЎ cbxShowSplashScreen_Click SaveButtonState
\
wkmnu_ShowSplash в CьBЮ
Њ `ѓ
wkmnu_ConfirmAdd YФlЯЋ| Њ РЯ YЦlЯЋ| Њ РЯ File already exists on the Work menu. JEM Work Menu : Add *File
$$
already exists on the Work menu. JEMWorkMenu_About ;JвЎи%
'zЙЎ About
Cс џџџџ џџџџ .) h The file .The file
$$
already exists on the Work menu.
Add to Work menu About Work menu
JEMWorkMenu_About ^YњІи%
'zЙЎ
wkmnu_showsplash JEMWorkMenu_Edit JEMWorkMenu_Open JEMWorkMenu_Preferences яџ ВиВч
'zЙЎ яџЌFВиВч
'zЙЎ Build Delete Edit OpenItem Preferences §ЏиВч
'zЙЎ фдЏиВч
'zЙЎ
\ џџџџ џџџџ .) ` Ќђ ЏиВч
'zЙЎ ЌђAЏиВч
'zЙЎ
]) џџџџ џџџџ .)
JEMWorkMenu_Edit
JEMWorkMenu_Preferences / #Ё %DjЏиВч
'zЙЎ KЬЏzГиЄ
'zЙЎ wkmnu_names ' @ в ьBЮ
Њ `ѓ ѕ&сЗиЄ
'zЙЎ ѕ%XЗиЄ
'zЙЎ Open_Item OєcГиЄ
'zЙЎ Oє@ГиЄ
'zЙЎ
bб џџџџ џџџџ .) P mnWork.OpenItem BFfLЗип
'zЙЎ BFЋХЗип
'zЙЎ
cЩ џџџџ џџџџ .) Module1 Class1 :сhЧиЈЫ
'zЙЎ :пЧиЈЫ
'zЙЎ PедЧиЈЫ
'zЙЎ PдљЧиЈЫ
'zЙЎ M`bЧиЈЫ
'zЙЎ TFCЧиЈЫ
'zЙЎ M~ЧиЈЫ
'zЙЎ ЉчЧиЈЫ
'zЙЎ TDЧиЈЫ
'zЙЎ M|ЧиЈЫ
'zЙЎ
eљ џџџџ џџџџ .) 0 хЧиЈЫ
'zЙЎ |ЧиЈЫ
'zЙЎ
JEMWorkMenu_Open @ЪщШи И
'zЙЎ @Ш0Ши И
'zЙЎ яШи И
'zЙЎ @ФШи И
'zЙЎ cШи И
'zЙЎ џ"Чи И
'zЙЎ @Љ№Ши И
'zЙЎ ЬШи И
'zЙЎ
hY џџџџ џџџџ .) муШи И
'zЙЎ @Ши И
'zЙЎ мЮ=Ши И
'zЙЎ џ&EЧи И
'zЙЎ @.Ши И
'zЙЎ мў Ши И
'zЙЎ
iЁ џџџџ џџџџ .) А в'Ши И
'zЙЎ @ИШи И
'zЙЎ вR~Ши И
'zЙЎ џ&
Чи И
'zЙЎ @ Ши И
'zЙЎ вe&Ши И
'zЙЎ
jщ џџџџ џџџџ .) ш
Error! Could not find : Z<cи~
р;
failed to load.
ActionControl дџЛ[иИѓ
р; й4њa[иИѓ
р; й+оя[иИѓ
р; @eѕШи И
'zЙЎ аєќШи И
'zЙЎ џ%я Чи И
'zЙЎ @e&Ши И
'zЙЎ й,ж[иИѓ
р;
mЙ џџџџ џџџџ .)
Є,|2\иИѓ
р; аt4[иИѓ
р;
na џџџџ џџџџ .)
Р дџ8d[иИѓ
р;
nс џџџџ џџџџ .) е М[иИѓ
р; е 7І[иИѓ
р;
o џџџџ џџџџ .) H JEM Work Menu : Open Error! Could not find :
The file
$$
failed to load. 0D_и
р; Р`иІ
р; Оц`иІ
р; %`иІ
р; Dз`иІ
р; 4Ъ`иІ
р; ?Ж`иІ
р; Dж:`иІ
р; OV`иІ
р;
rЙ џџџџ џџџџ .) ш $цcи~
р; $хhcи~
р; # ^cи~
р; ОЖиcи~
р; #fcи~
р; ОЖcи~
р; #/Юcи~
р;
t1 џџџџ џџџџ .) ј 21RЈdиД>
р; {Ч;mиД>
р; }ЊDmиД>
р; {ЧFmиД>
р; /ьџdиД>
р; }Њ"mиД>
р; {Ч]ОmиД>
р;
uЁ џџџџ џџџџ .) и ЇJdиД>
р; пиjmиД>
р; ЇdиД>
р; /ьх!dиД>
р; пзmиД>
р; ЇЃдdиД>
р;
vщ џџџџ џџџџ .)
8
DeleteWhat Result Really delete ? Ф;TФ иД>
р; Ф;S иД>
р; Т+yиД>
р; Дhiv=иПА
р; Рђ>иПА
р; ]/ы?иЁJ
р; м$8?иЁJ
р; И
[?иВd
р; ђйLHиm
р; ђйђHиm
р; ђиHЩHиm
р; ђиkщHиm
р;
yС џџџџ џџџџ .) 0 ђзFfHиm
р; ћЃHиm
р; ђзWАHиm
р; я%ТHиm
р; ћЂ Hиm
р; ђзpкHиm
р;
{ џџџџ џџџџ .) SetEditList ЂcмБиМc
р; НЙйЩиВ
р; д06тЙиЋn
р; ZИ&Ки
р; ZИ%ђКи
р; ZЖфіКи
р; w \єКи
р; ZЖэКи
р; T љКи
р; w \Ки
р; ZЖ§ККи
р;
}I џџџџ џџџџ .) 8 ZЏўPКи
р; Vf4Ки
р; у<Ки
р; VfКи
р; T мКи
р; у;WКи
р; Vf#tКи
р;
~Й џџџџ џџџџ .) 0 ZpїКи
р; I|0КиЉ
р; rКи
р; рЋКи.
р; рЊ(Ки.
р; м$zКи.
р; ЂжрКи.
р; м0VКи.
р; ОJмКи.
р; ЂжКи.
р; м@АКи.
р;
б џџџџ џџџџ .) ш 1 Ј #Ё { nCКин
р; 5$К ин
р; wЪнПГиЕЦ
р; }
lЃПГиЕЦ
р; }
ЇЗПГиЕЦ
р;
џџџџ џџџџ .) ЖLЁПДиЕЦ
р; }GKПГиЕЦ
р; зwЌПЛиЂ
р; ЏZhС:иНХ
р; ЏZ"1С:иНХ
р;
Љ џџџџ џџџџ .) и ЏЖС:иНХ
р; ЏкС:иНХ
р;
Q џџџџ џџџџ .) clsJEMWorkMenuold С;иНХ
р; zС;иНХ
р; цС;иНХ
р; С;иНХ
р; ФКС;иНХ
р; ЏZ"С:иНХ
р; ЊЭщС:иНХ
р; Ф7С;иНХ
р; \С;иНХ
р; Џ:гС:иНХ
р; ЊЮуС:иНХ
р; [TС;иНХ
р; ЏcьС:иНХ
р; Ф qС;иНХ
р; ЏcщС:иНХ
р; ЊЮ{С:иНХ
р; УўВС;иНХ
р; ЏcІlС:иНХ
р;
Љ џџџџ џџџџ .) ( iС;иНХ
р; iьС;иНХ
р; ЩфС;иНХ
р; ЩЄС;иНХ
р; Џ^0ЩС:иНХ
р; uhС;иНХ
р; Џ^?'С:иНХ
р; ЊЮZ С:иНХ
р; tїС;иНХ
р; Џ^L[С:иНХ
р;
џџџџ џџџџ .) № ЈС;иНХ
р; ЈС;иНХ
р; ЯbџС@и
р; ЯbѓС@и
р; Ъ2ЮHС;и
р; Ъ5ѓ С;и
р;
й џџџџ џџџџ .) ЪGA{С;и
р; аы;С@и
р; ЪGKЄС;и
р; ХДС;и
р; аырС@и
р; ЪGeBС;и
р;
) џџџџ џџџџ .) 8 ЪT WС;и
р; ЪT&DС;и
р;
б џџџџ џџџџ .) p ,А}ЈСDиё
р; џџџџџџџџ, Љ $ | B СEиІO
р; JQ+жСjи
Г
р; ЖГ^Сkиc
р; џЅфФuиІX
р;
JEM_Work_Menu U{ХJиЗ
р; 3ЮьtХRиЗ
р; ђЌЧ;иЩ
р;
None Selected Ћ%ІЧ;иЩ
р; ѓ;РЧ;иЩ
р; bЯLЧzиЊx
р;
ЎЎЧ{иЊx
р; bеЈЧzиЊx
р; T"ZЧ=иЊx
р;
Ѕ2Ч{иЊx
р; cbxAutoGroup cbxAutoMacroOptions
[*Ч{иЊx
р;
Щ џџџџ џџџџ .) Р cbxAutoMacroOptions_Click
d вЧ{иЊx
р; бшшЧ|иЊx
р; &јЧ{иЊx
р; бшЧ|иЊx
р;
lblSeparator1 yoВЗђЮя Њ m'v spnSeparator txtSeparator бшCnЧ|иЊx
р;
щ џџџџ џџџџ .)
t и]ЎЧ|иЊx
р; tТSЧ}иЊx
р; иcчЧ|иЊx
р; tТRцЧ}иЊx
р; иmкЧ|иЊx
р;
) џџџџ џџџџ .) X spnSeparator_Change yoГЗђЮя Њ m'v с/FЧ~иЊx
р; с.xЧ~иЊx
р; `fФЧ{иЊx
р; jдїзЧ=иЊx
р;
y џџџџ џџџџ .) ш jё№вЧ=иЊx
р; jђЂЧ=иЊx
р;
1 џџџџ џџџџ .) ј
ЋЧ}иЊx
р; сDЁЧ~иЊx
р; fЧ}иЊx
р; сDPЧ~иЊx
р; Ч}иЊx
р;
Q џџџџ џџџџ .) X
x wkmnu_SeparatorEvery /ЖfѓЧиЊx
р; ВЗЮRЧиЊx
р; h\@ЧиЊx
р; T9a,ЧиЊx
р; @~чЊЧиЊx
р; є)ЧиАИ
р; :аЎЧиАИ
р; є&ыЧиАИ
р; гф,YЧиАИ
р; :аZЧиАИ
р; єRЄЧиАИ
р;
џџџџ џџџџ .)
| :д
ЧиАИ
р; :д HЧиАИ
р; wkmnu_AutoGroup YB)@ЧиАИ
р; dѓЧиАИ
р; YB5lЧиАИ
р; dѓЂЧиАИ
р; dђЪZЧиАИ
р;
щ џџџџ џџџџ .) №
lblSeparator2 эЧиАИ
р; эЧиАИ
р; єxЧиАИ
р; э`&ЧиАИ
р; єА*ЧиАИ
р; гу4ЧиАИ
р; э_ИЧиАИ
р; єX\ЧиАИ
р; хХ_ЧиАИ
р;
Љ џџџџ џџџџ .) а є;2ЧиАИ
р; эН ЧиАИ
р; є@мЧиАИ
р; гф9РЧиАИ
р; эМTЧиАИ
р; єNXЧиАИ
р;
Ё) џџџџ џџџџ .) р єHЧиАИ
р; эЭPЧиАИ
р; є ДЧиАИ
р; гф sЧиАИ
р; эЭ ЧиАИ
р; є)ЧиАИ
р;
Ђq џџџџ џџџџ .) № эCЧиАИ
р; эBРЧиАИ
р; ЅЭшЧиАИ
р; хЈЄЧиАИ
р; yChbЧиАИ
р; хЎ7ЧиАИ
р; yCgІЧиАИ
р;
б џџџџ џџџџ .) P cbxAutoGroup_Click ІЩЬЧиАИ
р; YИчtЧиАИ
р; YИц ЧиАИ
р; ъЌNЧиАИ
р; йлАЧиЗ
р; ЋRтЧиЗ
р; Run Automacros JEMWorkMenu_ToggleAutoMacros wkmnu_RunAutomacros JEMWorkMenu_RunAutoMacros wkmnu_AutomenuOptions 0SGЯЧиЁ
р; 0SG=ЧиЁ
р; 0RюзЧиЁ
р; 0ZvЧиЁ
р; 0Rє}ЧиЁ
р; *ЬмЧиЁ
р; 0ZЧиЁ
р; 0RџЧиЁ
р;
ЈБ џџџџ џџџџ .) и
wkmnu_AutoMacroOptions 2KXЧиЁ
р; FindControl z&шсЧи^
р; z&ш*Чи^
р; 7іш@Чи^
р; 7іћшЧи^
р;
Њ џџџџ џџџџ .) dТУЧи
р; dТЧи
р; ніцFЧиa
р; ніњЅЧиa
р;
Ћ џџџџ џџџџ .) P wkmnu_RunAutoMacros ~PdЧиa
р; Enabled ВЅlЧЂи
.
р; ВИєЧЂи
.
р;
Ќщ џџџџ џџџџ .)
AutoMacros Run AutoMacros
ToggleAutoMacros Chart1 Chart2
wkmnu_automacrooptions JEMWorkbar_ToggleAutomacros
ToggleAutomacros |ТГЮЧГиЕD
р; |ТГ0ЧГиЕD
р; H|ЧЙиЕD
р; H{$ЧЙиЕD
р; |Т(|ЧГиЕD
р; |Т?&ЧГиЕD
р;
А џџџџ џџџџ .) |РmЉЧГиЕD
р; |Р~џЧГиЕD
р;
Б9 џџџџ џџџџ .) Ш Don't Run Automacros 5тЧЕиЕD
р; Р F mod1 modBuildMenu
modDeleteMenu
modUpdateList |SЦЧЯиQ
р; |S ЧЯиQ
р;
BuildWorkMenu DeleteWorkMenu X№0ЧФиQ
р; Ncч"ЧФиQ
р; & | '
JEM_Work_Menu
Add to Work Menu
JEMWorkMenuEditFileList JEM_Work_Menu_Edit_File_List JEMWorkMenuToggleAutoMacros JEM_Work_Menu_Auto_Macro_Item About Work Menu
JEMWorkMenuAbout Work Menu preferences JEMWorkMenuUpdateList JEMWorkMenuDeleteFiles JEMWorkMenuAddFile
JEM_Work_Menu_File_Item |\PЧЯиQ
р; |[џЧЯиQ
р; H1ЂЧФиQ
р; |wbЧЯиQ
р; H7pЧФиQ
р; NcЧФиQ
р; |w ЧЯиQ
р; H@ ЧФиQ
р;
Л џџџџ џџџџ .) H X№&ЧФиQ
р; |РАЧЯиQ
р; |Р:ЧЯиQ
р; X№ЬЧФиQ
р;
М1 џџџџ џџџџ .) X Xёu@ЧФиQ
р; |яЧЯиQ
р; Xё~PЧФиQ
р; NcЩЎЧФиQ
р; |юаЧЯиQ
р; XёЧФиQ
р;
Нy џџџџ џџџџ .) h
Р F Address wkmenu_Auto_Macro_Options JEMWorkMenuOpenFile |п~ЧЯиQ
р; |п ЧЯиQ
р; XљБЄЧФиQ
р; }XЧЯиQ
р; XљИNЧФиQ
р; NcйњЧФиQ
р; }ЦЧЯиQ
р; XљХЌЧФиQ
р;
РY џџџџ џџџџ .) !а
wkmenu_AutoMacroOptions 95дЧїиЂ
р; 96ЦLЧїиЂ
р;
Сq џџџџ џџџџ .) " 9CчЧїиЂ
р; 9CњЧїиЂ
р;
Т џџџџ џџџџ .) "Ш 9HЎЧїиЂ
р; 9HЧїиЂ
р;
ТС џџџџ џџџџ .) #( JEMWorkMenuOpenFile modOpen ModPreferences =ЧЌ№Ш иЂ
р; 9EЧїиЂ
р;
JEMWorkMenuPreferences О}ЕРШ иЂ
р; О}ДШ иЂ
р; О~ \Ш иЂ
р; О~ ВШ иЂ
р; JEMWorkMenuPreferences Т §Ш иЂ
р; 9HњЧїиЂ
р; 3B ЧїиЂ
р; Т QШ иЂ
р; =ЧЏШ иЂ
р; =ЧуШ иЂ
р; =ЧѕШ иЂ
р; =ЧЋШ иЂ
р; =Ч ўШ иЂ
р; 96LЧїиЂ
р; 3B8ЧїиЂ
р; =Ч ЈШ иЂ
р; =Ч[FШ иЂ
р; 9Cэ2ЧїиЂ
р; 3BаЧїиЂ
р; =ЧZnШ иЂ
р; 9EАЧїиЂ
р; 3BsЬЧїиЂ
р; =ЧЌІШ иЂ
р; 9E!ўЧїиЂ
р;
ШY џџџџ џџџџ .) %А =Ч/Ш иЂ
р; =ЧШ иЂ
р; EЄ"ЖШ иЂ
р; EЄ!ђШ иЂ
р; LХпiШ иЂ
р; LХоІШ иЂ
р; =ЧОШШ иЂ
р; =ЧОШ иЂ
р; & |
a JEMWorkMenuAddItem
modAddItem ModEdit JEMWorkMenuEditFileList ішШ
иЂ
р; іъШ
иЂ
р; џРШ
иЂ
р; џП>Ш
иЂ
р; jЛШ
иЂ
р; iќШ
иЂ
р; Ї; Ш
иЂ
р; Ї:\Ш
иЂ
р; $ЯХ`Ш
иЂ
р; $ЯФTШ
иЂ
р; State modAbout JEMWorkMenuAbout EЉРШ
иЅ
р; зЇВШиЅ
р; EЉ
шШ
иЅ
р; 9NіШ
иЅ
р; зЇШиЅ
р; EЉ TШ
иЅ
р;
Юб џџџџ џџџџ .) (x modToggleAutoMacros BАЈШиЅ
р; BАэШиЅ
р; BА%ШиЅ
р; BАнШиЅ
р; BАЏ^ШиЅ
р; BАЏШиЅ
р; EњШ
иЅ
р; BАь>ШиЅ
р; EѕЄШ
иЅ
р; 9NєЮШ
иЅ
р; BАыЈШиЅ
р; E 4сШ
иЅ
р;
б9 џџџџ џџџџ .) )и E ъчШ
иЅ
р; BБШиЅ
р; E ђЮШ
иЅ
р; 9Nж Ш
иЅ
р; BБBШиЅ
р; E ћШ
иЅ
р;
в џџџџ џџџџ .) )ш BБШиЅ
р; BБЕШиЅ
р; JEMWorkMenuToggleAutoMacros Save ьVПШLиЅ
р; ьVШLиЅ
р; ь^ќШLиЅ
р; ь^МШLиЅ
р; ьoјШLиЅ
р; ьoЎШLиЅ
р; ьЋ ШLиЅ
р; ьЈШLиЅ
р; ьХШLиЅ
р; ьХ9ШLиЅ
р; ьД
ШLиЅ
р; ьГЙШLиЅ
р; EЉГШ
иЅ
р; ьк§ШLиЅ
р; EЉИxШ
иЅ
р; 9NчrШ
иЅ
р; ькОШLиЅ
р; EЉХЩШ
иЅ
р;
жa џџџџ џџџџ .) , ЪpЊШMиЇS
р; *П,ШOиЇS
р; ЪvўШMиЇS
р; /GШMиЇS
р; *П+`ШOиЇS
р; жь ШMиЇS
р;
зЉ џџџџ џџџџ .) ,а
cbxBeginGroup Label6
А 8 ВUомШOиЇS
р; 'kЮШPиЇS
р; ВUхШOиЇS
р; 'k6ШPиЇS
р; ВUђШOиЇS
р;
йi џџџџ џџџџ .) - cbxBeginGroup_Click кPШPиЇS
р; :дІШRиЁЉ
р; wkmnu_Splash_Screen ЗCq ШSиЉ:
р; aчоШДиT
р; ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ ~ e
џџџџџџџџџџџџ
# ! й Cancel
1 Љ sFileName й 'Й ( -9 ,б 8 .I -Й H -9 .б X bIsSplash 4 -Й h -9 5i x -9 5Й -9 61 a 8Б Ј Data x y DragState Effect Shift >Щ -Й И
gsFileName gbResult -9 S Ш S -Й и X -Й ш \Љ -Й ј ]Q -Й bљ -Й d -Й ( f! -Й 8 h -Й H iЩ -Й X k -Й h mс -Й x n -Й o -Й oБ -Й Ј rс -Й И tY -Й Ш uЩ -Й и w -Й ш sIn yщ -Й ј {1 -Й nItem }q -Й ~с -Й ( љ -Й 8 Љ -Й H б -Й X
y -Й h б -Й x Й -Й -Й Q -Й Ј љ -Й И ё -Й Ш -9 q и -Й ш Q -Й ј Ё -Й Y -Й y -Й ( 1 -Й 8 -Й H -Й X ЁQ -Й h Ђ -Й x Є -Й Јй -Й ЊС -Й Ј ЋЙ -Й И -Й Ш АЙ -Й и Бa -Й ш ЛA -Й ј МY -Й НЁ -Й sName sAddress bBeginGroup nRow vName vAddress Р -Й ( С -Й 8 ТA -Й H Тщ -Й X Ш -Й h Юљ -Й x бa -Й вЉ -Й ж -Й Ј и -Й И й -Й Ш { ( ,
џџ } д# Ю ТЏNкЮЙC Њ hД 0 ш
{ ( ѕ 2 H Label1 Й a (
JEM Work Menu c С ї @№ М Verdana , ( Љ2004 McGimpsey & Associates Т q W o r k M e n u A b o u t F o r m $ T = : јQL3^ФјQL3^Ф f џџџџџџџџџџџџ D : o 9 ; џџџџ F p C o m p O b j џџџџ< џџџџ O E Verdana < ) џ ( http://mcgimpsey.com/excel/workmenu.html! 4 s @ Verdana , OK5{" r ѓ @ М Verdana $ * ррр
Version b0.81 Ў
4 ѓ @ М Verdana ( ѕ 2 H Label4 4 Ќ , ѕ 2 \ lblHyperlinka Ѕ , ѕ 7 < btnSplashOK й ) ( ѕ 2 H Label7 p
" ўџ џџџџ Microsoft Forms 2.0 Form ўџџџOBME VERSION 5.00
Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} WorkMenuAboutForm
Caption = "JEM Work Menu : About"
ClientHeight = 3600
ClientLeft = 0
ClientTop = 0
ClientWidth = 5200
StartUpPosition = 1 'CenterOwner
TypeInfoVer = 17
End
$ џџ } , Ш
Rу Юу Њ KИQ Рд Verdana , ѕ
2 8 lblConfirm V B F r a m e џџџџџџџџџџџџ Q 5 W o r k M e n u C o n f i r m F o r m ( џџџџB ? јQL3^Ф ъL3^Ф f џџџџџџџџџџџџ V м o > @ џџџџ X А ( Label1 eW) ф 5 № Verdana ( Yeseф O ї @Ш М Verdana ( No5{ф O ї @Ш М Verdana a a $ х < btnYes д# ѕ ( ѕ ; < btnNo п ѕ ўџ џџџџ Microsoft Forms 2.0 Form ўџџџOBME VERSION 5.00
Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} WorkM C o m p O b j џџџџA џџџџ ] E V B F r a m e џџџџџџџџџџџџ _ 8 W o r k M e n u P r e f e r e n c e s F o r m 0 џџџџџџџџD ъL3^Ф ъL3^Ф f џџџџџџџџџџџџ d h enuConfirmForm
Caption = "JEM Work Menu : Confirm"
ClientHeight = 2000
ClientLeft = 0
ClientTop = 0
ClientWidth = 6400
StartUpPosition = 1 'CenterOwner
TypeInfoVer = 6
End
$
џџ } д# & Rу Юу Њ KИQ Рд Verdana 0 х h cbxShowSplashScr H FР " 0 5{Show Splash Screen on Startup 5 Ш Verdana 8 FР o C E џџџџ f C o m p O b j џџџџF џџџџ { E V B F r a m e џџџџџџџџџџџџ } ; W o r k M e n u E d i t F o r m " џџџџџџџџI ъL3^Ф ъL3^Ф " 0 5{Verify Deletions 5 Ш Verdana ( Cancel cE O ї @Ш М Verdana ( SaveE O ї @Ш М Verdana @ FР " 0 5{Warn about Duplicates 5 Ш Verdana @ FР " 0 5{Run Auto macro option 5 Ш Verdana < FР " 0 5{Automatic grouping 5 Ш Verdana $ , Separator everyD Ї 5 Ш Verdana H a С H,Т С q Verdana , items i Ї 5 Ш Verdana eenna a , х X cbxConfirmDeletea ф , ѕ ; @ btnCancel : s" ( ѕ ; < btnSave / s" , х
` cbxConfirmAdd a g 0 х ` cbxAutoMacroOptionsna ъ ( х \ cbxAutoGroupa m 0 ѕ
2 D lblSeparator1 " @ ( х spnSeparatorK Г ( х 0 txtSeparator Г 0 ѕ
2 <
lblSeparator2 \ @ ўџ џџџџ Microsoft Forms 2.0 Form ўџџџOBME VERSION 5.00
Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} WorkMenuPreferencesForm
Caption = "JEM Work Menu : Prefs"
ClientHeight = 5600
ClientLeft = 0
C ѕ ўџџџ
ўџџџ 6 0 ! , # $ % & ' ( ) * + - . / ўџџџ1 2 3 5 _ 9 G 8 ўџџџ: C < = > ? @ A B 7 D E F H X U J K L ўџџџN O P Q R S T I V W Y ^ Z [ \ ] | Й Ц a b c l e f g h i j k ` m n o p q r s t u v w x y z { ўџџџ} ~ Г §џџџlientTop = 0
ClientWidth = 5200
StartUpPosition = 1 'CenterOwner
TypeInfoVer = 28
End
$ # џџ D } 7 §2 Rу Юу Њ KИQ Рд Verdana 8 K E Р F вBьЮ
Њ `ѓE Р F x < х < btnEdit Щ, ~ ( EditE O ї @Ш М Verdana ( Up§Л3 O ї @Ш М Verdana ( Dn§Л3 O ї @Ш М Verdana ( ўџџџ Ї Ё ўџџџ ўџџџ ўџџџ ўџџџ ўџџџ ўџџџЂ Ѓ Є Ѕ І ўџџџЈ Љ Њ Ћ Ќ Ў Џ А ўџџџВ ўџџџД Е Ж З ўџџџЙ К Л М Н О П Р С Т ўџџџФ Х Ц Ч Ш Щ Ъ Ы Ь Э Ю Я а б в г д е ж з и й ўџџџўџџџм н о п р с ўџџџу ф х ц ч ш щ ўџџџы ўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџf џџџџџџџџџџџџ o H J џџџџ
4 i 1 8 N R L n`єЮЭ Њ ` ъL3^Ф ъL3^Ф f џџџџџџџџџџџџ Move item up in list @ х
< btnDown п ~ Move item down in list , е
# fraLabelFrame a Q ( е # fraEditFramea Q < х < btnSave Щ, к. Edit selected itemli D ѕ ? @ btnCancel д# к. Edit selected itemli @ х ! @ btnDelete # Ђ Delete selected item , х
" T cbxBeginGroup a ( ѕ # 2 <
Label6 " c ( х 4 lstEditItemsa А ўџ џџџџ Microsoft Forms 2.0 Form ўџџџOBME VERSION 5.00
Begin {C62A69F0-16DC-11CE-9E98-00AA00574A4F} WorkMenuEditForm
Caption = "JEM Work Menu : Edit"
ClientHeight = 7400
ClientLeft = 0
ClientTop = 0
ClientWidth = 8000
StartUpPosition = 1 'CenterOwner
TypeInfoVer = 68
End
P R O J E C T w m U G џџџџ И P R O J E C T V џџџџ У Ј P R O J E C T l k џџџџџџџџџџџџ к S u m m a r y I n f o r m a t i o n ( џџџџX џџџџ л ThisWorkbook T h i s W o r k b o o k Sheet1 S h e e t 1 WorkMenuAboutForm W o r k M e n u A b o u t F o r m WorkMenuConfirmForm W o r k M e n u C o n f i r m F o r m WorkMenuPreferencesForm W o r k M e n u P r e f e r e n c e s F o r m WorkMenuEditForm W o r k M e n u E d i t F o r m modGlobals m o d G l o b a l s modAbout m o d A b o u t modBuildMenu m o d B u i l d M e n u modDeleteMenu m o d D e l e t e M e n u modUpdateList m o d U p d a t e L i s t modOpen m o d O p e n ModPreferences M o d P r e f e r e n c e s modAddItem m o d A d d I t e m ModEdit M o d E d i t modToggleAutoMacros m o d T o g g l e A u t o M a c r o s ID="{0C761DDF-66F6-11D8-87E7-000A277AB9AE}"
Document=ThisWorkbook/&H00000000
Document=Sheet1/&H00000000
Package={AC9F2F90-E877-11CE-9F68-00AA00574A4F}
BaseClass=WorkMenuAboutForm
BaseClass=WorkMenuConfirmForm
BaseClass=WorkMenuPreferencesForm
BaseClass=WorkMenuEditForm
Module=modGlobals
Module=modAbout
Module=modBuildMenu
Module=modDeleteMenu
Module=modUpdateList
Module=modOpen
Module=ModPreferences
Module=modAddItem
Module=ModEdit
Module=modToggleAutoMacros
Name="JEM_Work_Menu"
HelpContextID="0"
Description="Puts a persistent MRU file menu in the Menu Bar"
CMG="F0F21FE523E523E523E523"
DPB="E0E20FD010D010D0"
GC="D0D23FC040C0403F"
[Host Extender Info]
&H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000
[Workspace]
ThisWorkbook=420, 252, 1131, 835, C
Sheet1=254, 1, 1143, 509, C
ўџ џџџџ n`єЮЭ Њ ` Microsoft Forms 2.0 Frame ўџџџOBME Forms.Frame.1 ( Name:m eг 4 З @Ш МVerdana ( Address:E 4 З @Ш МVerdana ( lblEditAddress s" ф 5 Ш Verdana ( Label7 es" Т 5 Ш Verdana ( H џџ } ^4 ) ТЏNкЮЙC Њ hД 0 Р { ( ѕ 2 < Label4 А А
WorkMenuAboutForm=569, 133, 1275, 716, C, 257, 19, 1026, 602, C
WorkMenuConfirmForm=388, 28, 1141, 611, C, 484, 59, 834, 230, C
WorkMenuPreferencesForm=269, 50, 1026, 633, C, 251, 212, 755, 722, C
WorkMenuEditForm=596, 119, 1324, 841, C, 846, 82, 1331, 671,
modGlobals=794, 482, 1435, 877, C
modAbout=250, 20, 1019, 603, C
modBuildMenu=309, -7, 936, 681, C
modDeleteMenu=677, 55, 1435, 563, C
modUpdateList=257, 1, 1055, 726, C
modOpen=254, 1, 1143, 509, C
ModPreferences=280, 27, 1169, 535, C
modAddItem=306, 53, 1195, 561, C
ModEdit=478, 286, 1367, 794, C
modToggleAutoMacros=280, 27, 1169, 535, C
E Р F ўџ
р
ђљOhЋ +'Гй0 ` ` h Є И ( @
L X ' JEM Work Menu x !N J.E. McGimpsey x
Work Menu ps N Provides a persistent and customizable Work Menu similar to Word's Work Menu. џџ R џџџџџџџџ Р F CЏQ3^Ф Л W o r k b o o k Y џџџџџџџџ -1 _ V B A _ P R O J E C T _ C U R " W 8 јQL3^Ф ъL3^Ф V B A џџџџџџџџ јQL3^ФјQL3^Ф ( ѕ 2 < Label5 А 0 ѕ 2 @ lblEditAddress E , ѕ 2 8 lblEditName@E А ўџ џџџџ n`єЮЭ Њ ` Microsoft Forms 2.0 Frame ўџџџOBME Forms.Frame.1 ( Name:m e Т З @Ш МVerdana ( Path:t h З @Ш МVerdana H,s" O 5 Ш Verdana HЌs" E 5 Ш Verdana ( DoneE O ї @Ш М Verdana ( Revert eE O ї @Ш М Verdana ( H џџ } ^4 ) ТЏNкЮЙC Њ hД 0 Л ( ѕ 2 < Label1 А А ( ѕ 2 < Label2 А ( х 4 txtEditNameРф А , х 4 txtEditAddress ф $ х < btnDone И* А ( х @ btnRevert eРИ* SaveE O ї @Ш М Verdana ( Cancel cE O ї @Ш М Verdana ( Delete eE O ї @Ш М Verdana 4 FР 0 5{CheckBox1 5 № Verdana , Begin Group 1 Verdana ` ^4 5 № Verdana Edit selected item5{ < х < btnUp K ~ John McGimpsey x Microsoft Excel @ ЅKdyлТ@ :љџФ ўџ
еЭе. +,љЎD еЭе. +,љЎL ` h t Ј А И Р
Ш т ' б б McGimpsey & Associates JEM Work Menu Worksheets Ќ 0 q y
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 џџџџџџџџџџџџ т ј C o m p O b j џџџџџџџџџџџџ ъ X џџџџџџџџџџџџ џџџџџџџџџџџџ _PID_LINKBASE Version Date completed ' A 0.8
9 March 2004 d o ўџ џџџџ Р F Microsoft Excel Worksheet ўџџџ8FIB Excel.Sheet.8