| | |
 | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS |
| | |
 | 30 Jahre SOLIDWORKS - Tricks, die smarte Konstrukteur:innen wirklich voranbringen., ein Webinar am 11.12.2025
|
|
Autor
|
Thema: Laufzeitfehler '91' bei Set swConf = swModel.GetActiveConfiguration (1827 mal gelesen)
|
JFuks
Mitglied
   Beiträge: 28
Registriert: 20.11.2012 SWX 2019
|
erstellt am: 11. Nov. 2013 13:47  <-- editieren / zitieren -->   Unities abgeben:          
|
Lutz Federbusch
Ehrenmitglied V.I.P. h.c.
Dipl.-Ing. Maschinenbau
Beiträge: 3094
Registriert: 03.12.2001 alle SW seit 97+
AutoCAD2016-2022
ERP ProAlpha + CA-Link
Intel Core i7-7820K 32GB
Win10x64 Quadro K5000
SpacePilot
|
erstellt am: 11. Nov. 2013 14:09 <-- editieren / zitieren --> Unities abgeben: Nur für JFuks 
Mit welcher Version probierst Du es?! Eigentlich sollte das so funktionieren. Bei Dir konnte offenbar mindestens ein Objekt nicht korrekt deklariert werden. Zum Fehler führt das bei der ersten Funktion, die mit einem Objekt ausgeführt werden soll (hier aktive Konfiguration ermitteln). ------------------
Lutz Federbusch
Mein Gästebuch
Der Mensch, Herr oder Sklave der Technik? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Lutz Federbusch
Ehrenmitglied V.I.P. h.c.
Dipl.-Ing. Maschinenbau
Beiträge: 3094
Registriert: 03.12.2001 alle SW seit 97+
AutoCAD2016-2022
ERP ProAlpha + CA-Link
Intel Core i7-7820K 32GB
Win10x64 Quadro K5000
SpacePilot
|
erstellt am: 11. Nov. 2013 14:14 <-- editieren / zitieren --> Unities abgeben: Nur für JFuks
Probiere mal nur das Allernötigste: Sub main()
Dim swApp As SldWorks.SldWorks
Dim swModel As SldWorks.ModelDoc2
Dim swConf As SldWorks.Configuration
Set swApp = CreateObject("SldWorks.Application")
Set swModel = swApp.ActiveDoc
Set swConf = swModel.GetActiveConfiguration
MsgBox ("Konf=" + swConf.Name + "=")
End Sub ------------------
Lutz Federbusch
Mein Gästebuch
Der Mensch, Herr oder Sklave der Technik? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
JFuks
Mitglied
Beiträge: 28
Registriert: 20.11.2012 SWX 2019
|
erstellt am: 11. Nov. 2013 15:22 <-- editieren / zitieren --> Unities abgeben:
Hallo Lutz Federbusch, dort habe ich die gleiche Fehlermeldung auch bekommen. Es ist in der Version Solidworks 2011. Bei uns haben wir die Version 2013 instaliert und dort funktioniert alles gut. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
| |
Lutz Federbusch
Ehrenmitglied V.I.P. h.c.
Dipl.-Ing. Maschinenbau
Beiträge: 3094
Registriert: 03.12.2001 alle SW seit 97+
AutoCAD2016-2022
ERP ProAlpha + CA-Link
Intel Core i7-7820K 32GB
Win10x64 Quadro K5000
SpacePilot
|
erstellt am: 11. Nov. 2013 15:28 <-- editieren / zitieren --> Unities abgeben: Nur für JFuks
Wenn das hier (ist versionsunabhängig): Sub main()
Dim swApp As Object
Dim swModel As Object
Dim swConf As Object
Set swApp = CreateObject("SldWorks.Application")
Set swModel = swApp.ActiveDoc
Set swConf = swModel.GetActiveConfiguration
MsgBox ("Konf=" + swConf.Name + "=")
End Sub läuft, dann liegt es an den Verweisen im Makro (Kontrolle über Extras-Verweise in der VBA-Umgebung), die an eine feste Version der SW-Bibliotheken gebunden sind. versionsunabhängig ist eh' besser! ------------------
Lutz Federbusch
Mein Gästebuch
Der Mensch, Herr oder Sklave der Technik? Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Foren auf CAD.de (alle Foren)
| 
