|
Autocad VBA : Absoluter Nullpunkt
The VIP am 16.12.2003 um 16:50 Uhr (0)
vielleicht nochmal kurz zum besseren Durchblick: Ich habe eine Werkzeugleiste mit einem selbsteingerichteten Button. Hinter dem Button verbirgt sich der Befehl: Code: ^C^C-vbarun DIALOG Im Visual Basic Editor wird nun im Modul1 das Makro DIALOG aufgerufen. dieses Makro sieht schlichtweg so aus: Code: Public Sub DIALOG() EINGABE.Show End Sub Das Formular mit dem Namen EINGABE wird geöffnet. Der Konstrukteur stellt seine Parameter ein die zur Zeichnungserstellung benötigt werden. Er kann n ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Einlesen von Blockdefinitionsdatei
Gloem am 29.01.2008 um 13:57 Uhr (0)
Vielen Dank für Deine Hilfe. Hab nach einigem Suchen die benötigte Zeile in dem von Dir angegebenen Beitrag gefunden.Hier nochmal das Endergebnis:Code: Virtuelles Öffnen der Blockreferenzdatei Dim axBlockFile As New AxDbDocument axBlockFile.Open FILE_BLOCKREFERENZ Variablen zum Auslesen der Blöcke Dim blockNew As AcadBlock Dim block As AcadBlock Feld mit den neuen Blöcke Dim newBloecke() As Object Dim vorhanden As Boolean Dim anzahlBloecke As Integer anzahlBloecke = 0 Für alle Blöcke in der ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Solid-Koordinaten mit VB.NET extrahieren
autogis am 20.03.2009 um 14:58 Uhr (0)
Hallo zusammen,lange habe ich gesucht, bevor ich die Frage hier poste:Wie erhält man mit VB.NET die Koordinaten eines Solids?Zum Hintergrund der Frage:1. Die Geometrie von Bemaßungen einer Zeichnung (Linien, Mtext,...) und unter anderem auch die Maßpfeile sollen in eine ASCII-Datei exportiert werden. Dazu explodiere ich die Bemaßungen und hole mir aus den entstehenden Elementen die Daten. Nur für die Solids habe ich absolut keinen Plan.2. Bisher habe ich in VBA gearbeitet. Damit war das kein Problem. Über ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Rahmen zeichnen mit VBA
Stechi am 22.04.2008 um 10:12 Uhr (0)
Hallo Carsten, hallo KlaK!Danke für die Hilfe und für die Unterstützung!Eine Frage noch: Warum sehe ich den Block bzw. die Zeichnung nicht?Mein bisheriger Code:Code:Dim lineObj As AcadLWPolyline Dim blockobj As AcadBlock Dim attributeObj As AcadAttribute Dim height As Double Dim tag As String Dim prompt As String Dim value As String Dim mode As Long Dim insertionPoint(0 To 2) As Double Deklaration für Pointer Dim points(0 To 9) As Double Deklaration für Pointer points(0) = 0: points(1) = 0 ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Zeichnungseinstellungen auslesen
sarotti am 27.01.2006 um 11:54 Uhr (0)
Zu 2.) Man erzeuge ein Winkelobjekt, lese die Eigenschaften aus und lösche dieses Objekt anschließend. Das Objekt wird immer mit den Eigenschaften des aktuellen Bemaßungsstil erzeugt. Winkelbemaßungsstil auslesen (Dezimalgrad,GradMinutenSekunden, Gon,Radiant) Winkelobjekt in die Zeichnung einfügen und Eigenschaft auslesen Dim DimPointAngularObj As AcadDim3PointAngular Dim AngleVertex(0 To 2) As Double Dim FirstPoint(0 To 2) As Double, SecondPoint(0 To 2) As Double Dim TextPoint(0 To 2) As Double Dim ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Plotten
Tut_Ench_Ammun am 25.07.2007 um 07:40 Uhr (0)
Hallo an alle,es ist ja schon viel über das Thema Plotten geschrieben worden, jedoch tritt bei mir ein Problem auf, das ich den vorhandenen Beiträgen noch nicht gelesen habe. Folgenden Code habe ich zum Drucken erstellt:Code:Sub test2()Dim p1(0 To 1) As DoubleDim p2(0 To 1) As Doublep1(0) = 0p1(1) = 0p2(0) = 210p2(1) = 297ThisDrawing.ModelSpace.Layout.RefreshPlotDeviceInfoThisDrawing.ModelSpace.Layout.CanonicalMediaName = "A3"ThisDrawing.ModelSpace.Layout.StyleSheet = "acad.ctb"ThisDrawing.ModelSpace.Layou ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD2009
alfred neswadba am 20.03.2009 um 13:51 Uhr (0)
Hi Günter,wenn viel mit Zugriff auf externe Blöcke passiert, sprich AutoCAD viel vom Dateisystem machen muss, um die Zeichnung zu erstellen, dann kann ich mir schon mal ein wenig Unterschied vorstellen.Bei der Aussage ...Zeile für Zeile Daten auszulesen und dann auf dieser Basis AutoCAD-Objekte zu erstellen... und ...Die Textdatei ist ca. 6MB groß und enthält knapp 1900 Symbole..., dann solltest Du, wenn Du die Geschwindigkeit brauchst, schnellstmöglich mal auf DLL umsteigen und das ganze Objekthandling In ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Updaten von Blöcken
Brischke am 05.03.2012 um 10:17 Uhr (0)
Hallo,ich gehe mal davon aus, dass die Blockbibliothek immer die aktuellste Version des Blockes beinhaltet. Vor diesem Hintergrund, kann ich mich Udo nur anschließen und die Frage wiederholen: Wozu dann die Prüfung, welcher Block aktueller ist?Liegen die Blöcke als Zeichnungen vor, hat dir Udo schon die Lösung geschrieben, wie du immer die Version aus der Bibliothek einfügst.Wie mir jedoch scheint, ist bei dir die Bibliothek eine Sammlung von Zeichnungen, in denen die Blöcke enthalten sind .. richtig?Mit O ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Objekten Informationen zuordnen und an Excel weitergeben
alfred neswadba am 11.11.2008 um 13:12 Uhr (0)
Hi Marie,anbei dvb-File mit 2 Funktionen (Deinen Teil, wo aus UserForm die Werte abgefragt werden, musst halt dazutun):a) attachEED (hier gehört Dein UserForm noch rein) läßt Anwender Elemente zeigen, diese erhalten dann die EED-Datenb) createXlsFromEEDs startet ein neues Excel, sucht sich alle Objekte in Deiner Zeichnung mit EED-Daten und schreibt die Werte in ein leeres XLS-Sheet (derzeit wird halt jedes mal ein neues Excel gestartet, ich weiss nicht, ob Du in bestehende Datei schreiben willst, immer ein ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : ACAD-Gruppen löschen/explodieren
vasentiger am 20.03.2009 um 16:26 Uhr (0)
Hallo, bin neu hier im Forum. Ich war auf der Suche nach einer Funktion zum Löschen von mehreren Gruppen mittels wenig Aufwand. Da die bei den Lisp-Kollegen Vorgestellten für meinen Anwendungsfall - Löschen von benannten UND unbenannten Gruppen nicht funktioniert hat (Anwenderfehler? sicher), habe ich bei VBA nach ner Lösung gesucht. Habe Sie aber dann doch in meinem Hirn gefunden.Also falls es euch was nutzt, hier der Code:Funktion: Löscht auf Abfrage alle ACAD-Gruppen aus einer Zeichnung - die Objekte bl ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Komponenten Platzieren mit VBA
djs0401 am 20.02.2008 um 12:00 Uhr (0)
HalloHabe da ein Problem: In der Firma in der ich grade ein Praktikum mache, soll ich ein Automatisiertes Layout Makro erstellen. Die Zeichnungen, die zusammen gefügt werden sollen sind als Komponenten gespeichert, d.h. 4 Ansichten in der Datei enthalten.Für die gewünschte Zeichnung brauch ich aber nur die draufsicht.Bisher habe ich diesen code benutzt:Code:Private Sub Platzieren(ByRef m() As maschine) Dim einfugPkt(0 To 2) As Double Dim blockObj As AcadBlockReference Dim dateipfad As String m() bekomm ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Vergleich von zwei sequentiellen Dateien
kiltswitch am 02.12.2004 um 13:52 Uhr (0)
Hallo, ich habe noch ein Problem beim Vergleich meiner zwei sequentiellen Dateien. Es gibt die übereinstimmenden Daten nicht 100% so aus, wie ich das will. Am besten wäre es, wenn man DATENTRIPEL aus Datei1 und Datei2 vergleichen kann. In Datei1 werden alle Blockreferenzen der Zeichnung mit den X,Y,Z-Koordinaten ihrer InsertionPoints abgelegt. In der Datei2 stehen von mir berechnete X,Y,Z-Koordinaten von bestimmten Anschlußpunkten von Anbauteilen an einem Hauptbauteil. Da diese Anbauteile auch als Blockref ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Datei speichern und schließen
mapcar am 18.03.2004 um 16:36 Uhr (0)
Hast du, ja - Kai hat das Problem, dass es mit der einen Methode Laufzeitfehler gibt, und dass AutoCAD bei der anderen Methode selbst geschlossen wird, halte ich auch für einen Absturz. Hilfreich für Kai ist es daher, wenn er hier erfährt, dass sein Vorgehen korrekt ist, jedenfalls soweit es hier zu sehen ist. Einen Rat wie vergiss das mit ActiveDocument halte ich für wenig hilfreich - man sollte die Probleme lösen statt sie zu umgehen. Workarounds kann man in Fällen verwenden, wo es keine Lösung gibt. M ...
|
| In das Form Autocad VBA wechseln |
