Hallo,
ich habe eine Zeichnung mit mehreren Blättern und möchte nun aus einer anderen Zeichnung ein Blatt einfügen. Ich habe es so versucht, dass ich das gewünschte Blatt selektiere, kopiere und dann in der Zeichnung, in die das Blatt rein soll, einfüge. Kopieren geht, nur das Einfügen nicht. Warum?
Hier mein Code:
Set DrwDocument = CATIA.ActiveDocument
Set DrwSheets = DrwDocument.Sheets
Set DrwSheet = DrwSheets.Item(2)
Set SelMasterDoc = CATIA.ActiveDocument.Selection
SelMasterDoc.Add(DrwSheet)
'-- ... Blatt kopieren, ... --
SelMasterDoc.Copy
'-- ... zur ursprünglichen Zeichnung umschalten ...
SwitchToOldDrw
'-- ...und Blatt in Zeichnung einfügen --
Set DrwDocument = CATIA.ActiveDocument
Set DrwSheets = DrwDocument.Sheets
Set DrwSheet = DrwSheets.Item(1)
Set SelOldDrw = CATIA.ActiveDocument.Selection
SelOldDrw.Add(DrwSheet)
SelOldDrw.Add(SelMasterDoc.Item(1).value)
SelOldDrw.Paste
Kann mir jemand helfen?
Viele Grüße
------------------
Karin
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP