Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de
  CATIA V5 Programmierung
  Makro mit variablem Dateiname

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
  
CATIA V5 Grundkurs | Einsteiger - 5 Std. 15 Min 48
  
KISTERS 3DViewStation: Neuer Strukturvergleich ab sofort verfügbar, eine Pressemitteilung
Autor Thema:  Makro mit variablem Dateiname (1017 mal gelesen)
cimnese
Mitglied
--


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

Beiträge: 45
Registriert: 13.10.2009

Catia V5 SP7 R20

erstellt am: 27. Feb. 2015 09:54    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 Catia Gemeinde,
bin ein Neuling im Bereich makro schreiben und hätte da eine Frage.

Ich möchte ein Makro schreiben mit Datei neu aus
- ein bestimmtes Teil öffnen
- dabei die Teilenummer umbenennen
- dieses dann an einem vorbestimmten Pfad der immer der gleiche ist speichern,
- dabei möchte ich die Teilenummer mit einer Inputbox variabel gestalten.

Das klappt alles ganz gut ich habe nur das Problem das ich die Teilenummer nicht als variable im Pfad
eingefügt bekomme.
Wie gesagt bin ein Neuling im diesen Bereich.

Hier mal mein Problem mit save as, wäre super wenn mir jemand helfen könnte.


Set product1 = partDocument1.GetItem("Neuer Koerper")

product1.PartNumber = InputBox("Bennenung")

Set partDocument1 = CATIA.ActiveDocument

partDocument1.SaveAs "C:\Catia_DBWork\Test.CATPart"

End Sub


ich möchte das das wo ich in die Inputbox schreibe den Text "Test" ersetzt

Vielen Dank im voraus Gruß

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

Trilemma
Mitglied
staatl. gepr. Techniker


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

Beiträge: 262
Registriert: 20.08.2010

Catia V5 R19 SP8
Windows7 64bit 12GB 2,93GHz
Dell Precision T3500

erstellt am: 27. Feb. 2015 10:59    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 cimnese 10 Unities + Antwort hilfreich


Save_as.zip

 
Moin,
hier eine klene Anwendung und die Programmdateien.
ist mit VB 2010 erstellt.

Gruß
Peter

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

joehz
Mitglied
Freiberuflicher Konstrukteur


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

Beiträge: 1057
Registriert: 25.11.2006

Win7 Pro 64 + Ubuntu + Irix6.5.20
Dell Precision M6600 i7-2960XM 2.7GHz 16GB
NVidia Quadro M5010
Catia V5R19
VB6Pro.SP6/VBA 6.5.1053

erstellt am: 27. Feb. 2015 14:03    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 cimnese 10 Unities + Antwort hilfreich

Hallo cimnese,

erstmal würd ich an deiner Stelle mit dem VBA-Editor arbeiten (Tools/Macro/VBA-Editor).

Kopiere, einmal im Editor angekommen, Deine Routine in ein Modul. Entweder per Cut/Paste oder Import.
Im VBA-Editor gibt's eine Online-Hilfe.
Hilfe zu einem bestimmten Thema: Cursor auf zB SaveAs setzen und F1 drücken.

Im obigen Fall:

Code:

  partDocument1.SaveAs "C:\Catia_DBWork\" & partDocument1.Name
End Sub


Ausserdem zu Eigenstudium:

- String Manipulation Keyword Summary

Tschau,
Joe

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

cimnese
Mitglied
--


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

Beiträge: 45
Registriert: 13.10.2009

Catia V5 SP7 R20

erstellt am: 27. Feb. 2015 15:11    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

Super Joe,
hat einwandfrei geklappt, hatte fast schon die Lösung wollte nur immer noch .catpart hinzufügen habe ich aber nicht benötigt.
Werde mich mit dem VBA noch ein bischen auseinandersetzen.

Gruß

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)2025 CAD.de | Impressum | Datenschutz