|
AutoCAD VBA : Autocad gestartet ? Teil 2
BloodyMess am 26.08.2004 um 11:19 Uhr (0)
Hallo HJ, Zitat:Anmerkung : Verwenden Sie die GetObject-Funktion, wenn eine aktuelle Instanz des Objekts existiert oder wenn Sie das Objekt mit einer bereits geladenen Datei erstellen wollen. Wenn keine aktuelle Instanz existiert und Sie das Objekt nicht mit einer geladenen Datei starten wollen, verwenden Sie die CreateObject-Funktion.Daher kommt dein Fehler. Du versuchst ein Object zu händeln, welches garnicht existiert.Gruß TP
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad gestartet ? Teil 2
startrek am 26.08.2004 um 11:21 Uhr (0)
Hi Hajo,klar wars keine Hilfe ;-)hm okay, ich weiss zwar überhaupt nicht wie:429 Objekterstellung durch ActiveX-Komponente nicht möglichbei Dir entsteht, aber vielleicht sollte man das, also KANN er überhauptAutocad starten, irgenwie vor dem acadApp.Visible = True, abfragen.Wissen tu ichs aber nicht wirklich, ich hoffe jemand anders.lg Nancy
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Attribute aus Datei erstellen
DoubleB am 26.08.2004 um 12:14 Uhr (0)
Vielen Dank TP, hatte zwar die ET installiert, allerdings hat ATTin nicht funtioniert. Habe mit jetzt bei CADWiesel das Download gezogen und noch mal installiert und siehe da es klappt. Noch mals danke! DoubleB
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Autocad gestartet ? Teil 2
BloodyMess am 26.08.2004 um 12:37 Uhr (0)
Hallo Ihr Zwei,jetzt muss ich auch nochmal.Wo ist das Problem?Möchtest Du sowas haben, oder ... Code:Public Sub ConnectToAcad()Dim acadApp As AcadApplication On Error GoTo error Set acadApp = GetObject(, "AutoCAD.Application")error: If Err.Number = 429 Then If MsgBox("ACAD ist nicht gestartet, möchten Sie es starten?", vbOKCancel) = vbOK Then Set acadApp = CreateObject("AutoCAD.Application") acadApp.Visible = True End If Else MsgBox "ACAD ist gestartet" End IfEnd SubGruß TP
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad gestartet ? Teil 2
AWagner am 16.01.2008 um 12:34 Uhr (0)
Hallo Leute,die von euch vorgeschlagene Version von euch funktioniert eigentlich ganz gut.Jedoch musste ich leider feststellen das das bei mir nicht immer der fall ist.Ich benutze VB.Net (ist ja nicht viel unterschied zum VB6/VBA - gibt ja leider keinen AutoCAD VB.Net - Thread) und habe folgendes Problem:wenn ich mein AutoCAD starte und es kommt kein Popup läuft alles wunderbar, sobald aber nach dem Start ein Popup eingebunden wird (aus welchem grund auch immer zB. ein selbergeschriebenes Auswahlmenü für b ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Autocad gestartet ?
HJ am 26.08.2004 um 16:17 Uhr (0)
Herzlichen Dank, tolles Programm. Habe es ein wenig abgewndelt funktioniert einwandfrei. Besser geht s nimmer. Gruß Hajo
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Dictionaries in VBA auslesen ... Rätsel
mapcar am 30.08.2004 um 10:04 Uhr (0)
Es spielt doch keine Rolle, ob ein Dict mit Lisp angelegt wurde. Mit ThisDrawing.ActiveDocument.Dictionaries( Name ) bist du dabei. 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 : Dictionaries in VBA auslesen ... Rätsel
mapcar am 30.08.2004 um 10:22 Uhr (0)
Vielleicht steht gar nix drin? Da ist es doch ein Riesenaufwand, sich ein VBA-Programm zu schreiben, das Lisp aufruft, um mal rein zu schauen. Das kannst du dann über Lisp selbst einfacher haben. Oder die Zeichnung mal als DXF speichern und anschauen... 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ü ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Dictionaries in VBA auslesen ... Rätsel
mapcar am 30.08.2004 um 13:49 Uhr (0)
Hab noch mal drüber nachgedacht: Ich vermute, dass es gar nicht um Dictionaries geht, sondern um LDATA! (LData ist ein separates Feature , das in R14 eingeführt wurde und für sehr viel Ärgernisse gesorgt hat. Benutzen tut s keiner, der sich auskennt!). Die Daten sind in Lisp sehr schnell gespeichert: Code: (vlax-ldata-put mydict mykey mystringvalue ) Vermutlich wolltest du in VBA so drankommen: Code: Public Sub falsch() Dim myDict As AcadDictionary Set myDict = ThisDrawing.Dictionaries. ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Dictionaries in VBA auslesen ... Rätsel
mapcar am 30.08.2004 um 19:13 Uhr (0)
Noch ein Nachtrag: Das, was du in object o als IAcadObject erhältst, ist ein Entity namens VLO-VL! Dieses Entity enthalt die Daten (kann natürlich mehrfach auftreten). Kleines Beispiel: (vlax-ldata-put "mydict" "mykey" "mystringvalue") (setq d(entget(cdr(assoc -1 (dictsearch (namedobjdict) "mydict")))))== ((-1 . Objektname: 7ef57f78 ) (0 . "DICTIONARY") (5 . "EF") (102 . "{ACAD_REACTORS") (330 . Objektname: 7ef57c60 ) (102 . "}") (330 . Objektname: 7ef57c60 ) (100 . "AcDbDictionary") (280 . 0) ( ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Polyline auswählen in Blocknähe
mapcar am 01.09.2004 um 11:12 Uhr (0)
Eine sehr fragwürdige Aufgabenstellung mit einem noch viel fragwürdigeren Ansatz dahinter. Zunächst mal: Geht s wirklich um einen Block? Dann müsste man zuerst den Block-Umriss ermitteln, was schon ziemliche Schwierigkeiten verursachen würde. Oder geht s um einen Punkt (der der Einfügepunkt eines Blocks oder auch etwas anderes sein könnte)? Und was sind 0,05m? AutoCAD kennt doch nur Zeichnungseinheiten. Da müsste dann erst ein Maßstab ermittelt werden usw., aber wie? Angenommen, man hätte die Block-Kontur ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Polyline auswählen in Blocknähe
mapcar am 01.09.2004 um 12:27 Uhr (0)
Was brauche ich wirklich? Tja, keine Ahnung, wie ein Absperrschieber aussieht.. stelle mir da so was vor wie im Krankehaus, nur mit Schloß am Deckel;-) Mal im Ernst: Das können ja nicht viele unterschiedliche Blöcke sein, oder? Mach dir (von Hand) für jeden Block eine Außenkontur (mit UMGRENZUNG oder so. Die versetzt du (mit VERSETZ) um die 0.05 ZE nach außen. Die Stützpunkte dieser Schnittkontur überträgst du in ein Punkt-Array, das du dann im Programm benutzen kannst. Alles, was nicht gerade ist (Kreis ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Dringend Hilfe gesucht
MrSteele am 02.09.2004 um 14:41 Uhr (0)
Hallo Zusammen, ich bin kein Anwender von Autocad, möchte aber unserer technischen Abteilung unter die Arme greifen. Von Excel her habe ich relativ gute Kenntnisse in VB. Wir haben folgendes Problem: Wir haben tausende von Zeichnungen, die ungültig sind und entsprechend gekennzeichnet werden müssen. Daher die Idee, über VB einen Block mit Text Ungültig quer über die Zeichnung zu setzen. Dieser Block sollte sich automatisch an die Blattgröße anpassen so daß das Programm sich die Zeichnung holt, den Block ...
|
| In das Form Autocad VBA wechseln |
