|
AutoCAD VBA : Automatischer Programmstart
Stelli1 am 13.02.2008 um 11:42 Uhr (0)
Hallo Ines,du kannst eine DVB Datei auch in eine Zeichnung einbetten (im VBAMAN-anger). Dann hängen die Funktionen direkt an der Zeichnung. Allerdings einen BeginOpen Event gibt es IMHO nicht.Meines Wissens wird beim Laden einer Zeichnung die AcadDoc.Lsp abgearbeitet. Vielleicht kann man aus einer Kombination von eingebundener DVB und dieser Lisp was machen.Davon abgesehen würde ich das so nicht machen. Ich öffne nie fremde Dateien bei denen man erst die Makros aktivieren muss um sie zu laden. Mit 5 Zeilen ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : VBA optionButton1 Aktive oder deaktive
Stelli1 am 13.02.2008 um 11:52 Uhr (0)
Hallo,dein Programmcode kann so nicht funktionieren. Das einizige was ihn durchlaufen läßt ist die Einstellung "On error resume Next". Dann überspringt er alle fehlerhaften Zeilen.Mit dem CodeCode:ThisDrawing.Layers.Add("7_Tekt_M2").Freeze = Trueerzeugst du einen Layer. Er ist nicht dazu geeignet die Eigenschaften abzufragen oder einzustellen.So geht es richtigCode:ThisDrawing.Layers("7_Tekt_M2").Freeze = Trueoption1.value = ThisDrawing.Layers("7_Tekt_M2").FreezeIn deinem Fall wäre es doch viel einfacher d ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : VBA optionButton1 Aktive oder deaktive
dw am 06.02.2008 um 11:07 Uhr (0)
Hallo,Habe ein problem mit ein optionButtonHabe unter optionButton1 layer Grundriss einblenden und unter optionButton2 layer Grundriss ausblende. Das geht mit diese code:Private Sub knopm2zeigen_Click()ZEIGENIf knopm2zeigen = True ThenOn Error Resume NextThisDrawing.Layers.Add("7_Tekt_M2").Freeze = FalseThisDrawing.Layers.Add("7_Tekt_M2").LayerOn = TrueElseThisDrawing.Layers.Add("7_Tekt_M2").Freeze = TrueThisDrawing.Layers.Add("7_Tekt_M2").LayerOn = FalseEnd IfThisDrawing.Regen (acActiveViewport)End SubPri ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatischer Programmstart
Murkel am 13.02.2008 um 12:51 Uhr (0)
Hallo Carsten, Hallo Wilfried,danke für Eure schnellen Antworten. Ich werde mal heute nacht darüber tüfteln, am Tage muß ich leider arbeiten und meine Familie versorgen. Es klingt jedenfalls alles recht kompliziert, da ich in Bezug auf Programmieren in jeder Hinsicht ein Newcomer bin und mich von Codezeile zu Codezeile hangel. Carsten, den Datei-öffnen-Dialog werde ich versuchen nachzuvollziehen, dazu aber gleich eine Frage vorweg: Da dies ein VB-Programm ist, wie stelle ich zu VB im ACAD-VBA die Verbindun ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatisches Drucken
tunnelbauer am 14.02.2008 um 11:13 Uhr (0)
Hi,wenn du es hier versuchst: http://ww3.cad.de/cgi-bin/ubb/forumdisplay.cgi?action=topics&forum=Inventor+VBA&number=258&DaysPrune=1000&LastLogin=&mystyle= kann dir besser geholfen werden (du bist im Forum AutoCAD VBA ).------------------GrüsseThomasKorrekturen zum Kochbuch AutoLISP
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatisches Drucken
Stelli1 am 14.02.2008 um 11:44 Uhr (0)
Hallo,wie Thomas schon geschrieben hat ...Du bist hier im AutoCAD VBA Forum. Ich schiebe den Beitrag mal nach Inventor VBA rüber.Ich hoffe da kann man dir besser helfen.Wilfried StelbergPS: Hast du schon einen Ansatz in VBA ?------------------Warum lispeln wenns auch anders geht. www.ib-stelberg.de
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatischer Programmstart
Murkel am 14.02.2008 um 12:16 Uhr (0)
Hallo Leute,ich hab mir gestern mal die Tipps genauer angeschaut. Ich hatte in meinem jugendlichen Leichtsinn gehofft, das es eine Funktion gibt, die im Hintergrund nach dem Speicherort der Exceldatei sucht, diesem dann in eine Variable schreibt und ich mit dieser Variable den Excelaufruf starten kann. Der Anwender sollte also keine Dialogboxen oder ähnliches sehen. Hat jemand Ahnung wie diese OLE-Verknüpfungen im ACAD gelöst sind?Vielleicht muß ich doch die ganze Sache von der Excelseite aus betrachten un ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatischer Programmstart
Oliver_01 am 14.02.2008 um 13:31 Uhr (0)
Hallo,zum Thema Autostart von vba-Dateien gibt die Acad-Hilfe folgendes her (leider nur in Englisch):acad.dvb Automatically Load a VBA Project The acad.dvb file is useful if you want to load a specific VBA project that contains macros you want each time you start AutoCAD. Each time you start a new AutoCAD drawing session, AutoCAD searches for the acad.dvb file and loads it. If you want a macro in your acad.dvb file to run each time you start a new drawing or open an existing one, add the following code to ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatischer Programmstart
Murkel am 14.02.2008 um 13:44 Uhr (0)
Hallo Wilfried,ich versuch mich mal verständlicher auszudrücken:Ich habe eine Exceldatei mit 260 Zeilen. Zu jeder dieser Zeilen wird eine AutoCAD-Datei erstellt.In jeder dieser Zeichnungen ist ein Schema mit AutoCAD gezeichnet. Zusätzlich soll in jeder Zeichnung die entsprechende Excelzeile als Tabelle dargestellt werden. Leider sind die Einträge in der Exceltabelle nicht statisch, sondern werden immer mal wieder geändert. Das soll sich natürlich auch auf die AutoCAD-Pläneauswirken und die dort befindliche ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatischer Programmstart
Murkel am 14.02.2008 um 13:51 Uhr (0)
Hallo Oliver,jetzt habe ich Deine Hilfe völlig übersehen. Sorry. Ich möchte allerdings das Programm nicht bei jedem AutoCAD-Start laden, sondern nur bei ausgewählten Zeichnungen.Gruß Ines
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatischer Programmstart
Stelli1 am 14.02.2008 um 17:06 Uhr (0)
Hallo Ines,hier ist mal ein Programmcode mit dem du ab einem Startordner nach einer Datei suchen kannst.Code:Sub SucheDatei() Debug.Print DateiSuche("C: emp", "Suchmich.txt")End SubFunction DateiSuche(vlst_Root As String, vlst_Datei As String) As String !!! Verweis auf Microsoft Scripting setzen !!! Dim fso As FileSystemObject Set fso = New FileSystemObject Dim RootFolder As Folder Dim SubFolder As Folder Ist die Pfadangabe mit abschliessenden If Right(vlst_Root, 1) "" ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatischer Programmstart
Murkel am 18.02.2008 um 13:09 Uhr (0)
Hallo Nepumuk,super dieser Dateiöffnen-Dialog funktioniert auch unter meinem Autocad. Große Klasse, danke! Der 2.Tipp brachte mich auch weiter: acApp.Visible = True hat gefehlt, allerdings muß ich Autocad nun noch beibringen,das es mit maximiertem Fenster öffnet und nicht verkleinert. Vielleicht fällt mir ja heute abend was dazu ein.Dir schieb ich erstmal 10Unities zu!Gruß Ines
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Problem mit IntersectWith
Carsten1210 am 17.02.2008 um 19:36 Uhr (0)
Hallo Jörn,Sowas habe ich bis jetzt auch noch nicht gehabt. Ich teste das Morgen mal mit ner 2006er Version. Ich hab mal ein wenig mit Linien und dem Marko herum gespielt. Erstelle ich in AutoCAD eine Linie auf Basis deiner unteren Linie findet er keine Schnittpunkte. Erstelle ich eine Linie mit dem rechten Punkte deiner unteren Linie als Startpunkt und der senkrechten Linie in der Mitte als Endpunkt findet AutoCAD die Schnittpunkte wieder?! Ich denke mit der Lösung die Linie neu zu erstellen und die alte ...
|
| In das Form AutoCAD VBA wechseln |
