|
AutoCAD VBA : Gedrehte Bemaßung ausrichten
Carsten1210 am 29.08.2007 um 18:32 Uhr (0)
Hi Chris,Mit VBA vorhandene Bemassungen ändern ist im AutoCAD ziemlich eingeschränkt. Warum liest du die die Definitionspunkte der Bemassung aus und erstellst einfach ein neue. Die alte kannst du dann ja löschen.Das wäre, so meine ich, der einfachste Weg um das Problem zu lösen.Edit: Schau dir doch die Möglichkeiten im Objekt-Explorer mal an. (F2 in der IDE drücken)Gruß, Carstem[Diese Nachricht wurde von Carsten1210 am 29. Aug. 2007 editiert.]
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : SendKeys an Befehlszeilenanwendung übertragen!?
Einstein am 31.08.2007 um 00:06 Uhr (0)
Hallo Forum, heute hab ich mal eine Frage, die nicht dirkt mit AutoCAD-VBA zusammen hängt....Und zwar versuche ich mit der SendKeys Methode, Tastenfolgen an eine Befehlszeilenanwendung (cmd.exe) zu übergeben. Das funktioniert aber nicht, warum!? ...Obwohl die Routine für andere Anwendungen, zum Beispiel den Rechner, dem Editor, usw. funktioniert. Der Code:x = Shell("cmd.exe", 1)AppActivate x, 1SendKeys "TestString", True(Bei einer Befehlszeilenanwendung erzeugt auch AppActivate einen Fehler)--------------- ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : SendKeys an Befehlszeilenanwendung übertragen!?
c.schojer am 03.09.2007 um 20:48 Uhr (0)
ALso ich muß sagen Sendkeys funktioniert nicht immer!( wennst mit der Maus rumklickst kann es passieren das die Sendkeys in ein anderes programm reinschreibst!aber so sollte es zumindest gehen!-- Sendkeys vermeiden!! eher eine Bat datei schreiben oder erzeugen und diese startenMFG ChrisPrivate Declare Sub PauseProg _ Lib "kernel32" _ Alias "Sleep" ( _ ByVal ZeitMilli As Long)Argumente:ZeitMilli: Zeitwert in MillisekundenSub test() Dim P_ID As Double Dim n As Integer P_ID = Shell("cmd.exe", vbNorma ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Mouse Move Event? Eigenschaften?
c.schojer am 04.09.2007 um 12:05 Uhr (0)
Es muß doch irgendwie möglich sein die Koordinaten der Maus im Autocad auszulesen, da unten im Balken auch die Koordinaten angezeigt werden??hab mal was von einer Acadx.arx gehört aber weiß nicht woher ich die bekommen kann! (bzw ev kann man dies anders programmieren)Mfg Chris
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Mouse Move Event? Eigenschaften?
c.schojer am 03.09.2007 um 22:20 Uhr (0)
Hallo an allewollte schon vor einiger Zeit mal so ein Tool schreibenwo man wenn man zb über ein Objekt fährt das Xdata enthält dann soll zb ein Menü oder was auch immer aufgehenund mir die Eigenschaften anzeigen (userform zb)Nur wie nutzt man diesen event in vba?Wie erhalte ich die Objekte über die ich mit der Maus fahre??Sehe nur click events will aber nix anklickenund noch dazu wie kann ich die Koordinaten der Maus auslesen (Autocad Koordinaten)Kann mir da irgendjemand bitte helfen.Mfg Chris
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Plot Eigenschaft von Layer
fuchsi am 12.09.2007 um 12:17 Uhr (0)
Dass hier ADT2007 anders arbeitet als das reine Autocad 2007 kann ich zwar nicht glauben.Habe es jetzt nochmal extra in der Autocad 2007er Version probiert.ThisDrawing.Layers.Item("Layer4").Plottable = Falsegeht definitiv (Natürlich muss es den Layer Layer4 auch geben)Hm sehe gerade, dass mein erstes Posting Plotable statt Plottable heisst. Sollte aber in der VBA Umgebnung ja eh automatisch korrigiert werden------------------ Ing. Anton FuchsWWW.FFZELL.AT.TC[Diese Nachricht wurde von fuchsi am 12. Sep. 20 ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD Fenster minimieren
JOLI am 14.09.2007 um 15:20 Uhr (0)
Halloich, als VBA Anfänger, habe eine Progamm mit dem ich von AutoCAD nach ACCESS springe. Dabei möchte ich aber das AutoCAD Fenster minimieren ! Aber wie ??Wenn ich von Access zurückkomme hätte ich das Fenster aber gern wieder vorn Ich bin sicher dass dies keine unlösbare Aufgabe ist und bitte daher um Unterstützung!Euer Jörg------------------Grüße Jörg Lipphardt
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD Fenster minimieren
JOLI am 17.09.2007 um 08:48 Uhr (0)
Hallo CarstenSUPER das war was ich gesucht habe Vielen Dank GrüßeJörg------------------Grüße Jörg Lipphardt
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Elementtyp (bspw. Linie, Block, Text...) eines AcadObject ermitteln
KlaK am 20.09.2007 um 17:51 Uhr (0)
Aus der AutoCAD Hilfe (Beispiel GetEntity ): Zitat: Begin the selection Dim returnObj As AcadObject Dim basePnt As Variant On Error Resume Next The following example waits for a selection from the userRETRY: ThisDrawing.Utility.GetEntity returnObj, basePnt, "Select an object" If Err 0 Then Err.Clear MsgBox "Program ended.", , "GetEntity Example" Exit Sub Else returnObj.Update MsgBox "The object type is: " & returnObj.EntityName, , "GetEntity Example" returnObj.Update E ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : sendcommand
Bernd P am 21.09.2007 um 12:38 Uhr (0)
ServusWill aus Excel einen Befehl in Autocad aufrufen und hab das im Forum gefunden. Der Befehl wird durch Formeln zusammengestellt und steht in im Layout Bestimmt Zelle D13.Ich weiß das bei vbastmt der Befehl aus der Zelle reingehört aber wie hab ich keinen Schimmer.Der Befehl dreht in Acad das UCS auf Welt setzt einen Block mit Attribut und dreht dann UCS wieder zurück.Code:(command "_ucs" "_w") (command "_insert" "Kot_Hoehe_LP" "-101941.8499051,203057.2992329" "" "" "" "1023.2" ) (command "_ucs" "_p")Co ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : sendcommand
Stelli1 am 21.09.2007 um 18:48 Uhr (0)
Hallo Bernd Zitat:Original erstellt von Bernd P: acApp.activedocument.sendcommand "vbastmt" & Chr(13) & "msgbox now" & Chr(13)Damit machst du deiner Signatur ("Warum Einfach es geht auch kompliziert") alle Ehre.Du bist in Excel, holst dir eine ActiveX Instanz von AutoCAD, nutzt da den Bypass um AutoCAD Kommandos aufzurufen, um da mit dem Hilfskommado VBASTMT einen VB Befehl auszuführen. Was willst du denn eigentlich machen Wilfried Stelberg------------------Warum lispeln wenns auch anders geht. www. ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : sendcommand
c.schojer am 23.09.2007 um 01:54 Uhr (0)
Ich meine ich habe mal folgendes gebraucht:Ich habe Werte in Excel und mit diesen soll in Autocad was gezeichnet werden!Das Hauptprogramm das die Werte verarbeitet befindet sich aber in Autocad (ist einfach viel viel schneller)########Programm in ExcelPublic mspace, acadSub Zeichne() Call initacad AppActivate acad.Caption Hilfstool_Cad.acad.ActiveDocument.SendCommand "-vbarun Ergebnislinienzeichnen.Zeichne_Mom "Das Programm Zeichne_Mom holt sich dann aus Excel die Daten und verarbeitet diese dann in A ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : sendcommand
fuchsi am 08.10.2007 um 16:26 Uhr (0)
Sub Export_Bestimmt2() Dim acApp As Object, x, y Application.ScreenUpdating = False Set acApp = GetObject(, "Autocad.application") x = acApp.activedocument.FullName y = Worksheets("bestimmt").Cells(13, 4).Value AppActivate "Autocad 2006" acApp.activedocument.sendcommand "commandName" & chr(13) acApp.activedocument.sendcommand y AppActivate "Microsoft Excel" Sheets("start").SelectEnd Sub[/code]Und im Excel Feld 13,4 steht wirklich dieser ganze Codeschnippsel (command "ucs" ...dann sollte es so geh ...
|
| In das Form AutoCAD VBA wechseln |
