|
Autocad VBA : Bestimmter Vektor aus Zeichnung herauskopieren
BloodyMess am 30.06.2005 um 12:53 Uhr (0)
Hallo VIP, ein SelectionSet oder AuswahlSatz sollte es sein, was Du suchst. Lies einfach ein bissle im Forum oder in der Hilfe. Gruss TP ------------------
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Alle Textstile in einer Zeichnung ändern
Netwurm am 24.09.2009 um 12:04 Uhr (1)
Trotzdem vielen Dank dafür, dass Du Dir die Mühe gemacht hast, mir zu helfen
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : alle Layout löschen in Zeichnung
vittorio0 am 14.03.2013 um 16:24 Uhr (0)
Hallo,ich möchte alle vorhandenen Layouts in der aktuellen Zeichnung löschen. Vorher füge ich noch ein Layout mit dem Namen "dummy" ein da ja man immer min. 1 Layout und den Modellbereich in Autocad haben muss. Der folgende Code funktioniert bis er auf den Layoutnamen "Model" kommt. Danach kommt die Fehlermeldung "Error 5: Ungültiger Prozeduraufruf oder ungültiges Argument" Was mach ich da falsch?Code: Delete all layouts @@@ Dim TabCount As Long, TabOrder As Long Dim TabName As String T ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Bemaßung in Zeichnung ändern
alfred neswadba am 11.08.2010 um 17:44 Uhr (0)
Hi,falscher Ansatz (denke ich mal ). Ändere den Bemaßungsstil (Primäreinheiten == Einheitenformat und Bemaßungsskalierung) statt die Maßzahlen zu überschreiben! Damit lebt die Bemaßung weiter, was bei Textüberschreibung nicht mehr wirklich funkt.- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : mit variablen Werten eine komplette Zeichnung erstellen
RoSiNiNo am 11.08.2003 um 07:48 Uhr (0)
Da wäre mir noch etwas eingefallen, du mußt nicht unbedingt die Winkel rechnen. Du könntest die Rechtecke zeichnen, dann die Bögen mit den Winkeln 0° bis 45° (oder 60°). Dann könntest du mit IntersectWith die Schnittpunkte ermittlen und dadurch hast du die exakten Winkeln für deine Bögen -- AngleFromXAxis(Point1, Point2) Weiters würde ich alle Objekte in ein Array schreiben, dann könntest du zwei Funktionen schreiben, eine die dir alle Objekte eines Arrays mit einem gewissen Winkel um einen Punkt dreht, ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Variable aus Modul mit Zeichnung speichern
Burschii am 09.01.2007 um 07:48 Uhr (0)
Hallo Andreas,hast Du dafür vielleicht auch ein Beispiel?Kann unter der Hilfe dazu nichts finden.Gruß, Burschii
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : bereits vorhandene blöcke in einer zeichnung löschen
h1981 am 11.08.2005 um 09:54 Uhr (0)
liebe forumsmitglieder!trotz vielem recherchierens im netz und auch bei euch im forum schaffe ich es nicht folgendes problem in meinem makro zu lösen.im wesentlichen transferiert dieses makro zelleneinträge aus excel nach autocad in blöcke mit attributen und umgekehrt. dieser teil funktioniert bereits klaglos.nun möchte ich eine möglichkeit einbauen bereits bestehende daten zu überschreiben. dabei gelingt es mir nicht referenzierte blöcke bzw. deren blockreferenzen aus der zeichnung zu entfernen. die folge ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Text auf Zeichnung löschen
startrek am 10.06.2004 um 14:42 Uhr (0)
Hi Marcus, klitzekleiner Ansatz: Code: Sub x() Dim i%, s$ s = InputBox( Text eingeben , Suche ) If s = Then Exit Sub With ThisDrawing.ModelSpace For i = .Count - 1 To 1 Step -1 If TypeName(.Item(i)) = IAcadText Then If .Item(i).TextString = s Then .Item(i).Delete End If Next End With End Sub ciao Nancy
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Alle Zeichenobjekte einer Zeichnung in eine andere Kopieren
Gloem am 22.10.2008 um 21:24 Uhr (0)
Hallo,ich wollte mal kurz fragen ob folgendes Programm ohne weiteres zu realisieren ist: Ich möchte automatisch per VBA alle Objekte einer Zeichnung auswählen und in eine andere Zeichnung einfügen. Also quasi Kopieren mit Basispunkt(0,0) in der Quelldatei und Einfügen bei 0,0 in der Zieldatei automatisieren, da ich die manchmal für viel Zeichnungen machen muss.Selectiert hab ich die ganzen Objekte schon nur fehlt mir jetzt der Befehl um die in der Zielzeichnung einzufügen.Code: If (Dir(LB_Dateiliste.Lis ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Blockattribute aus einer Zeichnung und in Excel übergeben
KAME am 04.04.2013 um 22:01 Uhr (0)
Hallo Klaus,da mir heute der kopf schon raucht werd ich das morgen probieren------------------mfg Ronald
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : allen Blocken in einer Zeichnung Linieweight zuweisen
Carsten1210 am 15.03.2007 um 14:10 Uhr (0)
Hi,Das hab ich bei der Suche übersehen. Gruß, Carsten
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : vba tool mit jeder Zeichnung starten
CADmium am 23.04.2007 um 12:15 Uhr (0)
nutze vbaload und vbarun in Verbindung mit command und lies dir die Sache mit der acaddoc.lsp durch ..------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Einen Block erstellen aus vorhandenen Blöcken in einer Zeichnung
jemuehh am 14.08.2007 um 23:33 Uhr (0)
Hab die Antwort durch ausprobieren selber gefunden!Durch umbenennen des Blocks mit seinem .Handle lassen sich nun beliebig viele Blöcke erzeugen und in die Zeichnung einfügen.Besten Dank nochmal!!MFGJensDim nBlock As AcadBlockDim InsPoint(2) As DoubleDim IDpairs As IntegerDim mBlock As AcadBlockReferenceDim i As IntegerBlock erstellenSet nBlock = Blocks.Add(InsPoint, "AS_STUEHLE")nBlock.Origin = ASbaseObjekte zusammenfassenCopyObjects ASobj, nBlock, IDpairs Set mBlock = ThisDrawing.ModelSpace.InsertBlock( ...
|
| In das Form AutoCAD VBA wechseln |
