---

Hallo zusammen,

wie kann ich innerhalb einer selection eine Bohrung löschen und an der gleichen Stelle eine neue Bohrung erzeugen?

Vielen Dank

Georg

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

---

Hallo GeorgK,

also evtl. mit copy/cut und paste und die alte Bohrung löschen mit

selection1.Delete

oder du liest vor dem löschen alle Parameter und Referencen der Bohrung aus und Erzeugst damit die neue mit
Set hole1 = shapeFactory1.AddNewHoleFromRefPoint(reference1, reference2, 10#)

habs aber jetzt nicht ausprobiert.

mfG
Mario

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

---

Hallo Mario,

vielen Dank für Deine Hilfe. Leider komme ich so nicht weiter. Wer hat noch eine Idee?

Viele Grüße

Georg

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

---

Servus
Und wie weit kommst du?
Wie Mario es beschriebe hat sollte es funktionieren:
-> Bohrung selektieren
-> Selektion kopieren (oSel.Copy) oder sogar ausschneiden
-> Selektion löschen (oSel.Delete)
-> Körper selektieren und Bohrung einfügen (oSel.Paste)
-> neue Bohrung anpassen
Wofür benötigst du dies? Du kannst doch die "alte" Bohrung modifizieren.

Gruß
Bernd

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

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

---

Derzeit verändere ich die Bohrung mit einem Macro. Leider gibt es Fälle in denen das Macro in einen Fehler läuft.
Um nicht alle Fälle abfragen zu müssen wollte ich die Bohrung löschen und durch eine neue ersetzen.

In der Hilfe gibt es dieses Macro: CAAPriChangeHole.CATScript oder CAAPriChangeHole.catvba. Leider läuft die VBA-Version nicht unter x64 da das Microsoft FlexGrid (MSFlexGrid) object: mfgDescription verwendet wird.

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