|
Autocad VBA : Ersetzen von Blöcken mit Vba
rstu am 17.06.2004 um 11:20 Uhr (0)
Hallo, ich muss mit Hilfe von Vba in einer Autocad-Zeichnung einzelne Blöcke durch eine neuere Version (inclusive veränderter Attribute) ersetzen. die neuen Blöcke befinden sich in einer Symbol-Dwg. Wenn ich beide Dateien in Autocad lade, kann ich in einer Listbox mir alle Blöcke der zu ändernden Zeichnung, in einer anderen Listbox alle Blöcke der Symbol-Dwg anzeigen lassen, dann markieren, welche Blöcke durch welchen Block ersetzt werden soll. Bis hierhin ist alles leicht programmierbar. Aber jetzt: für ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Ersetzen von Blöcken mit Vba
rstu am 17.06.2004 um 11:23 Uhr (0)
Hallo, ich muss mit Hilfe von Vba in einer Autocad-Zeichnung einzelne Blöcke durch eine neuere Version (inclusive veränderter Attribute) ersetzen. die neuen Blöcke befinden sich in einer Symbol-Dwg. Wenn ich beide Dateien in Autocad lade, kann ich in einer Listbox mir alle Blöcke der zu ändernden Zeichnung, in einer anderen Listbox alle Blöcke der Symbol-Dwg anzeigen lassen, dann markieren, welche Blöcke durch welchen Block ersetzt werden soll. Bis hierhin ist alles leicht programmierbar. Aber jetzt: für ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Ersetzen von Blöcken in VBA
rstu am 17.06.2004 um 11:15 Uhr (0)
Hallo, ich muss mit Hilfe von Vba in einer Autocad-Zeichnung einzelne Blöcke durch eine neuere Version (inclusive veränderter Attribute) ersetzen. die neuen Blöcke befinden sich in einer Symbol-Dwg. Wenn ich beide Dateien in Autocad lade, kann ich in einer Listbox mir alle Blöcke der zu ändernden Zeichnung, in einer anderen Listbox alle Blöcke der Symbol-Dwg anzeigen lassen, dann markieren, welche Blöcke durch welchen Block ersetzt werden soll. Bis hierhin ist alles leicht programmierbar. Aber jetzt: für ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layer ersetzen
Hman am 19.12.2005 um 16:46 Uhr (0)
Wenn du mir erklärst wie ich ein Script auf einem Button legen kann?Traue meinen Mitarbeitern nicht zu ein Script zu starten.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layer ersetzen
tunnelbauer am 19.12.2005 um 16:39 Uhr (0)
Hi,bevor du jetzt grossartig in die Programmiererei einsteigst; ist es wirklich erforderlich etwas zu programmieren ? Oder würde der Befehl rename und ein Script eventuell schon reichen ?------------------GrüsseThomas
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Ersetzen von Blöcken in VBA
CADwiesel am 17.06.2004 um 11:27 Uhr (0)
schön das du den Weg gefunden hast. Bitte benutze für deine Fragen auch die richtigen Foren und nutze zuerst die Suchfunktion. Verschoben nach autocad vba ------------------ Gruß CADwiesel Besucht uns im CHAT
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layer ersetzen
Proxy am 19.12.2005 um 17:07 Uhr (0)
Auszug aus einem kleinem Layername-Umbenenner :Code:[...]Dim objLayer as AcadLayerFor Each objLayer In ThisDrawing.LayersobjLayer.Name=Replace(objLayer.Name, "-S", "_S")Next[...]------------------ MfG Proxy
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layer ersetzen
Hman am 19.12.2005 um 16:34 Uhr (0)
I möchte ein VBA Programm schreiben, das bestimmte Layer in einer Zeichnung durch andere Layer ersetzt. Die Forumssuche und die Hilfe von Acad haben mir nicht weiter geholfen. Hat so etwas schon jemand programmiert?
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Blockname automatisch generieren und Block einfügen/ersetzen
KlaK am 13.02.2009 um 20:35 Uhr (0)
Dimensionierung?Dim Bpkt(0 To 2) As Double
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Layer ersetzen
Langenhorst am 22.12.2005 um 11:11 Uhr (0)
Hallo Hman,hast du dich schon mit der Layerkonvertierung auseinander gesetzt? Ich weiß zwar nicht, ob dies bei der 2004er schon dabei ist, aber ich habe ganz komfortabel damit zahlreiche Zeichnungslayer in vielen Zeichnungen umbenannt.Gruß,Michael------------------
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layer ersetzen
Hman am 20.12.2005 um 07:32 Uhr (0)
Wenn ich den Code eingebe kommt VBA mit folgender FehlermeldungRun-time error -2145386405 (8020005b)Duplicate record nameHier mein modifizierter Code:Sub layer()Dim objLayer As AcadLayerFor Each objLayer In ThisDrawing.Layers objLayer.Name = Replace(objLayer.Name, "AM_3", "AM_0")NextEnd Sub
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Blockname automatisch generieren und Block einfügen/ersetzen
alfred neswadba am 13.02.2009 um 17:11 Uhr (0)
Hi Georg, Zitat:Sind es Kommazahlen, bekomme ich FehlermeldungSonderzeichen sind in Blocknamen nicht, daher könntest Du diese vorher ersetzen:Code:blockname = "Langloch " + replace(replace(laenge,",","_"),".","_") + "x" + replace(replace(breite,",","_"),".","_") + "_r" + replace(replace(radius,",","_"),".","_") Zitat:das Gleiche Langloch noch mal ein (mit meinem VBA Programm), mit gleichen Namen natürlichda musst Du zuerst überprüfen, ob es schon eine Blockdefinition mit dem Namen existiert, bevor Du eine ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Layer ersetzen
Stelli1 am 20.12.2005 um 09:09 Uhr (0)
Hallo,die Lösung steckt in der FehlermeldungDuplicate record nameEs gibt bereits einen Layer mit diesem Namen.Da musst du vorher unterund-color: #FFFF99'>suchen ob es den Layerbereits gibt.Vielleicht mit dieser Funktion.Wenn ein Layer(name) schon vorhanden ist, kannst du ja eineMeldung ausgeben.Stelli------------------Warum lispeln wenns auch anders geht.
|
| In das Form Autocad VBA wechseln |
