|
Autocad VBA : mit variablen Werten eine komplette Zeichnung erstellen
RoSiNiNo am 11.08.2003 um 07:41 Uhr (0)
Nothing Das Schlüsselwort Nothing wird verwendet, um die Verbindung einer Objektvariablen zum zugehörigen Objekt aufzuheben. Weisen Sie einer Objektvariablen mit der Set-Anweisung den Wert Nothing zu. Beispiel: Set Objekt1 = Nothing Mehrere Objektvariablen können sich auf dasselbe Objekt beziehen. Wenn einer Objektvariablen der Wert Nothing zugewiesen wird, verweist diese Variable anschließend auf kein aktuelles Objekt mehr. Wenn mehrere Objektvariablen auf dasselbe Objekt verweisen, werden die Speicher- ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Blockattribute aus einer Zeichnung und in Excel übergeben
KlaK am 05.04.2013 um 19:26 Uhr (0)
Hallo,Sorry aber mit dem "funktioniert es nicht richtig" kann man wenig anfangen.Setz doch mal die Fehlermeldung zurück On Error goto 0dann bekommst Du die Fehlermeldungen direkt angezeigtmeine Vermutung beim Blick auf den Code liegt bei dem If acad.ActiveDocument.FullName = dwgname Thenansonsten :befüllen von Attributwerten macht man üblicherweise mit einer select case - Abfrageda gibt es im Forum hier aber genügend BeispieleSchönes WEKlaus PS: Keine AHnung ob ich am WE noch mal genauer schauen kann . ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
kiltswitch am 24.11.2004 um 08:04 Uhr (0)
Hallo Mapcar, in Ordnung, ich werde mich daran halten. Tobias Zitat: Original erstellt von mapcar: Tobias, bitte versuch mal, nur das zu zitieren, worauf du dich beziehst. Ich habe deinen letzten Beitrag dahingehend geändert (wie schon ein paarmal). Wiederholungen gibt es schon genug, und wenn Codepassagen dann auch immer noch in Zitaten wiederholt werden, wird das alles sehr schwer lesbar.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : mit variablen Werten eine komplette Zeichnung erstellen
RoSiNiNo am 11.08.2003 um 10:22 Uhr (0)
Ich hab eigentilch keine Ahnung was die zu bedeuten haben, aber man erkennt dann wenigstens wie viel jemandem die Antworten und die Hilfe Wert war. So erhällt man oft Unities von Leuten denen man in einem Beitrag gar nicht geholfen hat, und man freut sich dann umso mehr. Außerdem steht man dann unter den TOP 5-Mitgliedern des letzten Monats Ich vergebe immer ein paar Punkte, wenn ich etwas neues erfahre, ganz egal ob ich es nun brauche oder nicht, so bekommt derjenige eine Rückmeldung, etwas Lob hat ja ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Blockattribute aus einer Zeichnung und in Excel übergeben
KlaK am 03.04.2013 um 22:55 Uhr (0)
Also bei mir macht es Dein Programm (mit kleinen Änderungen )zunächstmal: Warum hast Du denn die Autocad/ObjectDBX .. Type Library in den Verweisen aktiviert ?bei mir hat diese verhindert, dass dem bl das Element aus dem ssgetObj zugewiesen werden konnte.Dann habe ich noch ein Element dazugefügt (unter dim bl) Dim ent As AcadEntityMir ist eine for each Abfrage lieber For s = 0 To ssetObj.Count - 1 For Each ent In ssetObj If ent.ObjectName = "AcDbBlockReference" Then Set bl = e ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
RoSiNiNo am 22.11.2004 um 16:39 Uhr (0)
Es ist irgendwie sehr interessant wie du eine Excelldatei öffnest und auch hineinschreibst. Steht etwas anders in der ACAD-Hilfe, sieh einmal das Beispiel dort an. Der Winkel ist in Radian, vielleicht stört dich das etwas. Die Anzahl der Nachkommastellen kannst du ja in Excell auch noch einstellen, ist nicht unbedingt notwendig das schon in Acad zu erledigen, wenn du das aber möchtest gibt es da mehrere Möglichkeiten: 1. Round 2. Format Beschreibung steht in der Hilfe. ------------------ Roland
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Blockattribute aus einer Zeichnung und in Excel übergeben
KAME am 04.04.2013 um 20:11 Uhr (0)
Hallo Klaus,Deine Tips habe ich jetzt eingebaut.Habe noch drei Probleme beim Auslesen der Blöcke1. möcht ich statt Code:ssetObj.SelectOnScreen gpCode, dataValue einen Blocknamen ansprechen (zb. Schrifkopf)2. wenn eine andere Zeichnung ausgewählt wird (zb. eine Zeile weiter unten), werden die Daten trotzdem in die gleichen Felder geschrieben3. wenn ich mehrere Zeichnungen in meinem Excel auswähle dann wird nur die erste gemacht (da verliert der Counter etwas)Aktueller Code:Code:Public Sub ACAD_TO_EXCEL()Opt ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
kiltswitch am 23.11.2004 um 14:29 Uhr (0)
@mapcar: Das ist nun wirklich nicht mein Vorwand, andere Leute dazu zu zwingen, meine Arbeit zu machen!!! Wenn ich es nun mal nicht hinbekomme - rumprobiere, abändere und es trotzdem noch nicht geht - dann muß ich doch nun mal auf Hilfe anderer Leute hoffen? Der Code von Nancy funktioniert leider nicht so richtig. Wie gerade schon beschrieben, hängt sich bei mir immer die Excel-Datei auf, wenn ich sie öffnen will. Pi habe ich in meinem Code als Datentyp Double deklariert.
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Blockattribute aus einer Zeichnung und in Excel übergeben
KAME am 09.04.2013 um 19:13 Uhr (0)
Hallo Klaus,hab mal aufgeräumt und die Definitionen geändert.weiters hab ich auf 4 Blöcke erweitertCode: Dim AngBracDwg As String Dim Block1, Block2, Block3, Block4 As String Block1 = Cells(2, 26 + 7).Text Block2 = Cells(3, 26 + 7).Text Block3 = Cells(4, 26 + 7).Text Block4 = Cells(5, 26 + 7).Text For intSel = 1 To Selection.Count AngBracDwg = Selection.Item(intSel).Text tAcadApp.Documents.Open (AngBracDwg)..................................................................................... ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
RoSiNiNo am 23.11.2004 um 09:50 Uhr (0)
Was soll ich nun noch sagen, Axel hat dir eigentlich schon erklärt waran es höschstwarscheinlich liegt. Auch ich habe dir diesen Hinweis schon etwas weiter oben angegeben. Meine erste Antwort hat sich auch schon auf deine Methode eine XLS-Datei zu öffnen bezogen. Darum meine Frage, hast du dir meine oder Axel s Antworten überhaupt angesehen und vielleicht einmal die Hilfe zu Hand genommen? Ich wage zu behaupten, NEIN!!! ------------------ Roland
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : mit variablen Werten eine komplette Zeichnung erstellen
The VIP am 13.08.2003 um 08:50 Uhr (0)
und noch zwei Fragen (nerve ich eigentlich? ) 1. Kann ich hier auch Vorgabewerte hinterlegen die man nur noch bestätigen muss Code: ThisDrawing.Utility.GetInteger(vbCr & Durchmesser: ) Ich hätte gerne den Ø2000 als Standardeinstellung. 2. Wenn ich neben der Durchmessereingabe eine weitere Variable in das Makro einbauen will die der Benutzer angeben muss (in diesem Fall den Buchstaben G oder T der stellvertretend für eine Variante stehen soll), wie mach ich das? Habe gedacht folgendes geht: ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
mapcar am 23.11.2004 um 21:25 Uhr (0)
Tobias, bitte versuch mal, nur das zu zitieren, worauf du dich beziehst. Ich habe deinen letzten Beitrag dahingehend geändert (wie schon ein paarmal). Wiederholungen gibt es schon genug, und wenn Codepassagen dann auch immer noch in Zitaten wiederholt werden, wird das alles sehr schwer lesbar. ------------------ (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 Mei ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Vorhandene Zeichnung Skalieren, Positionieren und anschließend Exceltabelle einfügen
Huebi am 01.03.2005 um 15:32 Uhr (0)
Menno Franjo! Gehst Du mal in Einzelschritten durch das Programm? Guckst Du Dir die Variablen im Überwachungsfenster an ob sie gefüllt werden? Hast Du in VB6 den Verweis auf AutoCAD gesetzt? Wann ist eine Variable leer und wann gefüllt? Funktioniert überhaupt das Starten von AutoCAD und das Öffnen der Datei? Hast Du den Code mal in VBA für AutoCAD angeguckt? Fragen über Fragen. Geht nicht gibt s nicht. Bei mir klappt s hervorragend. Wenn Du willst, daß man Dir hilft (und ich hab s Dir wirklich schon vor ...
|
| In das Form Autocad VBA wechseln |
