|
Autocad VBA : Problem beim Blockinsert
Heiko76 am 16.02.2004 um 10:09 Uhr (0)
Hallo zusammen, ich habe ein Problem beim einfügen von Blöcken mit folgendem Code: Dim einfüge(0 To 2) As Double Dim xyz As Double Dim acadapp As Object Dim acaddoc As Object Dim acadutil As Object Dim Dateiname As String Set acadapp = GetObject(, AutoCAD.Application ) Set acaddoc = acadapp.ActiveDocument Set acadutil = acaddoc.Utility Dateiname = /Risupport/Rahmen/Pruefung.dwg xyz = 1# einfüge(0) = 0: einfüg ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Problem beim Blockinsert
Heiko76 am 16.02.2004 um 10:50 Uhr (0)
Hab ich auch schon versucht. Der Pfad ist in den Options von AutoCAD definiert als R:/ und darunter ist der rest des Pfades. Ich habe es aber auch schon mit R:/ probiert. Das geht auch nicht. ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : ACAD mit anderer Lizenz starten
Heiko76 am 23.03.2004 um 15:30 Uhr (0)
Hallo @ all, ich versuche gerade mir ein kleines Programm zu schreiben, mit dem ich AutoCAD öffnen kann. Jetzt habe ich aber AutoCAD 2002 als reine AutoCAD Lizenz und AutoCAD 2002 als ACADM Lizenz und AutoCAD 2002 als AIS Lizenz auf meinem Rechner installiert. Ich kann nun mit folgendem Code das AutoCAD als reine ACAD Lizenz starten, aber wie kriege ich die anderen Lizenzen gestartet??? Set ACAD = CreateObject( AutoCAD.Application ) ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : ACAD mit anderer Lizenz starten
Heiko76 am 24.03.2004 um 07:15 Uhr (0)
Hi Axel, ich habe AutoCAD sogar 3 mal installiert. Es gibt ja auch 3 Packete: AutoCAD 2002 Mechanical 6 PP AIS (AIP) 7 jenachdem welches AutoCAD ich starte, wird die jeweilige Lizenz gezogen (Netzwerklizenz) Das funktioniert eigendlich ganz gut. Man kann sogar für alle 3 Versionen ein und das selbe Profil benutzen. Ich weiß jetzt nur nicht, wie ich diese verschiedenen Versionen mit VBA ansprechen und starten kann... ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : nochmal Functions
Heiko76 am 15.04.2004 um 12:04 Uhr (0)
Hi Nancy, ich hatte auch schonmal das problem, das mein VBA einige Befehle nicht gefunden / gekannt hat. Ich habe einfach direkt nachdem ich mich in Windows angemeldet habe (mit anderen Worten, bevor ich irgendein Programm gestartet habe) die Datei VBE6.dll ersetzt. Ich habe die Version 6.3.91.8 vom 22.01.2001 Wenn Du willst und diese Version nicht hast, kann ich Dir die mal zuschicken. Hope this helps ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Fehler mit findfolder
Heiko76 am 27.04.2004 um 14:09 Uhr (0)
Hi Nancy, das hatte ich auch eingetragen. Ich habe es gelöst. Das Problem war, das ich ganz oben Private fso As New FileSystemObject stehen hatte und unten nochmals Dim fso As FileSystemObject. Das hat sich nicht so ganz miteinander verstanden. Ich habe das Dim fso As FileSystemObject rausgelöscht und jetzt funzt es. @daywa1k3r Ich wollte einfach nur überprüfen, ob der Pfad und / oder die Datei vorhanden sind. Trotzdem Danke an Euch beiden für die schnelle Hilfe . ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Blockeinfügen
Heiko76 am 25.05.2004 um 11:00 Uhr (0)
Hallo zusammen, ich habe folgendes Problem. Ich möchte gerne per VBA einen Block einfügen, wo der User den Einfügewinkel aussuchen kann. 0°, 90°, 45° und -45°. Die funktionieren eigendlich ganz gut, bis auf der 90° Winkel. Hierraus macht AutoCAD einen 117° Winkel. Wieso? Habe ich hier irgendwas falsch gemacht? Anbei der Code: Public mspace As Object Public blockref As Object Public Dateiname As String Public Winkel As Double Private Sub Cancel_Click() End End Sub Private Sub Einfügen_Click() Dim xyz As Dou ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Voloview per VB starten
Heiko76 am 03.06.2004 um 07:46 Uhr (0)
Hallo zusammen, weiß hier jemand wie ich den VoloView per VB starten kann? Ich habe dies schonmal versucht und zwar genauso wie ich AutoCAD starte. Aber das funzt nicht. Vielleicht habe ich den Applicationname falsch, ich weiß es nicht. Kann mir jemand helfen oder mir einen Tip geben wo ich etwas finde??? Hier der Code, den ich versucht habe: Dim Voloview As Object Set Voloview = CreateObject( Voloview.Application ) ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : VBA mit dwt öffnen
Heiko76 am 07.07.2004 um 14:07 Uhr (0)
Hallo zusammen, ich möchte ein VBA Programm schreiben, welches mir einen Befehl von AutoCAD abfänngt. Wie kriege ich dieses bei jeder Zeichnung die geöffnet wird oder neu erstellt wird geladen und gestartet ohne das der User noch irgendwas machen muß? ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Installationssprache von AutoCAD auslesen
Heiko76 am 15.09.2004 um 13:42 Uhr (0)
Hallo zusammen, wie kann man rausfinden, in welcher Sprache das AutoCAD installiert wurde? ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : fso.filecopy funktioniert nicht
Heiko76 am 16.10.2004 um 08:21 Uhr (0)
Hallo zusammen, ich möchte gerne eine Datei mit Hilfe des FSO kopieren und danach die alte löschen. Nur leider nimmt er den Befehl fso.filecopy nicht an. Hab ich da noch irgendwas vergessen oder falsch gemacht? Hier der Code: Private fso As New FileSystemObject Public Sub bmpmove() Dim ssetObj As AcadSelectionSet Dim Entry As AcadRasterImage Dim GroupCode(0) As Integer Dim dataCode(0) As Variant Set ssetObj = Nothing Set ssetObj = ThisDrawing.SelectionSets.Add( XX ) ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : fso.delete und kill funzt net
Heiko76 am 25.10.2004 um 08:36 Uhr (0)
Hallo zusammen, die beiden Funktionen fso.delete (filename) und kill filename funktionieren beide nicht. Habe in der Variable filename den kompletten Pfad mit Dateinamen und Endung angegeben. Die Datei ist auch vorhanden und nicht Schreibgeschützt. Warum geht das nicht??? Mit dem Befehl fso.copyfile filenamealt, filenameneu wird die Datei kopiert, aber danach die Datei filenamealt nicht gelöscht... ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : fso.delete und kill funzt net
Heiko76 am 26.10.2004 um 08:33 Uhr (0)
Hallo Thomas, ich glaube, ich habe den Fehler gefunden... die Datei ist noch geöffnet. Dann kann ich die garnicht löschen. Da bin ich drauf gekommen, wo ich das mit dem movefile versucht habe. Jetzt muß ich nur noch gucken, das ich das alte Bild später lösche... ------------------ cu Heiko
|
| In das Form Autocad VBA wechseln |
