|
AutoCAD VBA : externe Referenzen prüfen
alfred neswadba am 07.11.2008 um 10:15 Uhr (0)
Hi Peter,kannst mir eine Zeichnung zukommen lassen, in der FileDependencies-Collection einen Fehler bringen? Oder kommt das bei Dir in jeder Zeichnung?- alfred -
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : externe Referenzen prüfen
alfred neswadba am 06.11.2008 um 20:34 Uhr (0)
Hi,Du kannst natürlich statt der Selektion auf alle BlockReferences auch die Liste der Blocks (BlockDefinitionen) durchgehen, solange Du nicht wissen willst, ob diese überhaupt verwendet sind.Dim tBl as AcadBlockfor each tBl in ThisDrawing.Blocks und da hast jetzt die Blockdefinition jetzt kann geprüft werden ob es sich um ein XRef handeltnext- alfred -
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : externe Referenzen prüfen
alfred neswadba am 07.11.2008 um 11:32 Uhr (0)
Hi Peter,sorry, ich kann es nicht reproduzieren, ich habe eine leere Zeichnung offen, starte die Loop: Dim tObj As AcadFileDependency For Each tObj In ThisDrawing.FileDependencies Debug.Print tObj.Feature Nextund fliege dabei nicht ab, das Ergebnis im Output-Fenster:Acad:TextAcad:PlotConfigD.h. ich fürchte, dass es doch zeichnungs- oder konfigurationsabhängig ist.- alfred -
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : externe Referenzen prüfen
alfred neswadba am 07.11.2008 um 14:00 Uhr (0)
Hi Peter,ok, so kann ichs auch sehen. Gilt also doch nur in bestimmten Zuständen .Hilft Dir das als Abhilfe?Code: Dim tObj As Object Dim i As Integer For i = 0 To ThisDrawing.FileDependencies.Count - 1 On Error Resume Next Set tObj = ThisDrawing.FileDependencies.Item(i) If (Err.Number 0) Or (tObj Is Nothing) Then Debug.Print "Unknown dependency, reference not found" Else ok End If On Error GoTo 0 Next- alfred -
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : externe Referenzen prüfen
alfred neswadba am 06.11.2008 um 20:04 Uhr (0)
Hi,lade Dir mal mein Beispiel von http://ww3.cad.de/foren/ubb/Forum54/HTML/020951.shtml#000009 da ist Code vorhanden, der gleichzeitig auch prüft, ob ein XRef geladen ist oder nicht.Die FileDependencies beinhalten mehr als nur XRefs, da gehören CTB-Files, Fonts, ... sprich alles, was auch bei etransmit mitübertragen werden müsste (damit bin ich aber nicht wirklich vertraut).Hoffe es hilft Dir (zumindest in den meisten Punkten) weiter, wenn noch etwas offen ist, (fast) jederzeit und gerne.- alfred -
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Block im aktivem Layout suchen
alfred neswadba am 28.04.2009 um 22:24 Uhr (0)
Hi Georg,bitte nicht Blockdefinition (Block) mit Blockreferenz (BlockReference) vertauschen, Du findest im Layout keine Blockdefinitionen, nur -referenzen.Codebeispiel (durchsucht aktuelles Layout und listet alle Blockreferenz-Namen) wäre:Code:Public Sub ScanLayout() Dim tAcadEnt As AcadEntity For Each tAcadEnt In ThisDrawing.ActiveLayout.Block If TypeOf tAcadEnt Is AcadBlockReference Then Debug.Print tAcadEnt.Name End If NextEnd Sub- alfred -------------------www.hollaus.at
| | 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 : Zeichnen von Tragwerken mittels VBA und AutoCAD
alfred neswadba am 11.11.2009 um 10:50 Uhr (0)
Hi,herzlich willkommen bei CAD-de! ob die Kombination aus VBA und AutoCAD die richtige Lösung dafür bereit hältWörtlich genommen, nein Denn mit VBA hast Du noch keine Lösung sondern nur die Möglichkeit, Dir selbst ein Programm zu schreiben, das zur Lösung führen kann. Wenn Du schon Erfahrung mit AutoCAD und VBA hast, dann kannst Du sowohl ACA (Architecture) als auch Civil nehmen, die haben ja beide AutoCAD als Basis und damit findest Du eine bekannte Umgebung.Viel mehr als ich nehme an, dass es möglich ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : DWGs im Durchlauf öffnen bearbeiten speichern schließen
alfred neswadba am 21.12.2009 um 22:08 Uhr (0)
Hi,noch eine Ergänzung zu dem ursprünglichen Thema Muß ich da noch etwas bzgl. dynamische Blöcke berücksichtigenich gebe zu, das nicht so (aufmerksam) interpretiert zu haben wie cadffm (DANKE!)Damit eine weitere Erklärung zu:Enthält die Zeichnung eine oder mehrere Referenzen einer dynamischen Blockdefinition, dann kein Problem, Handling wie oben angeführt.Ist die zu öffnende Zeichnung selbst eine Blockdefinition (mit dynamischen Eigenschaften), dann ist der Weg allerdings zu überdenken, denn dann folgt vo ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Diverse Meldungen beim öffen Unterdrücken
alfred neswadba am 19.03.2010 um 22:19 Uhr (0)
Hi,eigentlich sollte der Dialog nicht mehr kommen, wenn Du einmal das Hakerl setzt und OK klickst. Ist das bei Dir nicht so?Wenn Du im Google z.B. nach AutoClick oder ähnliches suchst, da gibts doch schon einiges am Markt, auch Freeware.Wenn Du so etwas selbst schreiben willst, dann kannst Du das zumindest nicht im gleichen Code wie Dein VBA, denn sobald ein modaler Dialog offen ist, ist Deine VBA-App gestopt. Also musst Du ein eigenes EXE schreiben, das selbständig im Betriebssystem läuft und laufend solc ...
| | In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Attribute auslesen von aktuellem Blatt
alfred neswadba am 09.03.2010 um 21:41 Uhr (0)
Hi,Ich habe mir Deinen Screenshot angesehen http://ww3.cad.de/foren/ubb/uploads/f-m/Anforderung.jpg und dann nochmals Deine Auskünfte/Fragen: Folgendendes will ich erreichen, möchte aus: Block: Z_Blatt_Schriftfeld -- aus dem Attribut BENENNUNG den Wert auslesen. und in in einem Label in der UserForm anzeigen lassen.Da brauch ich jetzt nicht mal ans Programmieren denken, sondern mal überlegen: - Du hast eine Form in Deinem VB, hier willst eine Benennung anzeigen.- In Deinem Screenshot sehe ich schon 3 Werte ...
| | In das Form AutoCAD VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
