|
Autocad VBA : region
mapcar am 19.11.2004 um 09:43 Uhr (0)
So, fuchsi: Dim regions As Variant, region As AcadRegion regions = ThisDrawing.ModelSpace.AddRegion(RoomObjects) Set region = regions(0) Das ist wenigsten getestet, weil es in meinem Programm funktioniert. AddRegion gibt immer ein Array zurück, weil mehr als eine Region entstehen kann (z.B. wenn in diesem Beispiel alle 8 Punkte auf einmal übergeben werden). Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Streamline
Heiko76 am 22.11.2004 um 09:38 Uhr (0)
Hallo zusammen, hat hier jemand schon erfahrung, im Programmieren (VBA) von AutoCAD / Inventor zu Streamline??? ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Mouseicon als ani???
mapcar am 22.11.2004 um 10:40 Uhr (0)
Hast du denn mal mit einem Cursor aus C:winntcursors gegengetestet? Vielleicht stimmt die Fehlermeldung ja einfach... Gruß, Axel Strube-Zettler ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mein gereimtes Gesülze
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
kiltswitch am 22.11.2004 um 12:09 Uhr (0)
Hallo, ich habe eine Frage: wie kann ich mit VBA alle Blöcke einer Zeichnung in eine Datei auslesen? Wichtig sind mir dabei die Koordinaten der Referenz-(Basis-)Punkte von den Blöcken, ihre Drehwinkel sowie ihr Name. Denn mit denen will ich weiterarbeiten. Die Darstellung der Daten soll tabellarisch sein -gibts Alternativen zu Excel?. Ich habe hier schon ein bißchen in anderen Threads rumgeschaut, aber noch nicht das richtig passende gefunden. Hat irgendwer einen Tipp oder sogar einen Code? Thanx Tobias
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Systemdrucker Parameter in VBA verarbeiten
TomiProg am 22.11.2004 um 13:03 Uhr (0)
Leider ist es nicht das, was ich gemeint habe. Wie der Drucker bzw. der Plotter von AutoCAD angesteuert wird, ist mir bekannt. Vielmehr beschäftigt mich die Frage, ob die Parameter auch vom Windows-Systemdrucker auslesbar sind. Mit Systemdrucker meinte ich nicht den von AutoCAD, sondern den von Windows selbst. Trotzdem Danke. Es sind in deiner Ausführung ein paar interessante Zeilen, die mein Programm besser und übersichtlicher machen könnten.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
kiltswitch am 22.11.2004 um 13:12 Uhr (0)
Also ideal wäre eine Datei, die in VBA integriert ist, somit man nicht auf externe Programme wie Excel zurückgreifen muß (wenn es jedoch nicht anders gehen sollte, dann wäre das doch eine Variante). Die Daten sollen tabellarisch aufgelistet werden: Blockname, X-Koordinate, Y-Koordinate, Z-Koordinate, Drehwinkel Und ganz wichtig: ich muß diese Daten weiterverarbeiten können. ----- Ich habe einen Code (auch mal hier bekommen), bei dem die Blockattribute in eine Textdatei exportiert werden. Aber die Werte wer ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
kiltswitch am 22.11.2004 um 14:19 Uhr (0)
Also so sieht mein Code derzeit aus. Was mir noch nicht gefällt, ist, dass er mir die Koordinaten der Blöcke mit etlichen Stellen ausliest. Kann ich da irgendwas dran deichseln, dass der mir z.B. nur zwei Nachkommastellen einträgt? Sub ReadBlockProperties() Dim AcMapEntity As AcadEntity Dim AcMapBlock As AcadBlockReference Dim fso As FileSystemObject Set fso = New FileSystemObject Dim TxtFile As TextStream Set TxtFile = fso.OpenTextFile("v:ausgabe.xls", ForWriting, True) For Each AcMapEntity In ThisDrawin ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
CAD-Huebner am 22.11.2004 um 14:20 Uhr (0)
Auf die erste Frage war mein Tippp, lies dir die VBA Beispiele im SamplesVBA Ordner von AutoCAD mal durch (speziell BlockReplace.dvb oder attext.dvb). Natürlich geht auch ein simples ATTEXT oder EATTEXT evt. in Verbindung mit SendCommand. Zur 2. Frage eine Gegenfrage Wonach sollen die Werte den sortiert werden, Namen, aufsteigende Werte der X oder Y-Koordinate? Da gibt es so viele Möglichkeiten, das muss man eben selbst wie gewünscht programmieren. Es gibt ja fertige Sortieralgoritmmen in VBA. Mit freundli ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
kiltswitch am 22.11.2004 um 14:50 Uhr (0)
Zunächst Danke für Deine Antwort. Den Tipp, mal den Ordner Samples zu durchstöbern, werde ich gern annehmen. Mit ungeordnet meinte ich nur, dass die Werte nicht separat in eigene Spalten abgelegt worden, sondern hintereinanderweg da standen. Aber das Problem habe ich lösen können. Es sollen wie schon erwähnt alle Blöcke/Blockreferenzen der aktuellen Zeichnung in eine Datei ausgelesen werden. Dabei ist der Blockname, die Koordinaten seines Basispunktes sowie sein Drehwinkel von Interesse. Mein Code tut das ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
kiltswitch am 22.11.2004 um 16:37 Uhr (0)
Hat irgendwer eine Idee, woran es liegen kann, dass die Koordinatenwerte so groß sind? Könnten das durch Rundungsfehler sein? Und was könnte der Grund sein, warum manche Drehwinkel-Werte nicht (korrekt) in die Datei übernommen werden? Bspw. hat ein Block in der Zeichnung die Verdrehung 90°, aber in der Excel-Datei steht der Wert 0 ?! Und meine letzte Frage, die habe ich vorhin schon einmal gestellt: kann ich mit VBA auch eine interne Datei - also keine eines externen Programmes wie Excel - erstellen, welch ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
RoSiNiNo am 22.11.2004 um 16:39 Uhr (0)
Es ist irgendwie sehr interessant wie du eine Excelldatei öffnest und auch hineinschreibst. Steht etwas anders in der ACAD-Hilfe, sieh einmal das Beispiel dort an. Der Winkel ist in Radian, vielleicht stört dich das etwas. Die Anzahl der Nachkommastellen kannst du ja in Excell auch noch einstellen, ist nicht unbedingt notwendig das schon in Acad zu erledigen, wenn du das aber möchtest gibt es da mehrere Möglichkeiten: 1. Round 2. Format Beschreibung steht in der Hilfe. ------------------ Roland
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
RoSiNiNo am 22.11.2004 um 16:45 Uhr (0)
Hast du die Komma richtig dargestellt, in Excell ist es wichtig die Werte mit dem richtigen Kommazeichen einzufügen, also Komma oder Punkt beachten! ------------------ Roland
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
kiltswitch am 22.11.2004 um 16:55 Uhr (0)
Die Kommawerte habe ich gar nicht beachtet, sondern lasse die Werte - ohne Einflüsse durch mich - einfach nach Excel übertragen. Der Tipp mit Round war gut, die Koordinaten stimmen jetzt. Nur bei dem Drehwinkel bin ich noch nicht im klaren, ob er stimmt. Ich vermute, der Wert in Excel (z.B. steht da 4,71) ist das umgerechnete Bogenmaß. Ich muß das mal zurückrechnen. Mich wundert nur, dass z.B. bei einer Angabe von 10° in der Zeichnung kein Wert in Excel eingetragen wird, da müßte doch wenigstens IRGENDWAS ...
|
| In das Form Autocad VBA wechseln |
