|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Stelli1 am 20.02.2008 um 17:29 Uhr (0)
Hallo Ines,ich glaube in deinem Code ist etwas vermischt.In VB/VBA hast du die Möglichkeit auf die ActiveX Schnittstelle anderer Anwendungen zuzugreifen. Die Schnittstelle stellt Eigenschaften, Methoden, Funktionen und Events zu Verfügung.In VB erzeugst du mit Code:Set acApp = CreateObject("Autocad.Application")eine neue Instanz der Aktuellen AutoCAD Version. Hast du mehrere Versionen auf einem Rechner kann der "Klassenname" eventuell den Zusatz der Version besitzen (z.B. Autocad.Application.16 bei AutoCAD ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Komponenten Platzieren mit VBA
Stelli1 am 20.02.2008 um 18:00 Uhr (0)
Hallo Namenloser,ich hab links keinen Navigator, ich hab rechts eine Darstellungsverwaltung Im RuA hast du ja auch schon mal deine AutoCAD Version angegeben.Hast du auch noch Zusatzprogramme ???Wilfried Stelberg------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Stelli1 am 20.02.2008 um 20:21 Uhr (0)
Hallo Nepumuk, Zitat:Original erstellt von Nepumuk:Hallo Wilfried,ich sag ja schon nix mehr. Nur ein kleiner Tipp. Die Konstanten sind ja nur Platzhalter für numerische Werte. Die Werte der Konstanten sind im Objektkatalog nachzuschlagen. Und jetzt kommts: Wesentlich schneller an ihren Wert kommst du, wenn du die Konstante mit einem vorangestellten Fragezeichen in das Direktfenster kopierst und Enter drückst. Beispiel:?vbRed 255 Die VB-Konstante vbRed kann also durch ihren Wert 255 ersetzt werden. Damit ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Nepumuk am 20.02.2008 um 18:45 Uhr (0)
Hallo Wilfried,ich sag ja schon nix mehr. Nur ein kleiner Tipp. Die Konstanten sind ja nur Platzhalter für numerische Werte. Die Werte der Konstanten sind im Objektkatalog nachzuschlagen. Und jetzt kommts: Wesentlich schneller an ihren Wert kommst du, wenn du die Konstante mit einem vorangestellten Fragezeichen in das Direktfenster kopierst und Enter drückst. Beispiel:?vbRed 255 Die VB-Konstante vbRed kann also durch ihren Wert 255 ersetzt werden. Damit bist du wieder unabhängig von einem Verweis auf eine ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Proxy entity
c.schojer am 21.02.2008 um 07:33 Uhr (0)
Hallo Leute ich habe ne Frage zu den Proxy entitysHabe ne Zeichnung reinbekommen wo Proxy Grafiken enthalten sindMit Autocad kann ich diese sogar in Ursprung versetzen(mit dem Befehl Explode)Wieso geht das aber mit VBA nicht?? Sub PROXY_EXPLODE()Dim ent As AcadEntity For Each ent In ThisDrawing.Modelspace If ent.Objectname = "AcDbZombieEntity" Then ent.Explode End If Next ent End SubVorab schon mal danke!!Mfg Chris
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Murkel am 21.02.2008 um 09:39 Uhr (0)
Hallo Leute,Ihr seid einfach Spitze! Vielen Dank für Eure Antworten und besonders Dir Wilfried für die verständliche Erklärung der beiden Bindungsarten. Ich glaube es jetzt endlich verstanden zu haben. Alle weiteren Hilfen muß ich erst heute abend ausprobieren. Ich möchte jedenfalls gern ohne Verweise auskommen, da das Programm für andere ist und ich nicht weiß, wie diese Anwender in der Materie drin stecken. Ich meinem Kollegenkreis ernte ich jedenfalls immer verständnislose Blicke, wenn ich ihnen sage, d ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Murkel am 22.02.2008 um 12:05 Uhr (0)
Hallo,ich habe jetzt AutoCAD zum Laufen gebracht dank Eurer Hilfe!Leider funktioniert die Sache immer noch nicht, aber hier erstmal mein Proggi:Option Base 1 Datenfeld soll mit 1 beginnenDim zeile As IntegerDim spalte As IntegerDim z As IntegerDim s As IntegerDim Datenfeld() As VariantDim strFilename As StringPublic Sub CommandButton1_Click()ExceldatenAcadtabelleEnd SubSub Exceldaten() zeile = 4 spalte = 5 ReDim Datenfeld(zeile, spalte) Erfassung der Excel-Daten For z = 1 To zeile ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
yamaha am 22.02.2008 um 12:14 Uhr (0)
Hallo Ines,Code:Set MyTable = MyPaperSpace.AddTable(pt, 5, 2, 5, 55)müßte funktionieren---------------------------------------Gruß Jörn[Diese Nachricht wurde von yamaha am 22. Feb. 2008 editiert.]
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Stelli1 am 22.02.2008 um 15:05 Uhr (0)
Hallo Ines,damit legst du fest das Datenfelder mit dem Index 1 anstatt 0 beginnen Zitat:Option Base 1 Datenfeld soll mit 1 beginnenAls Startpunkt brauchst du einen 3D Punkt Zitat:Dim pt(2) As Double Startpunkt (linker oberer Punkt der Tabelle) festlegenRichtig wäreCode:Dim Pt(0 to 2) as Doublept(0)= 100 Rechtswertpt(1)= 50 Hochwertpt(2)=0 HöheDein Autocad Objekt versuchst du in der falschen Reihenfoge zu erzeugenCode:On error resume next Versuche eine Instanz zu ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Murkel am 22.02.2008 um 19:39 Uhr (0)
Hallo,es funktioniert endlich! ich bin ja so happy!!!Jörn, deine Variante reichte leider nicht aus, es muß schon die komplette Zuordnung da sein.Also "Set MyPaperSpace = acApp.ActiveDocument.PaperSpace". Da hatte ich ja auch noch keine Fehlermeldung. Wilfried, Deine Tipps habe ich so übernommen, vielleicht lag es ja wirklich daran, das ich den Punkt richtig definieren mußte und die Fehlerroutine einbauen mußte. Allerdings habe ich noch die Deklaration von "i" und "j" von Double in Long geändert, weil ich d ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Murkel am 25.02.2008 um 12:48 Uhr (0)
Hallo Wilfried,danke für Deinen Tipp! Ich hatte am Wochenende mein ganz persönliches Erfolgserlebnis, das Programm läuft jetzt auch ohne gesetzte Verweise. Ich werde trotzdem Deine Variante probieren, vielleicht läuft das Proggi ja dann etwas schneller. Eine kleine Sache ärgert mich aber noch: Sobald ich mitSet acApp = CreateObject("Autocad.Application")eine neue AutoCAD-Instanz erzeuge, wird AutoCAD mit Zeichnung1.dwg gestartet. Diese Zeichnung muß dann erst geschlossen werden und dann wird mit "acApp.Doc ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : ListBox Inhalt automatisch aktualisieren
Dirk.B am 25.02.2008 um 07:40 Uhr (0)
Hallo zusammen!Da habt Ihr nartürlich recht.Das funktioniert ja auch. Ich hatte mein eigentliches Problem auch falsch geschiltert.Über einen Button wähle ich Objekte in der Zeichnung aus und speicher diese als DXF in einem Verzeichnis ab.Nach dem speichern soll die ListBox DXF aktualisiert werden.Das funktioniert aber erst nach dem erneuten Buttonklick.Code:Private Sub cmdObjekte_Click() Dim objDxf As AcadSelectionSet Dim strTempName As String Dim strTempPath As String Dim strFilename As String Dim ob ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : ListBox Inhalt automatisch aktualisieren
Stelli1 am 25.02.2008 um 10:10 Uhr (0)
Hallo Dirk,es liegt daran das du die Routine zum Füllen der Listbox nur in dem Fall aufruftst wenn ein "Fehler" vorliegt. Der tritt seltsamerweise nur auf wenn die Dateiangabe fehlt.Wie Nepumuk und Carsten schon beschrieben haben brauchst du lediglich die Funktion aufrufen, die die Listbox beim Laden des Formulars füllt. Diesen Code hast du ja nicht gepostet.Etwa so könnte es aussehenCode:Private Sub cmdObjekte_Click() Dim objDxf As AcadSelectionSet Dim strTempName As String Dim strTempPath As Str ...
|
| In das Form AutoCAD VBA wechseln |
