|
Autocad VBA : VBA Zugriff auf Acad von Excel aus
yamaha am 03.05.2005 um 09:12 Uhr (0)
Hallo Taz_Cad 1. Du mußt den Verweis auf die AutoCad-Objektbibliothek gesetzt haben. 2. Du mußt AutoCad gestartet haben. 3. Du mußt die Version von Autocad beachten 4. Dann müßte folgendes funtkionieren On Error Resume Next Err.Clear Set ACADServer = GetObject(, AutoCad.Application.15 ) If Err.Number = 0 Then AutoCADVersion = 2000 Exit Function End If Err.Clear Set ACADServer = GetObject(, AutoCad.Application.16 ) If Err.Number = 0 Then AutoCADVersion = 2004 Exit Function End If usw. ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Fehlermeldung: Let-Prozedur der Eigenschaft nicht definiert
kiltswitch am 25.11.2004 um 11:11 Uhr (0)
Achso, einfach über die Variablenvereinbarung wie immer halt... Also so: Dim Cells As Double Ich habe jedoch festgestellt, dass mir das bei meinem Problem nicht weiter hilft. In dem anderen Code, wo alle Blöcke ausgelesen wurden, taucht auch bei den Cells Integer auf und die Werte werden trotzdem in Excel geschrieben (auch wenn sie größer als der Integerbereich sind). Und wenn ich Double vereinbare, ändert sich auch nichts. Es liegt an irgendetwas anderem. Mmh... Das mit rownum = rownum +1 - wie mir das Na ...
|
| 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 : mit variablen Werten eine komplette Zeichnung erstellen
The VIP am 08.08.2003 um 13:06 Uhr (0)
Ich hoffe mal nicht dass ich durch meine (vielen) Fragen die ich evtl. noch haben werde, diesen Thread hier sprenge... Gebt mir einfach Bescheid, wenn ich abdrifte oder das ganz hier unübersichtlich wird und ich zu bestimmten Themen besser einen neuen Thread eröffnen soll. Ich hab es über die Hilfe-F1 und meinen Excel-Kenntnissen folgendes hinbekommen: Sub Aussenwand() Dim ANTWORT As Integer Dim circleObj As AcadCircle Dim centerPoint(0 To 2) As Double ANTWORT = InputBox( Durch ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Excellink 2008 - umschreiben?
lobby-records am 07.03.2008 um 11:55 Uhr (0)
Hallo zusammen,wir haben gerade das Excellink 2008 als Testversion und es funktioniert auch soweit ganz gut.Jetzt stellt sich die Frage, ob man das Programm auch so umschreiben kann, dass die Verknüpfung auch über ein bestimmtest Attribut im Block erfolgen kann? D.h. das es z.B. ein Attribut im Block gibt das XY heißt und in der Excel-Liste gibt es auch die Spalte in der XY steht. Denn das "normale" stellt die Verknüpfung über die ID des Blockes her.Wir würden das Tool zum einlesen von Arbeitsplatzinformat ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Order erstellen und struktur kopieren
runkelruebe am 31.01.2008 um 15:15 Uhr (0)
Zitat:ich weis nicht was ich machen soll zunächst mal aufhören zu jammern, davon wirds ja nicht besser. SCNR ;-)Was passiert denn, wenn du den dort gefundenen code in ein VBA-Projekt Deiner Wahl kopierst? Also ich habe das hier mal getestet und einen beliebigen Ordner von C mitsamt Struktur an einen andern Ort kopiert. Klappt das bei Dir auch? Dann kämen wir nämlich zum Punkt Anpassen an Deine Bedürfnisse. Ohne mich in Deinen code reinzuknien: Woher kommen die Infos zu Ziel- oder Quellpfad? Kannst Du die ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Order erstellen und struktur kopieren
runkelruebe am 31.01.2008 um 15:43 Uhr (0)
So vielleicht?Code:Option ExplicitDim Pfad As StringSub Ordner_kopieren()Dim Ziel As StringConst ueberschreiben As Boolean = TrueConst Quelle As String = "c:TEST"Call ordnerauswahlZiel = Pfad & "" & Mid(Quelle, 4)Dim objFSO As ObjectSet objFSO = CreateObject("Scripting.FileSystemObject")objFSO.CopyFolder Quelle, Ziel, ueberschreibenEnd SubSub ordnerauswahl() Dim AppShell As Object Dim BrowseDir As Variant Set AppShell = CreateObject("Shell.Application") Set BrowseDir = AppShell.BrowseForFolder(0, "Ordner a ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Verweise mit References.AddFromFile
djs0401 am 22.07.2008 um 11:08 Uhr (0)
Guten Tag!Ich hab da ein kleines/großes Problemchen mit dem VBA von ACAD Mechanical 2007.Ich möchte gerne Verweise automatisch durch das Programm, welches ich geschrieben habe, hinzufügen lassen. Möchte dies über das Programm machen, da ich es auf vielen verschiedenen Rechnern mit unterschiedlichen Programm Versionen, der in meinem Programm verwendeten Verweisen, installieren muss.Jetzt hab ich mich im Interenet schlau gemacht und den BefehlReferences.AddFromFile bzw. References.AddFromGuidgefunden. Leider ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 06.11.2008 um 15:03 Uhr (0)
Hi,also ich komme so langsam meinem Ziel näher. Zwei Probleme (noch):1. tAcadApp = GetObject(, "AutoCAD.Application") Set tAcadDoc = tAcadApp.Documents.Open ("M:...") == kommen sich in die Quere. Soll heißen, das Programm öffnet die Zeichnung erst, wenn AutoCad schon gestartet ist. Vielleicht müsste ich hier auf meine gute alte Shell-Methode zugreifen2. Mein eigentliches Problem war ja das Einfügen von Zellen in die Zeichnung. Wie sieht hier der Code aus? [Ein Makrorecorder für AutoCad wäre ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel-Werte in CAD-Zeichnung übernehmen
CHMR am 06.11.2008 um 15:05 Uhr (0)
Hi,also ich komme so langsam meinem Ziel näher. Zwei Probleme (noch):1. tAcadApp = GetObject(, "AutoCAD.Application") Set tAcadDoc = tAcadApp.Documents.Open ("M:...") == kommen sich in die Quere. Soll heißen, das Programm öffnet die Zeichnung erst, wenn AutoCad schon gestartet ist. Vielleicht müsste ich hier auf meine gute alte Shell-Methode zugreifen2. Mein eigentliches Problem war ja das Einfügen von Zellen in die Zeichnung. Wie sieht hier der Code aus? [Ein Makrorecorder für AutoCad wäre ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Bemaßung Wert auslesen
82.lagrima am 11.05.2013 um 14:36 Uhr (0)
Hallo,ich noch nicht viel Erfahrung mit VBA in Autocad habe mich aber vor einer Weile aber schon (Learning by Doing) mit VBA in Excel auseinandergesezt.Jetzt würde ich gerne den Wert (in den Eigenschaften heißt es Maßeinheit) von Bemaßungen auslesen.Nach einiger Suche bin ich bereits auf folgenden Verweis in einer anderen Disskussion gestoßen:http://forums.augi.com/archive/index.php/t-35912.htmlAber das ist auch nicht das, was ich suche (wenn ich das denn richtig verstanden habe, mein Englisch ist nicht so ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Pixelfarbe aus BildDatei auslesen
reltro am 10.11.2011 um 13:19 Uhr (0)
hmmm, ok...direkt: ich checks nicht.Es ist NormalerWeise so, dass ich VBA benutze um algorithmisch generierte Geometrien und Strukturen zu produzieren, und jene ClassImporte zur Zeit nur aus Excel mache, um die Anfangsbedingungen im Griff zu behalten. Und habe damit ehrlich gesagt genug zu tun.Gibs da denn nicht eine einfache Methode? So ungefähr in der Form:Code:Sub Main() Dim Bild as JPEG - am besten als Class/Objekt Bild.SetPath ("D:Original.jpeg") Dim PixelColor() as Variant With Bild Redim P ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Excel Workbook benennen oder identifizieren
tomww am 04.12.2006 um 17:59 Uhr (0)
Uii, bist ja auch eine Nachteule, so spät noch gearbeitet.ich habe den unteren Teil von dir eingebaut. Es wird aber nun eine Kopie vom ersten Workbook erzeugt. Sprich, gleicher Name, aber schreibgeschützt und es enthält nicht den Sheet/Daten von der ersten Erstellung.Und zwar werden die Routinen von einem Formular aus aufgerufen. Ist das Formular noch offen kann/soll der User weitere Daten in diesen offenen Workbook schreiben. Die meisten User haben aber meist noch andere Excelworkbooks auf (da holen die i ...
|
| In das Form AutoCAD VBA wechseln |
