Hallo Zusammen,
ich brauche eure Hilfe, und zwar:
Ich möchte in Catia V5 ein Makro starten, das mir aus einem txt-File den kompletten Text ausliest und dann nach diesem Sucht und die Bauteile aktiviert.
Inhalt der txt-Datei ist schon in dem Suchformat: (NameInGraph=*123.456.789* + NameInGraph=*987.654.321*);all
Hintergrund der Sache ist folgender, ich habe mehrere Bauteilenummern und will die Parts dazu in Catia aktivieren.
Ich habe bereits ein Makro, dass jede Teilenummer einzeln sucht und aktiviert --> dauert sehr lange.
Jetzt habe ich mir gedacht, wenn ich die Teilenummern alle gleichzeitig suche geht das bestimmt schneller.
Mithilfe von Excel kann ich die Teilenummer auch in den Suchcode umformatieren, das ist kein Problem.
Diesen Suchcode kopiere ich dann in die txt-Datei.
So weit bin ich bis jetzt:
Code:
Sub CATMain()'Liest Inhalt der testfile.txt aus
Set fso = CreateObject("Scripting.FileSystemObject")
Set Textdatei = fso.OpenTextFile("H:\testfile.txt", 1)
If Not Textdatei.AtEndOfStream Then
Dateiinhalt = Textdatei.ReadAll
End If
Textdatei.Close
'Zur Kontrolle:
'Box = MsgBox(Dateiinhalt)
'Sucht Inhalt in aktivem Product
Set productDocument1 = DMU.ActiveDocument
Set selection1 = productDocument1.Selection
selection1.Search " &Dateiinhalt& "
CATIA.StartCommand ("Activate Terminal Node")
End Sub
Auch wenn ich den Test mache und mir den „Dateiinhalt“ in einer MsgBox anzeigen lasse kommt der richtige Text.
Leider funktioniert es nicht, nach dem „Dateiinhalt“ zu suchen, da bringt er mir immer eine Fehlermeldung (Methode Search failed).
Wenn ich aber den Inhalt der txt-Datei nehme und diesen direkt in die Funktion selection1.Search einsetze funktioniert es:
Code:
selection1.Search "(NameInGraph=*123.456.789* + NameInGraph=*987.654.321*);all"
Das heißt für mich, die Angabe mit & Dateiinhalt & stimmt nicht.
Wie muss ich die Funktion selection1.Search umformulieren damit er mir nach dem Dateiinhalt aus der txt-Datei sucht?Gruß graaas
[Diese Nachricht wurde von graaas am 05. Apr. 2013 editiert.]
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP