| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| | |
 | Ihre Produktion fit für die Zukunft - Smart Manufacturing mit DELMIAWorks ERP/MES, ein Webinar am 12.09.2025
|
|
Autor
|
Thema: API / Makro (384 mal gelesen)
|
Teddibaer
Ehrenmitglied V.I.P. h.c.
Struktur-Experte
   Beiträge: 2125
Registriert: 09.02.2004 **CSWP 06/2004**
--
MacBook Air M1
MacBook Pro M1-Max
|
erstellt am: 06. Jul. 2004 13:54  <-- editieren / zitieren -->   Unities abgeben:          
Mahlzeit! Wie kann ich beim Start eines Makros mit Userform eine TextBox (hier Textbox1) mit Standardwert füllen.
Wo muss Textbox1.Text = standardwert stehen? sub main()
UserForm1.Show vbModeless
end sub USERFORM1:
Private Sub UserForm_Click()
Load UserForm1
End Sub BEIM KLICKEN LIEST Unterfunktion die Textfelder aus:
Private Sub Button1_Click()
Set swApp = CreateObject("SldWorks.Application")
Set Part = swApp.ActiveDoc a = TextBox1.Text
b = TextBox2.Text
... End Sub ------------------
Gruß, der Teddibaer
---------
Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral.
John Osborne (1929-94) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Beckx
Mitglied
Beiträge: 87
Registriert: 08.03.2004 DELL PW390
DualCore @2,4ghz, 4GB RAM, Quadro FX4600, WINXP
SWX2009 Sp3
SWX2008 Sp5
|
erstellt am: 06. Jul. 2004 14:04 <-- editieren / zitieren --> Unities abgeben: Nur für Teddibaer 
|
Teddibaer
Ehrenmitglied V.I.P. h.c.
Struktur-Experte
Beiträge: 2125
Registriert: 09.02.2004
|
erstellt am: 06. Jul. 2004 14:11 <-- editieren / zitieren --> Unities abgeben:
DANKE UserForm_Initialize() war die Lösung!!! -10PFY- ------------------
Gruß, der Teddibaer
---------
Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral.
John Osborne (1929-94) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
gismo
Mitglied
DriveWorks Support
Beiträge: 1047
Registriert: 05.03.2001 HP Z Book17 G5;
32GB Ram;
Quadro P4200
WIN10 Pro;
Alle SWX ;)
|
erstellt am: 06. Jul. 2004 14:18 <-- editieren / zitieren --> Unities abgeben: Nur für Teddibaer
|
| |
Teddibaer
Ehrenmitglied V.I.P. h.c.
Struktur-Experte
Beiträge: 2125
Registriert: 09.02.2004
|
erstellt am: 06. Jul. 2004 16:16 <-- editieren / zitieren --> Unities abgeben:
Zitat:
Original erstellt von gismo:
HI Teddibaer,
bei einem bestimmten Vortrag mit dem "MakroVirus" infiziert hast? 
Es liegt im Bereich des Möglichen ;-)megagrins ------------------
Gruß, der Teddibaer
---------
Der Computer ist die logische Weiterentwicklung des Menschen: Intelligenz ohne Moral.
John Osborne (1929-94) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
)
