аЯрЁБс>ўџ ўџџџ џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџRoot Entryџџџџџџџџ *ЗюLfкapcџџџџџџџџтђ`к *ЗюLfкThe VBA Project џџџџџџџџтђ`к *ЗюLfк_VBA_Projectџџџџџџџџ тђ`к *ЗюLfк§џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџўџџџ{Эўџџџ§џџџ!"#$%&'()fџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџyzўџџџ|ˆ~€Root EntryџџџџџџџџрdKNfк€apcџџџџџџџџтђ`крdKNfкThe VBA Project џџџџџџџџтђ`крdKNfк_VBA_Projectџџџџџџџџ тђ`крdKNfкџџџџџџџџ§џџџ ўџџџ §џџџ 1?ўџџџ*џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ+,-./0ўџџџ2>456789:;<=ўџџџ@ABRDEFGHIJKLMNOPQўџџџSўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџHost Project Item Names0џџџџ pѓѓ`крdKNfкVBA Project Data"џџџџHost Project Items&џџџџџџџџ4VBA Project Signature,џџџџџџџџџџџџ ўџџџўџџџ5 ўџџџўџџџўџџџ !"#$%ўџџџ'()*+,ўџџџ./0123496ўџџџўџџџўџџџ:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYўџџџ[\]^_`abcdefghiўџџџўџџџўџџџўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЭє{а ђ"ThisLibrary*{А ђ"5{а ђ"L{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{Р  L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{@“ ";{`Ž $={ ‘ &šЄ&ЎL{801A0000-A66C-11D3-A8BD-0000861EBBD6}ИIТ’C:\00nimsky\Projekte\Schlaues_BuID="{79BA1F8B-40E2-4365-909F-A096F6961C37}" Document=ThisLibrary/&H00000000 Module=starNOTE01 HelpFile="" Name="starNOTE" HelpContextID="0" VersionCompatible32="393222000" CMG="8E8C40BCC044A248A248A248A248" DPB="7476BAA2468947894789" GC="5A5894C07BC17BC184" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisLibrary=0, 0, 0, 0, C starNOTE01=52, 52, 1455, 687, с'ЁQёСqБ1сAСёёq!Ё!A#Ё#$$Б$с$Ё&ch\SWX-Makros\StarNOTE\forum_starnote.swpЬE-Žџџџџџџџџџџџџџџ6@bџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџThisLibraryџџџџџџџџAє`крdKNfкProject_Data_CurVer( џџџџ8 Host Project Item List Data8џџџџџџџџџџџџ7VBAџџџџџџџџ ѓ`крdKNfкPROJECTwmџџџџџџџџџџџџGPROJECT џџџџ АThisLibraryџџџџџџџџZњstarNOTE01џџџџCWThisLibraryThisLibrarystarNOTE01starNOTE01@rU@@@џџџџџџџџџџџџџџџџџџџџџџџџџџџџhwndhWndInsertAfterxycxcywFlags lpClassName lpWindowName@ЊГ€0* pH‚dфstarNOTEЂ,@ Z= n,!'Б(џџџџџџџџџџџџџџџџšPgg0ŸˆўџџпZєp˜ˆўџџU ТјџџџОˆўџџg0Ÿ€ўџџžјџџџєh—€ўџџї PЗРџџџН€ўџџg—Рџџџї b^ g.Ÿˆўџџžјџџџє8˜ˆўџџь&ОˆўџџЧшg4Ÿxўџџ№№ї žјџџџєЈ’xўџџВАџџџg{gg:Ÿˆўџџžјџџџє8žˆўџџб`ўџџ`ЗИџџџОˆўџџМ`ўџџg—Иџџџїb^ gFŸˆўџџžјџџџє8žˆўџџб`ўџџљHў__SRP_2џџџџ-# Project Item Data$џџџџj Control List Data$џџџџџџџџрdKNfкрdKNfкReqControl List Data*џџџџџџџџрdKNfкрdKNfк__SRP_1џџџџџџџџџџџџ@ReqControl List Data*џџџџџџџџџџџџm Control_Data_CurVer(џџџџџџџџl Control List Data$џџџџџџџџџџџџk(__SRP_3џџџџџџџџџџџџ&Œ_VBA_PROJECTџџџџџџџџџџџџ3МdirџџџџџџџџџџџџЎ__SRP_0џџџџы“K*šџџџџrUР@@@~~~~~~~~~~~~~<"QSDa,žWNАёNOКdJŒ фџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџAџџџџџџџџаџџџџџџџџQ ёџџББAQб1Б A С starNOTE ThisLibrary starNOTE01яРF1C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLLVBA сџџџџџџџџ ‘P€lІгЈН†Лж5C:\ProgHost Project Item Names0џџџџ pѓѓ`к *ЗюLfкVBA Project Data"џџџџHost Project Items&џџџџџџџџ4VBA Project Signature,џџџџџџџџџџџџ ўџџџўџџџ5 ўџџџўџџџўџџџ !"#$%&ўџџџ()*+,-./ўџџџ123496ўџџџўџџџўџџџ:;<=>?@ABCўџџџўџџџўџџџўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџЭє{аш ThisLibrary*{Ащ 5{Аь L{801A2004-A66C-11D3-A8BD-0000861EBBD6}7{№щ  L{801A0000-A66C-11D3-A8BD-0000861EBBD6}9{Pх ";{ш $={Pш &šЄ&ЎL{801A0000-A66C-11D3-A8BD-0000861EBBD6}ИCТ†C:\00nimsky\Projekte\Schlaues_BuID="{79BA1F8B-40E2-4365-909F-A096F6961C37}" Document=ThisLibrary/&H00000000 Module=starNOTE01 HelpFile="" Name="starNOTE" HelpContextID="0" VersionCompatible32="393222000" CMG="0C0EC2125EE462E462E462E462" DPB="DAD81468E369E369E3" GC="A8AA667967796786" [Host Extender Info] &H00000001={3832D640-CF90-11CF-8E43-00A0C911005A};VBE;&H00000000 [Workspace] ThisLibrary=0, 0, 0, 0, C starNOTE01=52, 52, 1455, 687, 687, №кдџџџџс5 wЭџџ#ˆЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџch\SWX-Makros\StarNOTE\starNOTE.swpЬE-Žbџџџџџџџџџџџџџџ6@bThisLibraryџџџџџџџџAє`к *ЗюLfкProject_Data_CurVer( џџџџ8 Host Project Item List Data8џџџџџџџџџџџџ7VBAџџџџџџџџ ѓ`к *ЗюLfкPROJECTwmџџџџџџџџџџџџGPROJECT џџџџ ЊThisLibraryџџџџџџџџ0њstarNOTE01џџџџ™кSThisLibraryThisLibrarystarNOTE01starNOTE01@rU@@@џџџџџџџџџџџџџџџџџџџџџџџџџџџџhwndhWndInsertAfterxycxcywFlags lpClassName lpWindowNamefilePath:B‚U…H 2023 Type Library#C€SwC,џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(SLџџџџSџџџџS”џџџџ<џџџџџџN0{801A2004-A66C-11D3-A8BD-0000861EBBD6}џџџџH€ўџџџџџ џџџџ0џџџџџџџџџџ%џџџџ@џџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8гмg&п__SRP_2џџџџ‰!Project Item Data$џџџџD Control List Data$џџџџџџџџ *ЗюLfк *ЗюLfкReqControl List Data*џџџџџџџџ *ЗюLfк *ЗюLfк__SRP_1џџџџџџџџџџџџXReqControl List Data*џџџџџџџџџџџџG Control_Data_CurVer(џџџџџџџџF Control List Data$џџџџџџџџџџџџE(__SRP_3џџџџџџџџџџџџ' _VBA_PROJECTџџџџџџџџџџџџ}пdirџџџџџџџџџџџџЎ__SRP_0џџџџ ­‚ƒ„…†‡ўџџџŠ‹ŒŽ‘’“”•–—˜ўџџџš›œžŸ ЁЂЃЄЅІЇЈЉЊЋЌ­ЎЏАБВГДЕЖЗИЙКЛМЧџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџШЩЪЫЬўџџџўџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ“K*šџџџџrU@@@@~~~~~~~~~~~~~~~~$"Qf№ЦЧ‡IЕD“ІЊЩ’5ў фџџџџџџџџ џџџџџџџџџџџџџџџџџџџџџџџџˆaaџџџџџџџџаџџџџџџџџQ 1ёџџББAQб1Б A С starNOTE ThisLibrary starNOTE01яРF1C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLLVBA сџџџџџџџџ ‘P€lІгЈН†Лж5C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swvba.tlbstdole SolidWorks Aџџџџџџџџqp0РFC:\Windows\System32\stdole2.tlb бџџџџџџџџё1=ЃƒХ'ЮПд@ЛW8C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldworks.tlbSldWorks сџџџџџџџџЁАYѓ‡FаUгLЖЯ.Д,љ‰7C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swconst.tlbSwConst aџџџџџџџџ‘аŸоС М?%L†}N‘9Ьр:C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swcommands.tlb SwCommands Сџџџџџџџџё №ztщb6nC‚ трSFC:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldutils\gtswUtilities.tlb SWUtilities A џџџџџџџџзq  РF9C:\Program Files\Microsoft Office\Root\Office16\EXCEL.EXEExcel б џџџџџџџџ  Ё 0 SetWindowPos user32 SetWindowPos‘ С P.™main>д FindWindow FindWindowA‘ Qq GetPdmName GetPdmRemark  €lІгЈН†Лж€lІгЈН†ЛжЁбџџџџџџџџ&mб"=ЃƒХ'ЮПд@ЛW&mЁ \ Makropfad:  ˆ  ^Kein Dokument geіffnet! Das Makro wird beendet..ŠЁGetPathName Dateiname: GetType DAktuelle Datei ist eine Baugruppe. ˆ &Makro wird beendet. DAktuelle Datei ist eine Zeichnung.3=ЃƒХ'ЮПд@ЛW 8Aktuelle Datei ist ein Part.  SelectionManagerY=ЃƒХ'ЮПд@ЛW $Selektierter Typ: (Komponente gefunden. Typ:  Anzahl: Name&tQ ƒ :Es ist ein Leader selektiert.*{QGetName Name: U=ЃƒХ'ЮПд@ЛW&mс# Text:  8Es ist eine Note selektiert. Andockposition:   /  Œ  COMPONENTExtensionSelectByID2 Suchname:  PName der angedockten Komponente : *o]eATбEŒКг_Вiˆф /VBE7.DLL!)џџџџџџџџЧ б)(~ PName der angedockten Einzelkomponente :  - PPfad der angedockten Einzelkomponente : &mб( PMaterialnummer :  PBlattnummer :  PIndex ram Files\SOLIDWORKS Corp\SOLIDWORKS\swvba.tlbstdole SolidWorks Aџџџџџџџџqp0РFC:\Windows\System32\stdole2.tlb бџџџџџџџџё1=ЃƒХ'ЮПд@ЛW8C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldworks.tlbSldWorks сџџџџџџџџЁАYѓ‡FаUгLЖЯ.Д,љ‰7C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swconst.tlbSwConst aџџџџџџџџ‘аŸоС М?%L†}N‘9Ьр:C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swcommands.tlb SwCommands Сџџџџџџџџё №ztщb6nC‚ трSFC:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldutils\gtswUtilities.tlb SWUtilities A џџџџџџџџзq  РF9C:\Program Files\Microsoft Office\Root\Office16\EXCEL.EXEExcel б џџџџџџџџ  Ё 0 SetWindowPos user32 SetWindowPos‘ С P.™main>д FindWindow FindWindowA‘ Qq  €lІгЈН†Лж€lІгЈН†ЛжAqџџџџџџџџ \&mq"=ЃƒХ'ЮПд@ЛW&mQ Makropfad:  ˆ &Makro wird beendet.  ^Kein Dokument geіffnet! Das Makro wird beendet..ŠQGetPathName Dateiname: GetType DAktuelle Datei ist eine Baugruppe. ˆ DAktuelle Datei ist eine Zeichnung.3=ЃƒХ'ЮПд@ЛW 8Aktuelle Datei ist ein Part.Y=ЃƒХ'ЮПд@ЛW&t 8Es ist eine Note selektiert. Œ  SelectionManager*{U=ЃƒХ'ЮПд@ЛW Note.GetName(): &mq! Note.GetText(): &Note.IsAttached(): *Note-Andockposition:   / Љ=ЃƒХ'ЮПд@ЛW ,Annotation.GetName(): &mБ$ .wAnnotation.GetType():  LAnnotation.GetAttachedEntityCount3(): A ,Annotation.GetType(): norks; VBAїтWin16С~Win32Win64xMacГВVBA6­#VBA7Ў# starNOTEgstdole“`ˆ џSldWorks$SwConstœ SwCommandsœ€ SWUtilitiesѕExcel€+ ThisLibraryGЉ €џ_Evaluateй starNOTE01V5 Ќ(SetWindowPosNhwnd/СhWndI ьѕуg %J< rst dole>stdol e h%^*\G{0002`0430-C 0046}#2.0#0#C:\Windows\System32\e2.tlb#OLE Automation `‚nSldW€orks>€ "S€CdW€GrЈks€HŽ€ „€H83A33D31-27C5-11CE-BFD4€H400513B€B57}#1fIProgram FileLOLIDWORKS C orp\S†\s8ldwB‚U…H 2023 Type Library#C€SwConst>ЁwCZnY:tZ˜€ \Z4687F359-55D0-4CD3-B6CF-2EB42C11F9ф893-wcA У,Ч6ƒB-Т&ant t/l‹/ A,€/mma4nd^СD0m`man€„_› @‘РС10AC1DE9F-3FBCР125-868D-7D4E91Р39CCE0і1ƒ"”2’2 'SWU€tilitieР2VU€Еi“iеТe‚’ЉРŸРA362E9747A-1836-436E-827F-0AE2E0081353}#7dX7.5ƒЗщ’uР#sр\gtswF&6 L15ВLс}Excel>!6ExTc€tlрK— {$@q2стrƒаt1.9ёMicrosoft Office\Root\c16\EXC€EL.EXE#B 16.0 O bjectЋcb—т !a4This„hGa4T@i 2Libr`NryT2˜ THЂ1т;Њ‹","wЭ""+ЂB)%Њ01G ЎРtNOTE017@.'26яUФэр!шa"+ЂB)%Њ01G ЎrU@@@џџџџџџџџџџџџ€ё pџџџџџџџџџџџџџџџџџџџџЬašџ фў*\G{000204EF-0000-0000-C000-000000000046}#4.2#9#C:\PROGRA~1\COMMON~1\MICROS~1\VBA\VBA7.1\VBE7.DLL#Visual Basic For Applications"*\G{801A0000-A66C-11D3-A8BD-0000861EBBD6}#1f.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swvba.tlb#SolidWorks 2023 Extensibility Type LibraryМ*\G{00020430-0000-0000-C000-000000000046}#2.0#0#C:\Windows\System32\stdole2.tlb#OLE Automation*\G{83A33D31-27C5-11CE-BFD4-00400513BB57}#1f.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldworks.tlb#SldWorks 2023 Type Library*\G{4687F359-55D0-4CD3-B6CF-2EB42C11F989}#1f.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swconst.tlb#SOLIDWORKS 2023 Constant type library"*\G{0AC1DE9F-3FBC-4C25-868D-7D4E9139CCE0}#1f.0#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\swcommands.tlb#SOLIDWORKS 2023 Commands type library>*\G{62E9747A-1836-436E-827F-0AE2E0081353}#7d7.5#0#C:\Program Files\SOLIDWORKS Corp\SOLIDWORKS\sldutils\gtswUtilities.tlb#SOLIDWORKS Utilities 2015 Type Library*\G{00020813-0000-0000-C000-000000000046}#1.9#0#C:\Program Files\Microsoft Office\Root\Office16\EXCEL.EXE#Microsoft Excel 16.0 Object Libraryџџџџџџьѕуgџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ ThisLibrary0U67e3f5c2џџ-ThisLibraryџџwЭ;џџstarNOTE010X67e3f63eџџ0starNOTE01џџрUџџџџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџqЎйPљ2…G•bХ—юcЏ‹џџџџ:I2Еƒ|HŸWВŽЦжџџџџџџџџH€†0?s„џline SolidWorks; VBAїтWin16С~Win32Win64xMacГВVBA6­#VBA7Ў# starNOTEgstdole“`ˆ џSldWorks$SwConstœ SwCommandsœ€ SWUtilitiesѕExcel€+ ThisLibraryGЉ €џ_Evaluateй starNOTE01V5 Ќ(SetWindowPosNhwnd/СhWndInsertAfterКЈxoylcxм\cyй\wFlagsм‹user32*Ю Ќ(FindWindowK lpClassName‚з lpWindowNameЈЌ(resЮЌ(lRetEС Ќ(SWP_NOMOVEHн Ќ(SWP_NOSIZEЙ_Ќ(FLAGSo Ќ(HWND_TOPMOSTГЌ(HWND_NOTOPMOSTY GetPdmName^\filePathЌOfsF]aX retstring%ergebnisЃx CreateObjectјŠ vbDirectorygк vbNullStringЎТ OpenTextFileЇК AtEndOfLine>ReadlineзаSplit)Replacef GetPdmRemark›hЌ(mainˆ, swApplication2TswModel[ƒ ModelDoc2Ї^ swDrawing/: DrawingDocсswSelectionManager т SelectionMgr0 swFeatureHFeature!>swNote@>Note’> swAnnotationJ AnnotationЫs makroPfadс  dateiNameO returnValueЇжselectedObjectm”attachPosition @vAttEntTypeArrіattachedEntities†attachedEntity0 theEntityЗEntityŠѓ attachedFaceˆгFace2ћ attachedEdgeJEdgeвattachedComponentЊћattachedComponentRealKb Component2ЂkomponentenNamezerlegterKomponentenName?ЂletzterKomponentenNameiQsuchNameњƒi`kb lastBackSlash‚char)˜infoPath9Є infoNumberиŠ pdmInfoFile-- boolstatusgо ApplicationЅ*GetCurrentMacroPathFolder[k ActiveDocк’SendMsgToUser28. swMbWarning7УswMbOkj2 GetPathNameGetType)J swDocASSEMBLY…n swDocDRAWINGVб swDocPARTЮMSelectionManagerХѓGetSelectedObjectType2wZGetSelectedObject6а/GetNameг<GetTextі IsAttachedLЊ GetAttachPosя GetAnnotation‰TGetAttachedEntityCount3^РGetAttachedEntities3R Extensionы SelectByID2юЙGetSelectedObjectType3xZGetSelectedObjectCount2i4GetLeaderCount„УGetLeaderStyleОHasExtraLeaderя‚ GetLeaderInfo}šIsEmpty љ swSelEDGESa“ GetComponentА‹ swSelFACESёОџџ„џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ џџ"џџ$џџ&џџ(џџ*џџ-џџџџџџ1џџџџџџџџџџџџџџџџџџџџџџџџџџ$@ @„іаРўџџџџџџ џџ`„њрИўџџџџџџџџ`„ Pўџџџџџџ џџБб!AaP0pџџџџџџџџџџџџџџџџџџџџЁб8ё`§џџџџџџџџџџџџџџџџџџџbџџџџџџџџџџџџџџџџџџP@qrU@@@@~x&ёБ "a%џџХKОˆўџџМ`ўџџЧВgїb^gїb^g{ggFŸˆўџџžјџџџє8žˆўџџб`ўџџљHўџџХKОˆўџџМ`ўџџЧ>gїb^g.Ÿˆўџџžјџџџє8˜ˆўџџUТшџџџОˆўџџggFŸˆўџџžјџџџє8žˆўџџб`ўџџљHўџџХKОˆўџџМ`ўџџЧЖgїb^gїb^g{gg<Ÿˆўџџžјџџџє8žˆўџџб`ўџџ#V$ТрџџџОˆўџџМ`ўџџg2Ÿxўџџ№žрџџџє ’xўџџ№?Ч@gїb^g:Ÿˆўџџ№№žрџџџє`˜ˆўџџUТаџџџОˆўџџg>Ÿ€ўџџžаџџџєї—€ўџџPg(ўџџb^ы€ўџџ(ўџџg>Ÿ€ўџџžаџџџєHї—€ўџџPg(ўџџb^ы€ўџџ(ўџџgFŸ ўџџžаџџџєpўHўџџ‘ ўџџ[ўџџO`ўџџb^ъўџџ`ўџџg$Ÿ`ўџџžаџџџєX–`ўџџЖџџџgШјHўџџŸџџџц`ўџџјЈ§џџŸџџџцx§џџј§џџŸџџџцшќџџў№§џџ–`ўџџO0ўџџўи§џџOР§џџ–x§џџO`§џџўH§џџO0§џџ–шќџџOаќџџb^ъ`ўџџ0ўџџР§џџx§џџ`§џџ0§џџшќџџаќџџg.Ÿˆўџџžаџџџєи˜ˆўџџUТШџџџОˆўџџg>Ÿ€ўџџžШџџџєиї —€ўџџPg(ўџџb^ы€ўџџ(ўџџgFŸxўџџžШџџџєXї%’xўџџbg€ўџџPg(ўџџb^ы€ўџџ(ўџџgFŸxўџџžШџџџєxї"’xўџџbg€ўџџPg(ўџџb^ы€ўџџ(ўџџg$Ÿ`ўџџžШџџџє€–`ўџџЖ`џџџgg{0PєЮиўџџHџџџџџџаџџџРџџџРўџџџџџјџџџиџџџ`џџџxџџџ@џџџИџџџ ўџџ8џџџЈўџџАўџџјўџџ№ўџџџџџ0џџџџџџШџџџ№џџџрџџџ˜ўџџЈџџџџџџшџџџV €ўџџ(ўџџˆўџџ`ўџџ0ўџџР§џџx§џџ`§џџ0§џџшќџџаќџџ aS4џџџџџџџџџџџџџџџџџџџX г№кдџџџџс5 wЭџџ#ˆЖџџџџџџџџџџџџџџџџџџџџџџџџxџџMEџџџџџџџџџџпџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(Lў 0\џџџџЛ O рџџЖџџ\B 0џџ;0;SetWindowPosBPFindWindowAџџџџџџџџџџџџџџџџџџџџxџџME0џџџџџџџџпџџPџџџџџџџџџџџџџџџџџџџџџџџџџџџџ(0џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ@!”џџ!”џџ!”џџ!”!”џџ !” (!”џџ0<аџџ<8џџ<@џџ џџџџ”џџџџLџџџџPџџџџLџџџџџџџџџџџџџџџџPџџџџLџџџџPџџџџLџџџџPџџџџLџџџџPџџџџ<иџџ<рџџ<шџџ<№џџ<јџџ<џџџџџџ8"""|"€"„"ˆ"Œ"h+28pџџџџџџџџџџџџXџџ "iƒ4џџџџџџџџџџџџџџx„iƒ6џџџџџџџџџџџџџџ˜„iƒ8џџџџџџџџџџџџџџИ„iƒ:џџџџџџџџџџџџџџи„iƒ<џџџџџџџџџџџџџџј„iƒ>џџџџџџџџџџџџџџ„iƒ@џџџџџџџџџџџџџџџџџџ„+DX0pџџџџџџџџџџџџџџ0 "iƒFџџџџџџџџџџџџџџА„iƒHџџџџџџџџџџџџџџџџџџ„ъ˜NиџџџџCџџџџџџџџџџџџџџЪ˜RџџџџCџџџџџџџџџџџџџџъ˜VџџџџўџџџџџџџCџџџџџџџџџџџџџџX%РCџџъ€JЈџџџџџџ@џџџџџџџџъ€Lаџџџџџџ@џџџџџџџџъ˜PџџџџCџџџџџџџџџџџџџџъ˜T0џџџџџџџџCџџџџџџџџџџџџџџџџџџџџџџџџџџxЈXаи0џџџџџџџџ8џџџџƒ0џџџџџџџџ`џџџџџџџџџџџџџџџџџџ`„žџџџџџџџџџџџџ џџџџџџшаXШџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ0џџџџ0џџ vџџџџ`џџџџџџџџџџџџаќџџHџџџџџџџџџџJJ„ „yџџџџјџџџџџџџШ% „{џџџџ№џџџџџџџш% „џџџџшџџџџџџџ% „ƒџџџџрџџџџџџџ(% „‡џџџџиџџџџџџџH % „‹џџџџаџџџџџџџh(% „аШџџџџџџџˆ0%`„’џџџџРџџџџџџџџџ`„”џџџџИџџџџџџџџџ`„–ЈАџџџџџџџџџ`„˜џџџџЈџџџџџџџ џџ`„šPџџџџџџџ џџџџџџ№ џџџџxџџџџџџџџџџџџXџџџџ0џџџџџџџџџџџџџџџџџџџџxџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8ьѕуg$*\Rffff*0X67e3f63e*\R3*#1de*\R3*#266*\R3*#1e2*\R3*#1f8*\R3*#1e5*\R3*#1f5*\R3*#21d*\R1*#3*\R1*#0*\R3*#0*\R3*#0*\R4*#78*\R4*#79*\R4*#1*\R3*#bc*\R3*#2*\R3*#20*\R3*#20*\R3*#21*\R3*#21*\R3*#2пўЪZ€€ џџџџH€€ џџџџH€ € џџџџ€0€8€ џџџџ„ @„ P„`„x„ˆ€ џџџџ€ џџџџ"H€ P€ `€ p€ €€ €  € А€ џџџџ€ Р€ а€ р€ №€ џџџџ€ € 8€ џџџџ€ 00€ џџџџ€ @0`x€ џџџџ€ (˜.РJ4а (€ џџџџ€ 0:P`€ џџџџ€ 0€FА,Шј F(,@.p€Fˆ& Шш№€ џџџџ€ ( <Ш2ј€ &0:X$>p$>˜(FР$шXШј€ џџџџ€ P.p*>€*Fр:FА€ џџџџ€ $ $№˜€ џџџџ€ џџџџџџџџаџџxІ–DcІ –8] ѕx] ѕЈ]Ќѕа]Ќѕи] N PѕDc]Ќѕ]Ќѕ0kу! ausgewфhltes Element untersuchen№ x!а!т.‚ nicht[мЙAnnotation.GetType(): Ž!кйObjectу angedockte Elemente erfassenœ]ѕDЈКЌ–X]ѕDА]ѕDа]ѕD№]ѕD]ѕD0]ѕDP]ѕDp]ѕD]ѕDЈ]ѕDР]ѕDи]ѕD№у Applikation festlegen№ Ь!".xу Makropfad ermitteln x!ЮЙ\ '’[мЙ Makropfad: и ’йу! prќfen, ob Dokument geіffnet ist x!аВœЙ/Kein Dokument geіffnet! Das Makro wird beendet. д ж x%в'–|џџHkџџ@у Dateinamen ermitteln x!а!и'”[мЙ Dateiname: и ”йу* prќfen, welche Art von Dokument aktiv ist x!а!к мœ[мЙ"Aktuelle Datei ist eine Baugruppe.й[мЙMakro wird beendet.й|џџPkџџH x!а!к оœ[мЙ"Aktuelle Datei ist eine Zeichnung.й№ x!а.~kџџш x!а!к рœ[мЙAktuelle Datei ist ein Part.й[мЙMakro wird beendet.й|џџ€kџџxЌ ‚%фЌœу eine Note ist selektiert[мЙEs ist eine Note selektiert.й№ЌЌ ‚%ц.Š[мЙNote.GetName(): Š!шй[мЙNote.GetText(): Š!ъй[мЙNote.IsAttached(): Š!ьй Š%ю'š[мЙNote-Andockposition: Ќ$šЙ / Ќ$šЙ / Ќ$šйу zugehoerige Annotation№ Š!№.Ž[мЙAnnotation.GetName(): Ž!шй[мЙ&Annotation.GetAttachedEntityCount3(): Ž!ђй Ž!є'žoџџpџџџџ№џџџџўЕAttribute VB_Name = "starNOTE01" Option Explicit Declare PtrSafe FuncHSetWindowPos Lib "user32" _ (ByVal hwnd At K %Gc'ma€kroPfad( с ЂWЧdateiЇ‚Wчаre`n@lueцРLрg sС"$edObjр(у€УУ‡atta4ch`ŒiA€Va№rian ”СA9урedEnt `hSэЃ ' "Kkƒ%festlegenзƒ šLO=УcТЬN M(p(erm`ittelФ Ї+=Ы .GetCur€rentMac 0€athFold I0+ "\`Бebug.Print„ "† : ",рeф6c%prќfen, ob Dokumр geіHffn ˆis&IJfЌAрYveр\ (Is @KhabThЅ"aI;Send@MsgToUрК2@("Keinя! DРЇТ wird beрet.РswMbWar nр,`MbOk#„aExiрœubeЃE€ЪIfcЃ'Ы рSn`кn L0'Ww­†1P0с[ D§ /Da_a /ц #Ѓ' /welch€e Art v@щ†0aktiv ?0"cTypѓsw 2ASSEMBL Y Ы1*AktuАelleУ Ё 0e Baugru№ppe.JСšп?Љu$$§ DRрAWINGя —-я у Zeichnuќng9 :u[?`,?sЉ"/ /  ' PARTџ џ ы PaўrА,ƒ!Bl/Ї…s' aus€gewфhlt№MHEleв=unP”sОu@'*LNjŸ”.­ут­С3х[Ё*2H(1)`ƒ15L'ŸcЁj2)_`0erdHљNEsЗ+R/ Q O etK 6(1ј, 0E:0 с?ф()@> &p YУю %TextQgЂ\‚IsЙАmeўdМ‡чlpaеSOrх“ „-AАКcpkpos‚tS[(0)" / "7pМ&pПon (2˜' ' zugehoerigџQі‰Фv—‹j Лџјp7ЯПWК‹С,ЧПOт‹U’ˆy”Co:3OonQ 9Пt3G—А?ng`edock0Ё”?e§nfЧIzCXя ЯРB†’є•R ‘ЙЙ юœ№ Ђ.І№ Ђ%ь.Ўkџџ0Ъ( Ў!'В[мЙ(Name der angedockten Komponente : Вй ВЙ/$p'Д Д‘$SLџџџџSџџџџS”џџџџ<џџџџџџN0{801A2004-A66C-11D3-A8BD-0000861EBBD6}џџџџH€ўџџџџџ џџџџ0џџџџџџџџџџ%џџџџ@џџџџ8џџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџџ8ьѕуgпўЪџџџџџџџџxџџџџЛАAttribute VB_Name = "ThisLibraryˆ" ˆBasˆ0{801A2004-A66C-11D3-A8BD-0861E BBD6} |GlobalЮSpa‚c’False dCreatablPredeclaIdАTru BExposeTemplate`Deriv’BuРstomizD2  Jfo 'у%Debug.Print "Parameterzeile: " & linвмц№ іЌ Ў!Ц’ ШЌ$њ'ј Ў!Ц њЌ Ў!Ц њ b[мЙ(PDM-Remark : $tй џџџџP [мЙ Leader-Stil: Š!й ВЙ/$p'Д Д‘$Д'ЖЌ œk