---

Guten Morgen allerseits,

habe folgendes Problem:

Über "Neu aus" wird ein product sowie die zugehörigen drawings ausgewählt. Danach will ich alle geöffneten Datein in einem Verzeichnis speichern; das klappt soweit mit dem product sowie den parts, jedoch nicht mit den drawings. Gib es eine Möglichkeit, alle drawings auf einmal in das gleiche Verzeichnis zu speichern? Bei vielen drawings ist der Weg, alle einzeln abzuspeichern sehr mühsam.

Besten Dank an alle im Voraus!

Freundlichen Grüße

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

---

Hallo,
hier sollte ist ein Skript dabei sein was dir die Zeichnungen in das selbe Verzeichnis speichert.

------------------
Sei Schlau bleib Dumm !!?!!

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

---

Fehlermeldung.jpg Makro.jpg

Hallo,

erstmal dankeschön für die Antwort. Wenn ich das Ganze nach der Anleitung mache, und das Script "Alle Zeichnungen automatisch speochern" ausführe, kommt folgende Fehlermeldung und beim MAkro springt er in die Zeilen. (siehe Anhänge)

Kann mir jemand helfen?

Besten Dank im Voraus!

Freundliche Grüße

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

---

Servus
Ich vermute, dass das Makro aus der Vorderansicht (mit diesem Namen) das Part/Product ermittelt von dem die Ansicht abgeleitet wird. Da bei dir vermutlich diese Ansicht nicht existiert (anders heiß), fällt das Makro auf die Name.
Versuch mal folgende Änderung:

Code:

---

Set ProductDrawn = oDrwSheet.Views.item(3).GenerativeBehavior.Document

---

oder ggf ... Views.Item("Front view")...

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Hallo Bernd,

dankeschön für deine Hilfe- leider ohne erfolg. Der Fehler bleibt nach wie vor. Hast du sonst noch eine Idee?

Freundliche Grüße

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

---

Hallo,

Lade doch mal bitte ein Bild deines Zeichnungsbaumes hoch das würde weiterhelfen.

Denn in dem Skript wird die Vorderansicht Aktiviert und dann der Pfad gelesen.

Sollte bei dir keine Vorderansicht vorhanden sein, kann man mit Item(3) eine Ansicht Aktivieren. (hierbei muss aber an dieser stelle eine Abgeleitete Ansicht sein)

Als Test:
Benenne doch mal bitte eine Ansicht in Vorderansicht und Starte mein Original Skript

------------------
Sei Schlau bleib Dumm !!?!!

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

---

Zeichnungsbaum.jpg

Hallo,

anbei das Bild "Strukturbaum"

Besten Dank für eure Hilfe!

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

---

Hallo,

ich weiß nicht genau, ob das was damit zutun hat, aber ich schreibs vorsichtshalber mal ;-)

beim Makro "Suchen und Ersetzen", was wird da genau gemacht bzw. was soll ich da genau suchen und ersetzen?

Freundliche Grüße

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

---

Hallo,

bei diesem Skript wird der Strukturbaum im Product durchsucht und XXXX durch YYYYY ersetzt wenn du dieses nicht benötigst einfach weglassen.

Sollten die Zeichnungen alle so aufgebaut sein sollte wie bgrittmann schon geschieben hat klappen

Die Zeile:

Code:

---

Set ProductDrawn=oDrwSheet.Views.Item("Vorderansicht").GenerativeBehavior.Document

---

durch

Code:

---

Set ProductDrawn = oDrwSheet.Views.Item(3).GenerativeBehavior.Document

---

Ersetzen

------------------
Sei Schlau bleib Dumm !!?!!

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

---

Fehlermeldungneu.jpg

Hallo,

habs nochmal mit der Änderung versucht. Die Fehlermeldung ist jetzt eine neue, aber die gleiche Zeile.

(Siehe Anhang)

Habt Ihr nochmal ne Idee? Besten Dank im Voraus.

Grüße

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

---

Hallo,

hab wirklich alles versucht. Anleitung ist echt top; und es funktioniert alles bis auf das Skript "Alle Zeichnungen automatisch speichern". Die parts werden alle in dem neuen Verzeichnis gespeichert. Nur eben die geöffneten drawings nicht.

Bin euch trotzdem für eure Mühe dankbar! Vielleicht könnt Ihr mir nochmal bei dem letzten Problem helfen-

Dankeschön!

Mit freundlichen Grüßen

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

---

ALLE_Zeichnungen_Automatisch_Speichern.CATScript.txt

versuch mal dieses

------------------
Sei Schlau bleib Dumm !!?!!

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

---

