Hallo zusammen!
Ich habe mich in diesem Forum angemeldet, da ich mich nicht so gut in die Programmierung in VBA Catia/Delmia auskenne.
Hier nun gleich meine Frage:
Ich habe eine in Delmia erstellte Datei: XX.Catalog. In dieser Datei befinden sich einige Kapitel mit Unterkapitel und Komponentenfamilie mit Komponenten.
Diese Komponenten haben eine Referenz auf Verzeichnisse.
Diese Verlinkten Verzeichnisnamen (z.B. C:\MeineDaten\Delmia\Verz1\4711.CATProduct) müssen jetzt geändert werden in C:\MeineDaten\Delmia\VerzNEU\4711.CATProduct.
Das heißt, Änderung der Verlinkten Dateinamen von "Verz1" ==> "VerzNEU".
Von diesen Verlinkungen gibt es ca. 800 Stück.
Bis jetzt habe ich:
Sub CATMain()
On Error Resume Next
Dim doc As Document
Set doc = DELMIA.ActiveDocument
If doc Is Nothing Then
MsgBox "Please load a product - THEN activate this function!"
Return
End If
' ab hier ????????????????
End Sub
Gibt es evtl. auch eine Lösung in VB 2010? Hier bin ich eher zu Hause.
Kann mir jemand helfen!!????
PS: Ich bin nicht zu faul dazu, ich kann es einfach nicht!
------------------
mfg
Hannes56
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP