|
Autocad VBA : PDF mittels VBA erstellen
MetZip am 05.09.2005 um 15:02 Uhr (0)
An Brischke:Habe einen anderen Lösungsweg eingeschlagen: Ich habe unter den Verweisen die beiden Einträge für "Acrobat Distiller" und "Adobe Acrobat 5.0.." entdeckt. Nach einigem herum-googeln bin ich auf einige interressante Beispielcodes gelangt, mit denen ich die beiden Bibliotheken ansteuern kann.Der Code wird zwar um einige Zeilen länger, doch meines erachtens bin ich dann damit flexibler.meine Vorgangsweise:(1) Mittels PS-Trieber in AutoCAD PS-File (=PostScript-File) erstellen(2) Mittels Distiller au ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Block copieren und neu einfügen
MetZip am 05.09.2005 um 15:09 Uhr (0)
Hallo,Habe eure Diskussion verfolgt. Meine Frage hierzu: Gibt es mit diesem "simulierten" Autocad auch eine Möglichkeit zu plotten oder kennt jemand einen anderen Lösungsansatz. Mit thisdrawing.plot bei "offenen" Autocad kann man das ja ohne Probleme machen.Ich möchte gerne mit VB Layouts einer Zeichnung plotten können, ohne das AutoCAD komplett geladen wird.Grüsse, MetZip
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : ObjectDBX
Stelli1 am 07.09.2005 um 16:49 Uhr (0)
Hallo Florian,also du willst nicht die Definition sondern den Einfügepunkt(Blockreferenz). Wenn es 80000 Blöcke sind ?Gibt es eine weitere Selektion z.B. Layer, Farbe, Blocknameoder oder ?Wenn man unter VBA als Verweis "autocad/ObjectDBX Common xx.0 .."angibt kann man mit dem Objektbrowser (F2) die Methoden und Eigenschaften anschauen.GrussStelli1------------------
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : ObjectDBX
Stelli1 am 08.09.2005 um 10:52 Uhr (0)
Hallo Florian,stimmt leider das es hier kein selectionset gibt.Suchen könnte man so:Code:Private Sub CommandButton1_Click() Ist unter Verweisen eingebunden Dim axDoc As New AxDbDocument axDoc.Open "D:Daten_PZPZ_AW_DIN.DWG" Dim Entity As AcadEntity Dim BlockRef As AcadBlockReference Dim TestPunkt(0 To 2) As Double Dim InsPunkt As Variant TestPunkt(0) = 0: TestPunkt(1) = 0: TestPunkt(2) = 0 For Each Entity In axDoc.ModelSpace If Entity.EntityType = acBlockReference Then Set BlockRef ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : ObjectDBX
FlorianP am 08.09.2005 um 11:07 Uhr (0)
Hallo Stelli1zum Hintergrund.Wir führen die Vermessungspunkte als Blöcke mit Attributen.Da wir aber so viele Punkte haben sind diese in mehreren Zeichnungen aufgeteilt, sortiert nach ihrer Zugehörigkeit. Die eigentliche Graphik führen wir wiederum in seperaten Zeichnungen.Zukünftig wollen wir schon die Punkte in eine Datenbank schreiben, doch leider sind wir noch nicht ganz soweit. Zum einen haben wir auf die FDO-Geschichte gesetzt, doch da das Formate von AutoCAD 2005 mit dem von 2006 nicht kompatibel ist ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Makro aufzeichnen
Meriadoc am 14.09.2005 um 09:36 Uhr (0)
Hey Leute!Ich bin Bauingenieurstudent und habe bisher ein wenig mit VBA Excel herumgespielt. Nun wollte ich in mein Wissen auch gleich für VBA AutoCAD verwenden (möchte Excel und AutoCAD zum gemeinsamen Datenaustausch verwenden) und musste feststellen, dass ich gar keine Makros aufzeichnen kann. Bin ich nur zu flüchtig die Menüs durchgegangen, oder gibt es die in Excel vorhandene "Makro aufzeichnen" Möglichkeit unter AutoCAD wirklich nicht?Viele Grüße, Sebastian
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Makro aufzeichnen
Brischke am 14.09.2005 um 12:50 Uhr (0)
Zitat:Original erstellt von Meriadoc:...wie zum Beispiel der Befehl lautet, eine Linie zu zeichenen etc.?...Zeichnungselemente werden nicht gezeichnet, sondern der Zeichnungsdatenbank hinzugefügt.Deswegen zur Erläuterung:In Excel und in AutoCAD arbeitest du mit Objekten. Diese stellen bestimmte Methoden zur Verfügung und besitzen verschiedene Eigenschaften.Einzig mit den Methode und Eigenschaften kannst du arbeiten, um (Zeichnungs)Objekte zu erzeugen oder zu verändern. Um beim Bsp einer Linie zu bleiben:D ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : OT: gültige Pfade mit REs
mapcar am 17.09.2005 um 01:43 Uhr (0)
Das ist so nicht der typische Anwendungsfall für ein single pass S&R (also nur 1 Durchgang) - das ist eher das, was man eine Transliteration nennt (z.B. Umcodierung von einem Zeichensatz in einen anderen).Mit RE würde ich das ganz schlicht in einer Schleife abarbeiten, also eine Collection (key = ä, value = ae, key = Ä, value = Ae usw.) und dann durch die Collection iterieren.Der zweite Teil ist mir unklar: Du suchst nach den Zeichen, die nicht in dein Schema passen, aber was machst du dann damit? Nur Ausd ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Anzeigereihenfolge per VBA
Stelli1 am 21.09.2005 um 11:46 Uhr (0)
Hallo,und noch ein Problem.Wie kann ich mit VBA die Anzeigereihenfolge (ähnlich der AutoCAD Funktion) einstellen ?Stelli------------------
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : OpenOffice Datenbank Einbindung
autogis am 21.09.2005 um 14:18 Uhr (0)
Hallo zusammen,seit ein paar Tagen hab ich OpenOffice in der Betaversion 2. Interessante Geschichte. Nur hab ich leider überhaupt keine Vorstellung davon, wie man die Datenbank von AutoCAD VBA ansprechen kann. Bei Access wars einfach über ADO zum Beispiel, aber OpenOffice?Wer kann vielleicht weiter helfen?Herzlichen Dank im Voraus - Peter
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Winkel und Bogenmaß beim Blockeinfügen
Stelli1 am 22.09.2005 um 09:20 Uhr (0)
Hallo Dominik,auf die Schnelle hab ich deinen Code nicht ganz verstanden.Ich habe mir dafür eine Funktion gebaut. Die rechnet fürdie Vermessung den Richtungswinkel.Code:Public Function x_Riwi#(ya#, xa#, Ye#, Xe#)Dim dy#, dx#Dim TanAlpha#Dim winkel#dy = Ye - yadx = Xe - xaIf dx 0 Then TanAlpha = dy / dx winkel = Atn(TanAlpha) * 200 / 3.141593 If winkel 0 Then winkel = winkel + 200 End If If dy 0 Then winkel = winkel + 200 End If If winkel = 0 And dx 0 Then winkel = 200 End IfElse If dy = ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Winkel und Bogenmaß beim Blockeinfügen
archstudent am 22.09.2005 um 20:06 Uhr (0)
Ich werde es mal mit Deinen Codeschnipseln ausprobieren.Das mit den 4 Quadranten weiß ich, dies ist nicht das Problem. Kommt später. Mein Code funktioniert jetzt erst einmal mit einer Richtung (1 Punkt links oben, zweiter rechts oben).Wenn ich allerdings so eine Linie nachfahre, hat der eingefügte Block immer eine Abweichung von ca. 10 Grad. Vielleicht muß ich eine Variable im Autocad umstellen!?
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : RS232 Schnittstelle ansprechen, gibt es da Neuerungen seit AC2000 ?
Ralf33 am 27.09.2005 um 19:40 Uhr (0)
Hallo,um Daten über die RS232 Schnittstelle einzulesen benutze ich eine sogenannte Port.dll. (Autocad 2000)Das funktioniert aber nur unter Windows 98.Hat sich da eigentlich seit AC2000 irgendetwas geändert, kann ich mit den Nachfolgeversionen einfacher die Schnittstellen ansprechen. Bei Autodesk finde ich nichts darüber.Gibt es sonst eine einfache Möglichkeit die RS232 Schnittstelle unter Windows 2000 mit Autocad 2000 VBA anzusprechen ?Gruß Ralf33
|
| In das Form Autocad VBA wechseln |
