Autor
|
Thema: Declaration einmalig? UserForm (679 mal gelesen)
|
Booyaka Mitglied
Beiträge: 122 Registriert: 22.06.2012 CATIA V5 R19, 24, 26, 28, 29
|
erstellt am: 03. Jun. 2019 12:27 <-- editieren / zitieren --> Unities abgeben:
Hi Ho, ich hab da mal wieder ne blöde Frage ^^'... Ich hab eine Userform mit nen Paar Textboxen (um den Zeichnungskopf auszufüllen). Und ich Frage mich grad ob ich das deklarieren in jedem einzelnen Privat Sub umgehen und somit den Code kürzer halten kann. als Beispiel das ich folgendes einmal festlege und dann in jedem Privat Sub direkt Nutzen kann.
Code:
Dim oDrwDoc As DrawingDocument Set oDrwDoc = CATIA.ActiveDocument Dim oDrwSheets As DrawingSheets Set oDrwSheets = oDrwDoc.Sheets Dim oActSheet As DrawingSheet Set oActSheet = oDrwSheets.ActiveSheet
Hab es schon versucht es nur einfach in der Userform (ausserhalb eines Privat Subs) zu schreiben aber so einfach isses nicht ^^' Auch wenn ich nen Publik Sub mache funktioniert das auch nicht (Die ich dann im Privat Sub eben mit dem call-Befehl aufrufe). MfG Sascha
------------------ „Nicht Erfolg ist der Schlüssel zum Glück, sondern Glück ist der Schlüssel zum Erfolg. Wenn du gerne tust, was du tust, wirst du auch erfolgreich sein.“ ― Albert Schweitzer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Randle Mitglied CAD/PLM Consultant
Beiträge: 695 Registriert: 12.04.2003 Win10 x64 CATIA V5 R18, R19, R21, R27-29
|
erstellt am: 03. Jun. 2019 12:35 <-- editieren / zitieren --> Unities abgeben: Nur für Booyaka
Hallo, deklariere die Variablen die du "überall" brauchst Global in der User Form. z.B. Public oDrwDoc as DrawingDocument In dem Load oder Initialize Ereignis der UserForm kannst du die Variablen dann einmalig zuweisen. z.B. Set oDrwDoc = CATIA.ActiveDocument Gruß Randle ------------------ Wer für nichts steht, fällt für alles! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Booyaka Mitglied
Beiträge: 122 Registriert: 22.06.2012 CATIA V5 R19, 24, 26, 28, 29
|
erstellt am: 03. Jun. 2019 12:43 <-- editieren / zitieren --> Unities abgeben:
ahhh ok, und das zuweisen geht nicht global? Also sprich muss ich in jedem Privat Sub (innerhalb der Userform) immer wieder neu Zuweisen. Danke für die Fixe antwort ------------------ „Nicht Erfolg ist der Schlüssel zum Glück, sondern Glück ist der Schlüssel zum Erfolg. Wenn du gerne tust, was du tust, wirst du auch erfolgreich sein.“ ― Albert Schweitzer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Randle Mitglied CAD/PLM Consultant
Beiträge: 695 Registriert: 12.04.2003 Win10 x64 CATIA V5 R18, R19, R21, R27-29
|
erstellt am: 03. Jun. 2019 13:30 <-- editieren / zitieren --> Unities abgeben: Nur für Booyaka
Zitat: Also sprich muss ich in jedem Privat Sub (innerhalb der Userform) immer wieder neu Zuweisen.
nicht unbedingt. Du kannst die Zuweisung auch in das Load/Initialize Ereignis (-> ein Ereignis das bei jedem Makrostart aufgerufen wird) des User Forms schreiben. Gruß Randle ------------------ Wer für nichts steht, fällt für alles! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Booyaka Mitglied
Beiträge: 122 Registriert: 22.06.2012 CATIA V5 R19, 24, 26, 28, 29
|
erstellt am: 03. Jun. 2019 14:18 <-- editieren / zitieren --> Unities abgeben:
ahh cool probier ich mal aus danke für die Info MfG Sascha ------------------ „Nicht Erfolg ist der Schlüssel zum Glück, sondern Glück ist der Schlüssel zum Erfolg. Wenn du gerne tust, was du tust, wirst du auch erfolgreich sein.“ ― Albert Schweitzer Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
|