|
Autocad VBA : MDT Teile löschen
CADmium am 03.03.2005 um 20:30 Uhr (0)
Zitat: Original erstellt von ronaldvoelzer: Hallo Zusammen, ich möchte per Script in MDT alle Teile, welche namentlich im Modellbaum aufgeführt sind löschen. Dafür benötige ich jedoch die Namen der Definition. Hat jemand ein .scr oder .vbs oder Lisp-Script und kann mir helfen. Herzlichen Dank Grüße Tja, so was suche ich auch ------------------ - Thomas - Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : access via makro öffnen
Dexta am 07.03.2005 um 10:21 Uhr (0)
Hi Brischke, Ich habe mitlerweile einen VBA-Code geschrieben, der Access automtisch öffnet: Private Sub Accessöffnen() On Error GoTo Err_Accessöffnen Dim stAppName As String stAppName = C:ProgrammeMicrosoft OfficeOffice10MSACCESS.EXE Call Shell(stAppName, 1) Exit_Accessöffnen: Exit Sub Err_Accessöffnen: MsgBox Err.Description Resume Exit_Accessöffnen End Sub Nur hab ich jetzt noch das Problem, dass ich mich mit AutoLISP nicht wirklich auskenne. Wenn ich ein Icon, bzw. XRef ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : ACAD-Objekte in Access-Bericht ausgeben
CAD-Huebner am 08.03.2005 um 11:06 Uhr (0)
Hallo Dexta, nachdem ich deine allererste Frage noch einmal gelesen hatte, war mir auch klar, dass du eigentlich in deiner Tabelle erkennen möchtest, ob ein Datensatz überhaupt mit einem AutoCAD Objekt verknüpft ist (für weitere Auswertungen). Über die DBVERBINDUNG in AutoCAD wird ausschließlich am Objekt ein Vermerk (über Extended Entitiy Data) gesetzt, das den Namen der Datenquellenverknüpfung und (in hexadezimaler Form) die Inhalte der Schlüsselfelder enthält. Man kann nur mit einem Zusatzprogramm aus A ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Per VB6 ein eTranmit erstellen...
Proxy am 10.03.2005 um 13:52 Uhr (0)
Zwar kein VBA aber auch eine VBA-Lösung. filedia und sonstige Störfaktoren ausschalten und mit thisdrawing.sendcommand "._-etransmit" "zip" ... die datei(n) erstellen. ------------------ " Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department language in the world for an AutoCAD programming language?" Read the whole story: The Autodesk File ca. 890 Seiten | 7500 KB PDF
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Frage zum schnellerem Programmieren
CADmium am 10.03.2005 um 21:40 Uhr (0)
möcht dazu mal (wieder) auf Lisp hinweisen : - kurz und effizient: (if (not(member Variable ( Gold Blei Silber Alu Holz ))) tu irgentwas ) .. aber das nur am Rande, ich weiß, daß ich dafür im falschen Forum bin .. ------------------ - Thomas - Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Linie in Polylinie umwandeln
Proxy am 14.03.2005 um 13:34 Uhr (0)
Als kleiner Denkanstoss: Code: Public Sub StartEndPoint() Dim oAcadLine As AcadLine Dim oAcadPoly As AcadLWPolyline Dim oEntity As AcadEntity Dim Point As Variant On Error Resume Next ThisDrawing.Utility.GetEntity oEntity, Point, Objekt wählen: If oEntity Is Nothing Then Exit Sub Select Case oEntity.ObjectName Case AcDbLine Set oAcadLine = oEntity With oAcadLine MsgBox Start: & .StartPoint(0) & , & .StartPoint(1) & , & .StartPoint(2) & vbCrLf & End: & .EndPoint(0) & , & .EndPoint(1 ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Seite einrichten mittels VBA
Proxy am 14.03.2005 um 15:46 Uhr (0)
SchnippSchnapp:Code:Sub Example_CanonicalMediaName() This example finds the name of the media for the active layout Dim MediaName As String MediaName = ThisDrawing.ActiveLayout.CanonicalMediaName If MediaName = "" Then MsgBox "There is no media set for the active layout." Else MsgBox "The media for the active layout is: " & MediaName End IfEnd Sub------------------ "Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-department langu ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Liste mit 3D-Abhängigkeiten erstellen
ThBroedel am 22.03.2005 um 20:51 Uhr (0)
Ich suche nach einer Möglichkeit alle 3D-Abhängigkeiten einer Baugruppe als Liste auszugeben. Die Abhängigkeiten aus dem Desktop-Browser oder aus „ameditconst“ abzuschreiben ist zu umständlich. Mit dem Befehl „list“ sehe ich im Textfenster die Anzahl der Abhängigkeiten bzw. die Freiheitsgrade (Siehe Bild) aber nicht die Art (passend, fluchtend…) und die Werte. Wenn es keinen passenden Befehl gibt, kann man eine Routine in VBA oder LISP erstellen? Wer kann mir hierbei helfen?
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : AutoLisp VBA-Makro ausführen
Huebi am 29.03.2005 um 11:02 Uhr (0)
Zitat: Original erstellt von Dexta: Mein Macro hat den Pfad: C:Dokumente und EinstellungenddreDesktopeichnung1.dwg!Module1.Accessöffnen Servus Dexta, hast Du Dein Makro denn nicht in einer *.dvb - Datei abgespeichert *wunder*? Ich speichere meine Makros in einem Unterverzeichnis (in dvb-Dateien), das ich unter "Suchpfad für Supportdateien" (Menü Extras - Optionen - Dateien) im AutoCAD eingetragen habe. Das erleichtert den Zugriff und der Aufruf kann ohne komplette Pfadangabe erfolgen. z.B. so: (d ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Zoomfunktion über Skript ?
priessenegg am 13.04.2005 um 19:05 Uhr (0)
Hallo Skript, Lisp od. VBA-Experten Ich muß eine Presentation mit einer CAD2000 3D-Zeichnung machen und habe ein Skript geschrieben. Würde aber gerne in den Skript den Befehl für eine Zoomfunktion einbauen. Geht das oder muß man ins Lisp bzw. VB. Ich kann leider zu wenig von Beiden und bitte um Hilfe.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : ANSI --> DIN umstellen
Proxy am 02.05.2005 um 17:53 Uhr (0)
Schau dir mal den Befehl amsetupdwg genauer an. Und suche mal entweder im RuA oder im Lisp nach Script. ------------------ MfG Proxy
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : messen mit nummerierung
asatt am 07.06.2005 um 19:16 Uhr (0)
Hey Leute, irgendeiner von euch wird doch hoffentlich eine Lösung für mein eigentlich simples Problem haben. Und zwar: Es muss doch möglich sein entlang eines Polygonzuges Stationierungen mit einem WBlock markieren zu können, wobei die jeweilige Stationsnummer automatisch an ein Attribut im Block übergeben wird (zB.: alle 100 Meter die Stationsnummer um 1 erhöhen). Im Grunde wäre das ja nur eine kleine Erweiterung des Befehl messen mit Block, das kann ja nicht so kompliziert sein, oder?!? Gibt es dafü ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Makroaufruf mit Parameterübergabe
Mike_mair am 09.06.2005 um 17:58 Uhr (0)
Also von einem Butten einen Makro aufrufen ist eigentlich überhautp kein Problem du musst dazu ja nur in der Menüdatei definieren: zB: ID_MeineFun [_Button( Dies ist meine Funtion , Bild_Klein.bmp, Bild_Groß.bmp)]^c^c^p-vbarun Modul.MeineFun Das Problem ist, irgendwelche Prameter direkt zu übergeben, das geht zwar irgenwie, aber das ist eigentlich nit grad super. Ich habe es so gelöst: Ich schreibe mir eine kleines Lisp Programm in dem ich die Prameter in die Registry speicher. zB.: (defun c:MeineFun() (vl ...
|
| In das Form Autocad VBA wechseln |
