|
SolidWorks : Komponente einfügen mit Makro
General Engineer am 21.03.2013 um 12:57 Uhr (0)
Hallo Heinz,ich habs jetzt die ganze Pause probiert. Die Listbox zeigt immer nur sldprt Dateien an.Sldasm werden nicht aufgelistet. Scheint wohl mit VBA nicht zu gehen. Ich gebs auf. Trotzdem nochmal vielen Dank.GrußGE
| | In das Form SolidWorks wechseln |
|
SolidWorks : Komponente einfügen mit Makro
General Engineer am 24.03.2013 um 10:41 Uhr (0)
Hallo Lutz,Hallo Heinz,vielen,vielen Dank für eure Hilfe. Durch die zwei unterschiedlichen Vorgehensweisen habeich schon einiges über die Syntax in VBA gelernt. Das kleine Proggi läuft jetzt. Gruß GE
| | In das Form SolidWorks wechseln |
|
SolidWorks : Komponente einfügen mit Makro
General Engineer am 05.01.2012 um 15:43 Uhr (0)
Hallo Heinz und Stefan,vielen Dank für eure Unterstützung, besonders für das Makro. Ich bin leider noch nicht dazu gekommen es auszuprobieren bzw. meinenHorizont beim Programmieren zu erweitern. Haben ne Menge Projekte.Ich schau es mir morgen mal an und melde mich Montag. GrußGE------------------Solid Works 2010 SP5Keytech Pro 11HP WorkstationXeon 3,06;8 GB Ram, FX 1800Xeon 3,33;12 GB RAM Quadro 4000;SSD
| | In das Form SolidWorks wechseln |
|
SolidWorks : Komponente einfügen mit Makro
General Engineer am 23.12.2011 um 11:03 Uhr (0)
@Heinz: Danke für Dein Beispiel.Ich komme damit auch nicht zum Ziel.Habe in das Einfüge Makro ein User Formmit List Box und entsprechenden Pfadmit sldprts eingefügt.Habe dann im Modul Allgemein Mainden beim Aufzeichnen des Makros angelegtenPfad gegen die Variable Pfad 1 getauscht.Sub main ()Set swAppApplication.Sld.WorksSet Part = sw.App.ActiveDocboolstatus = Part.AddComponent (Pfad1)Das Makro wird zwar ohne Fehler gestartetaber es passiert nichts.------------------Solid Works 2010 SP5Keytech Pro 11HP Work ...
| | In das Form SolidWorks wechseln |
|
SolidWorks : Komponente einfügen mit Makro
General Engineer am 20.03.2013 um 09:08 Uhr (0)
Hallo Heinz,etwas spät, aber trotzdem nochmals vielen Dank für die Hilfe.Ich habe leider nochmals zum gleichen Thema ein Thread eröffnet (Makro Makro) den ich aber beenden werde.Ich habe die beiden Optionen ins Proggi eingefügt. Leiderwerden trotzdem nur sldprt Dateien in der Listbox aufgeführt. Wenn ich die Endung auf sldasm ändere, erscheinen diese zwar in der Listbox aber nach einem doppelklick erscheint die Fehlermeldung Falsche Datei.Private Sub UserForm_Initialize() ListBox1.Clear Name1 = Dir(Teil_Ei ...
| | In das Form SolidWorks wechseln |
|
SolidWorks : Komponente einfügen mit Makro
General Engineer am 20.03.2013 um 10:30 Uhr (0)
Hallo Heinz, vielen Dank für die Hilfe. Aber irgendwie raffe ich in VBA nicht was in welcher Reihenfolge kommt. In AutoLisp war das irgendwie eindeutiger.Ich habe die beiden Optionen wieder entfernt und die neue If Anweisung an die Stelle der alten If Anweisung hinein kopiert. Exit Sub End If swAsm_titel = swModel.GetTitle Set tmpObj = swApp.OpenDoc6(Teil_Einf1.pfad & ListBox1.Text, swDocPART, 0, "", errors, warnings) If tmpObj Is Nothing Then MsgBox "Datei konnte nicht geladen werden!", vbOKOnly, "Fehle ...
| | In das Form SolidWorks wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