Fehlermeldung3.jpg

Hallo,

leider der gleiche Fehler. Anhang zeigt die entsprechende Zeile.

Besten Dank! Vielleicht klappts ja doch irgendwann.
Ps.: Was hast du geändert?

Mit freundlichen Grüßen

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

---

Registerkarte.jpg

Hallo,

vielleicht hilft dir diese Info noch weiter:

Wenn ich das Sktipt ausführe, "springt" catia in die Registerkarte "Blätter" (siehe Anhang), in dem verschiedene Formate hinterlegt sind.
Hat das mit dem zu tun?

Freundliche Grüße und schönen Abend

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

---

Hallo,

du musst noch die Zeile darüber (weil du keine Vorderansicht hast ) wieder einkommentirren.
Und die Zeile (wo er meckert) auskommentieren.

Machst du wie folgt:
Einfach den Harken Tauschen

Leider kann ich dein Problem nicht nachstellen bei mir macht er was er soll

Was Zeichnet den dein Makrorekorder auf wenn du eine Ansicht Aktivierst ?

Ich bin auch so langsam Ratlos

------------------
Sei Schlau bleib Dumm !!?!!

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

---

Servus
Dass das Makro nicht funktioniert kann mehrere Ursachen haben:
- könnte sein dass CATIA die Ansicht nicht so durchnummeriert wie diese angezeigt werden (ggf Set oDrwSheet = oDrawSheets.item("Zeichnung 1") versuchen (dann muss diese Benennung aber bei allen Zeichnungen so sein)
- wenn eine Ansicht von einer Szene abgleitet ist muss man bei Generative Behavior etwas ändern

Gruß
Bernd

@K.Siebert:
Warum aktiviert du in deinem Makro das entsprechende Blatt? Dies ist doch nicht notwendig

------------------
Warum einfach, wenn es auch kompliziert geht.

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

---

Guten Morgen,

also das mit den Kommentaren habe ich schon gemacht-es macht kein Unterschied, welchen von beiden ich einkommentiere. Derjenige Befehl, welcher auskommentiert ist, wird zum Fehler.

Was meinst dui genau mit Makrorecorder?Und was soll ich genau tun? Ist alles Neuland für mich :-) wäre nett, wenn du mir das kurz schreiben könntest.

Besten Dank im Voraus.

Mit freundlichen Grüßen

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

---

Fehler.jpg

Guten Morgen,

also habe ich auch versucht; leider ohne Erfolg. (Fehlermeldung siehe Anhang)

Was meinst du mit "- wenn eine Ansicht von einer Szene abgleitet ist muss man bei Generative Behavior etwas ändern"
was soll man da ändern?

Besten Dank für eure Mühe!!

Freundliche Grüße

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

---

Makro.JPG

Hallo,

ja das Ändert einiges bei Szenen muss ich zugeben das ich mich da auch nicht so auskennen.

Da muss man wahrscheinlich mit „Parent“ arbeiten.

Aber wie gesagt da kenne ich mich auch nicht genau aus eventuell mal Forensuche bemühen.

Makrorekorder  hier kann man sich die schritte aufzeichnen lassen die man in Catia macht
Leider wird nicht immer alles aufgezeichnet ist aber hilfreich

------------------
Sei Schlau bleib Dumm !!?!!

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

---

Test.zip

Hallo,

danke euch trotzdem für eure Hilfe! Anbei habe ich noch eine "Test Datei" erstellt, mit welcher der Fehler erscheint. Das Product besteht aus 2 parts. Eine Zeichnung ist von einem part, die andere vom product.

Freundliche Grüße und nochmals dankeschön!

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

---

ALLE_Zeichnungen_Speichern_NEU.CATScript.txt

Hallo,
so sollte es klappen.

------------------
Sei Schlau bleib Dumm !!?!!

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

---

Script.txt FehlerReferenz.jpg

Hallo,

so wie du es mir geschrieben hast, funktionierts noch nicht- aber mit (3) anstatt ("Vorderansicht") klappts. Anschließend kommt aber noch eine Fehlermeldung (siehe Anhang), welche ich einfach wegklicke. Kann man diese noch "wegmachen" ? :-)

Aber es funktioniert alles :-) :-)

Besten Dank für alles!!!!!!!!

Top Forum

Freundliche Grüße

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

---

Dann klammere die Box,

Code:

---

Box = MsgBox("        !! Es ist ein Fehler aufgetreten !! " + Chr(10) + Chr(10)+ "Die Zeichnung.........

---

Einfach aus dann kommt die Meldung auch nicht mehr.

------------------
Sei Schlau bleib Dumm !!?!!

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