Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  SolidWorks
  Makro Neue Konfiguration erstellen

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SOLIDWORKS
  
Engineering in the Cloud: Link Sharing of Design Data
Autor Thema:  Makro Neue Konfiguration erstellen (1266 mal gelesen)
HOMandre
Mitglied



Sehen Sie sich das Profil von HOMandre an!   Senden Sie eine Private Message an HOMandre  Schreiben Sie einen Gästebucheintrag für HOMandre

Beiträge: 35
Registriert: 08.01.2019

erstellt am: 12. Sep. 2020 08:53    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities


Bild1.JPG


Bild2.JPG


Bild2.JPG

 
Guten Morgen zusammen, ich kann leider im Forum nichts passendes finden. Im Netz habe ich den Code, siehe "Bild Code" gefunden, welcher so noch nicht richtig ist.

Ich möchte per Makro eine Konfiguration erstellen.
Mein Code siehe "Bild Code" fügt immer nur eine Unterkonfiguration bei der ausgewählten Konfiguration ein siehe "Bild 1". Ich möchte, jedoch auch neue Hauptkonfigurationen erstellen können siehe "Bild".
Kann mir hierbei jemand bitte behilflich sein.

Vielen Dank.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Ralf Tide
Moderator
-




Sehen Sie sich das Profil von Ralf Tide an!   Senden Sie eine Private Message an Ralf Tide  Schreiben Sie einen Gästebucheintrag für Ralf Tide

Beiträge: 4978
Registriert: 06.08.2001

Sehr seltsame Dinge passiern <Klaus Lage - Toy Story>
.-)

erstellt am: 12. Sep. 2020 12:34    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für HOMandre 10 Unities + Antwort hilfreich

Hallo HOMandre,

bei mir funktioniert die Aufzeichnung eines Makros einwandfrei. Aufgezeichneter code (habe die neue Konfiguration "1" genannt):

Code:
Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long

Sub main()
Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
boolstatus = Part.AddConfiguration2("1", "", "", True, False, False, True, 256)
End Sub


In der Hilfe wird zwar der aufgezeichnete code in der 2016 als obsolete angezeigt aber dafür kannst Du AddConfiguration3 verwenden.

HTH
Ralf

------------------

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

HOMandre
Mitglied



Sehen Sie sich das Profil von HOMandre an!   Senden Sie eine Private Message an HOMandre  Schreiben Sie einen Gästebucheintrag für HOMandre

Beiträge: 35
Registriert: 08.01.2019

erstellt am: 20. Sep. 2020 13:17    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo Ralf,
vielen Dank für die Hilfe. Der Code macht das was er soll. Ich muss ihn für meine Zwecke noch etwas anpassen, aber er rennt. Was ich nicht verstehe ist, wieso ich das Hinzufügen nicht mit dem Makrorecorder aufzeichnen konnte. Es werden nur die Variablen gesetzt und definiert, danach ist der Code leer. Habe es jetzt mehrfach versucht. Nutze SW2020. Dieses Problem habe ich auch bei anderen Funktionsaufzeichnungen, welche ich gerade leider nicht benennen kann. Es ist aber auch nicht so, dass es grundsätzlich nicht funktioniert.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

davenudel
Mitglied
Konstrukteur

Sehen Sie sich das Profil von davenudel an!   Senden Sie eine Private Message an davenudel  Schreiben Sie einen Gästebucheintrag für davenudel

Beiträge: 9
Registriert: 27.03.2015

Solidworks 2019 SP5.0
DBWorks

erstellt am: 05. Okt. 2020 15:41    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für HOMandre 10 Unities + Antwort hilfreich

Danke für das Makro.
Wäre es bei dem Makro möglich die Konfiguration mittels Eingabefeld gleich zu benennen?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

ad_man
Mitglied
freiberuflicher Entwicklungsing. (Fahrzeugtechnik, CSWP, CPPA))


Sehen Sie sich das Profil von ad_man an!   Senden Sie eine Private Message an ad_man  Schreiben Sie einen Gästebucheintrag für ad_man

Beiträge: 1366
Registriert: 20.12.2003

erstellt am: 05. Okt. 2020 17:00    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für HOMandre 10 Unities + Antwort hilfreich


Konfiguration.zip

 
Hallo,

hier auf die Schnelle ein einfaches Eingabeformular ohne große Prüfung etc.

------------------
==========
Gruß
Andreas
==========

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

HOMandre
Mitglied



Sehen Sie sich das Profil von HOMandre an!   Senden Sie eine Private Message an HOMandre  Schreiben Sie einen Gästebucheintrag für HOMandre

Beiträge: 35
Registriert: 08.01.2019

erstellt am: 05. Okt. 2020 17:06    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo ist jetzt wirklich nur kurz und knapp. Wenn ich etwas Zeit habe antworte ich noch mal ausführlich.

Sub NeueKonfiguration()
Dim swApp As Object
Dim Part As Object
Dim boolstatus As Boolean
Dim longstatus As Long, longwarnings As Long

Set swApp = Application.SldWorks
Set Part = swApp.ActiveDoc
boolstatus = Part.AddConfiguration2("Hier Name der Konfiguration", "", "", True, False, False, True, 256)
End Sub

Hoffe das hilft erst mal weiter

Gruss
Andre

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2024 CAD.de | Impressum | Datenschutz