|
Autocad VBA : globaler Skalierfaktor?
Brischke am 25.03.2004 um 19:54 Uhr (0)
Drücke mal direkt in AutoCAD, nicht im VBA-Editor oder Vlisp-Editor die [F1]-Taste und unter -und-color: #FFFF99'>Suchen- gibst du mal eine dir bekannte Systemvariable ein, darüber solltest du dann zur Auflistung der Systemvariablen kommen, die dann zwar nicht vollständig, dafür aber ganz gut erläutert sind. Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! AutoLISP-Programmierung für AutoCAD Da weiß man, wann man s hat!
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Layer nach variable benennen
adblue am 05.09.2009 um 14:52 Uhr (0)
nächstes problem:ich will jetzt jeden layer durchschauen und nach einem bestimmten text im namen und-color: #FFFF99'>suchen:For Each objLayer In ThisDrawing.LayersDebug.Print InStr(1, "test", objLayer.name, vbTextCompare)next es kommen layer vor, die den begriff "test" im namen tragen wieso wird dann trotzdem bei der suche mit instr() immer 0 ausgegeben. welche besonderheit von autocad steckt da wieder dahinter?thx
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Ansichtsfenster per VBA zuschneiden
alfred neswadba am 15.12.2009 um 13:59 Uhr (0)
Hi,Methode (bzw. ein abgeleitetes Interface zu AcadPViewport mit Funktionen dafür) hätte ich auch nicht gefunden. Es wird voraussichtlich darauf hinauslaufen müssen, dies mit SendCommand "_mview" & vbCr & "_o" & vbCr abzuhandeln und eine zuvor erzeugte Polylinie bzw. Region dann zu wählen.Arbeitest Du ev. mit dotNET == da schon. Obs mit Lisp ginge, kann ich Dir leider nicht sagen (würde aber mal nicht ausschliessen, auch da zu und-color: #FFFF99'>suchen).Sorry, - alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Blöcke auslesen
fuchsi am 27.09.2004 um 14:35 Uhr (0)
schau dir mal in der VBA Hilfe den bereich SelectionSets durch. hier kannst du direkt nach blöcken (INSERT) und-color: #FFFF99'>suchen , deren namen mit R-ST_* beginnen und die attribute haben. in lisp wäre das so (ssget X (list (cons 0 INSERT ) (cons 2 R_ST_* ) (cons 66 1)) die suchschlüssel sind da in VBA ident 0.. elemnttyp (INSERT) 2.. elementname (R_ST_* mit Wildcards möglich) 66.. hat attribute (1) musst dir halt nur die beispiele anschauen, und nach deinen suchkriterien abändern. ------------------ WWW.FFZELL.A ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Werkzeugsammlung beim visual-basic editor
mallorca7 am 10.11.2003 um 09:05 Uhr (0)
hi, bei der Erstellung eines Dialogfeldes hast du natürlich eine kleine Werzeugsammlung, (einfügen Userform, Ansicht Werkzeugsammlung). Ansonsten ist VBA nicht Visual Basic. Du erstellst auch keine unabhängigen Anwendungen sondern Programme die nur in Autocad ablaufen. Du hast ja auch nicht die Werkzeuge in VBA in Word oder Excel wie du sie in VB hast. Deshalb wirst du auch einen Menüeditor vergeblich und-color: #FFFF99'>suchen. lg manfred
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : alle 10 sec schauen ob Datei vorhanden?
inventomas am 06.08.2005 um 12:53 Uhr (0)
Hallo Leute,Ich habe in meinem Makro ein Problem:Das Makro soll alle 10 Sekunden nach einer Bestimmten Datei und-color: #FFFF99'>suchen.Wenn ich es mit dem Befehl Sleep (das ich in dem Forum gefunden habe) mache, kann man ACAD nicht mehr standardmäßig schließen während das Makro läuft.Gibt es in ACAD so einen ähnlichen Befehl wie im Word wo es mit Application.OnTime einwandfrei funktioniert?Vielen DankThomas
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Gesamtgewicht Volumenkörper
cacysunlee am 25.10.2006 um 11:50 Uhr (0)
Danke für den Tip Carsten,nach langem und-color: #FFFF99'>Suchen haben ich auch was gefunden.Das Script sieht nun so aus :Public Sub Gewicht()Variablen deklarierenDim Sset As AcadSelectionSetDim Auswahl As AcadObjectDim vGesamtG As VariantFunktionSet Sset = ThisDrawing.SelectionSets.Add("Element")Sset.SelectOnScreenFor Each Auswahl In Sset If TypeOf Auswahl Is Acad3DSolid Then ob Volumenkörper vGesamtG = vbCrLf & vGesamtG + Auswahl.Volume * 0.00000785 End IfNextMsgBox "Das Gewicht der Volumenkörper ist :" & vGesamtGSset.De ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Meldungsunterdrückung ACAD/Excel
runkelruebe am 20.03.2009 um 14:45 Uhr (0)
Hallo GustavZwo,Hoppala, da bist Du mir irgendwie durchgeflutscht, hatte Deinen Beitrag nicht mehr gesehen, sorry! Zitat:ich kam mit Deinem Hinweis nicht weiter, was wohl an meinen betagten Programm-Versionen liegt. Die angegebenen Stichworte sind in keiner meiner Hilfe-Dateien zu finden.Ich fürchte, da hast Du dann wohl schlechte Karten, Paulchen meinte ja auch schon: XL2000 kann das nicht. Da ich kein altes XL /altes ACAD mehr habe, kann ich Dir da leider auch nicht weiterhelfen. :( Zitat:Apropos Hilfe: ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Bei Zeichnung neu auto start eines Befehls
joggenbraxi am 24.07.2010 um 11:48 Uhr (0)
HalloWenn ich auf Zeichnung neu gehe sollte automatisch nach dem aufgehen der neuen Zeichnung der Befehl _dwgprops (Zeichnungseigenschaften) ausgeführt werdenWie kann ich das automatisieren ??? und in der Prototypzeichnung hinterlegen.Hintergrund ist:Es sind Benutzerspezifische Werte hinterlegt nach denen man im Voult und-color: #FFFF99'>suchen kann. Nur einige Penner in der Fa. füllen diese so gut wie nie aus. Wenn nun das Fenster gleich nach dem Start aufgeht hat man doch bessere Aussichten das es ausgefüllt wird.Gruß aus d ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Auswahlsatz in Acad erzeugen!
Big Sven am 22.02.2006 um 09:03 Uhr (0)
Hallo Carsten!Natürlich war gerade ein Fehler von mir! Ich hahe ein Auswahlsatz, wo ich alle Objekte auf einem Layer absuche mit dem Gruppencode 8. Im anderen Auswahlsatz möchte ich nur diesen einen Block und-color: #FFFF99'>suchen (Gruppencode 2). Und trotzdem ignoriert er mir den Blocknamen und nimmt alle Inserts.Wo ist mein Fehler?Gruß SvenCODE:Dim FType(1) As Integer, FData(1) FType(0) = 0: FData(0) = "INSERT" FType(1) = 2: FData(1) = "BLOCKNAME" AWSatz.Select acSelectionSetAll, , , FType, FData
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Alle AcadCircle und Polygone durchlaufen
KlaK am 09.08.2007 um 13:33 Uhr (0)
Hallo Peter,was möchtest Du genau machen?Deine Achtecke sind in wirklichkeit Kreise, nur durch den Zoomfaktor werden sie als Achtecke dargestellt.Sehe ich das richtig:Du möchtest alle Elemente (oder nur die Texte? Kreise?) auf dem Layer SUS_Kanal_Schmutz durchund-color: #FFFF99'>suchen und den kleinsten Textwert und-color: #FFFF99'>suchen.Oder sollen alle Werte in eine Tabelle übernommen werden (wegen der Listbox im Formular) ?Poste doch mal Dein Anliegen.Grüße,Klaus
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : VB.NET
alfred neswadba am 28.06.2011 um 14:05 Uhr (0)
Hi,häng Dich mal nicht an dem 18.0 auf (darf auch 18.1 oder 18.2 sein).Wenn Du gar keine AutoCAD/ObjectDBX Common xxxxx Type Library im COM-Register findest, dann wirds heikel. Dann kannst Du noch verund-color: #FFFF99'>suchen im Common Files-Verzeichnis nach TLB-Dateien zu und-color: #FFFF99'>suchen. Ich vermute mal diese sollten es sein:- axdb18enu.tlb- acax18enu.tlbDu kannst aber probehalber auch mal VB6 aufmachen und nachsehen, ob Du damit die Verweise findest.- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Aufruf Dateieigenschaften in VBA
wwwilli am 27.03.2006 um 13:18 Uhr (0)
Hallo,läuft schon nicht. In Verweise gibt es bei mir "Microsoft Common Dialog Control..." nicht. Hätte das nach Installation des CommonControl-Links von Carsten auftauchen sollen? Oder muss ich das noch und-color: #FFFF99'>suchen? Oder heißt es vieleicht anders?Funktioniert das Ganze dann gegebenenfalls auch bei anderen Benutzern? Oder muss das dann wiederholt werden? Und beim nächsten ACAD-Update? Bei Nicht-Standard-Methoden sollte man vielleicht lieber die Finger weg lassen...MfG
|
| In das Form Autocad VBA wechseln |
