|
Autocad VBA : Get Xdata Entitys
dan_rather am 27.05.2004 um 14:29 Uhr (0)
Hallo zusammen, wie zeige ich mit folgendem Code alle xdaten im gewählten sset an? irgendwas fehlt hier noch, aber was? Sub Kanal_Berechnung() und-color: #FFFF99'>Suchen der im vorherigen Beispiel erstellten Auswahl On Error GoTo Hell Dim awss As AcadSelectionSet Set awss = ThisDrawing.SelectionSets.Add( 310 ) awss.SelectOnScreen Dim sset As Object Set sset = ThisDrawing.SelectionSets.item( 310 ) Definieren der XDaten-Variablen zum Erfassen der XDaten-Informationen Dim xdat ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Hinweisfenster, Hyperlink, Button & Co...
kschlepp am 27.06.2007 um 14:12 Uhr (0)
Hallo!Ich habe gehört das hier im VBA-Forum vielleicht der Schlüssel zúr Lösung meines Problems liegt...Habe im "Rund um AutoCAD"-Forum bereits einige Hilfe erfahren, allerdings das gewünschte Ergebnis nur zum Teil erreicht. Es geht um folgendes:In einige Zeichnungen muss vor dem Plotten ein Stempel eingefügt werden um sie eindeutig zu kennzeichnen. Damit dies nicht vergessen wird soll vor beim Aufruf des Plotbefehls ein Hinweisfenster aufpoppen. Zum Beispiel: "Stempel einfügen nicht vergessen (wenn notwen ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Zugriff auf excel-zeile als Datensatz per ID
fuchsi am 19.05.2008 um 14:42 Uhr (0)
wenn Du nur eineige wenige Excel zeile benötigst, könnte diese Methode passen.Solltest Du aber alle Zeilen benötigen, und darauf gezielt zugreifen wollen (ähnlich Deinem Assoc Beispiel) könnte das Mricrosoft Scripting.Dictionary Objekt interresant sein.kleines Beispiel, anstatt eine Excelliste einzulesen mache ich nur eine Schleife von 1 bis 20, wobei der Schleifenzähler i als ID herhält.1. Verweis auf Microsoft Scripting Runtime (scrrun.dll)2. Erstellen eines Klassenmodules namens Datensatz mit folgendem ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Textobjekt --> Inhalt ausgeben
Hoppla83 am 14.03.2012 um 22:34 Uhr (0)
Hallo zusammen,die Frage ist mir fast peinlich, aber was soll es:ich habe eine Zeichnung zu Ergänzen. Es geht um Temperaturenwerte und Sonnenscheindauern, die auf einer geographischen Karte mit Messstationen eingetragen werden sollen.Die Messwerte kommen aus einer Textdatei und sollen entsprechend ihrer Station auch in der Karte richtig platziert werden.Nun habe ich den Ablauf des Programms soweit aufgestellt und hänge nur an einer Kleinigkeit:wenn ich ein Objekt (Text mit dem Ortsnamen der Messstation z.B ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Fehlermeldung: Let-Prozedur der Eigenschaft nicht definiert
startrek am 25.11.2004 um 13:06 Uhr (0)
Woran kann das liegen? Erkennt es nicht den TRUE-Wert [...] Möglicherweise einfach daran, dasses wohl keinen Block mit diesen Koordinaten gibt. Tobias, mal als Tip, bleibe doch erstmal intern und kläre alles was Du suchst mit debug.print ab, bevor Du beginnst irgendetwas andren Applikationen mitteilen zu wollen. Wenn im DFenster alles klappt, kannstes ja dann nach Excel rüberschaufeln. Erleichtert die Fehlersuche ungemein, sonst und-color: #FFFF99'>suchen Du bzw. andere Forumsteilnehmer womöglich an der falschen Stelle und ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Blockattribute in eine Textdatei schreiben
ela-cad am 30.09.2009 um 12:08 Uhr (0)
Hallo Alfred,um unser Vorgehen noch etwas zu vertiefen (nicht mit AutoCad):Ich bearbeite eine Zeichnung und drücke auf speichern. Nun wird ein Skript (Befehlskette) abgearbeitet, das die Einträge aus dem Schriftfeld wie z.B. zeichnungsnummer, erste Zeile, zweite Zeile, usw. mit einem Feldtrennungszeichen in eine Textdatei schreibt.Die Zeichnung selber wird wie gesagt als HGPL-Datei beigefügt.In der Datenbank werden die Texte in die entsprechenden Felder der Dokumentensuchmaske eingetragen und mit der Zeich ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Werte von Excel auf Attribute übergeben
Stelli1 am 17.03.2008 um 19:17 Uhr (0)
Hallo Bernhard, Zitat:Die gebe ich an. z.B.: ba(6).TextString = Cells(15, 6).ValueAber doch nicht im Programmcode, oder ?Du kannst es automatisieren wenn es in der Exceltabelle eine Spalte mit einem Elementnamen gibt und dieser auch in einem Blockattribut abgefüllt ist.Dann kannst du einen Block selektieren, den Elementnamen des Blockes aus dem Attributfeld lesen, diesen in der Exceltabelle und-color: #FFFF99'>suchen. Damit erhälst du z.B. die Zeile in Excel in der die Daten zu diesem Element stehen. Dann liest du die Daten w ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Aufruf Dateieigenschaften in VBA
Huebi am 27.03.2006 um 13:38 Uhr (0)
Hallo Willi, Zitat: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?Falls Du es in der Liste nicht finden solltest, dann gehe auf "Durchund-color: #FFFF99'>suchen" und such die Datei: "...Windowssystem32Comdlg32.ocx". Leider weiß ich nicht, wann die Datei auf den Rechner installiert wird - ich vermute mal bei der Windows - Installation oder s ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Automatischer Programmstart
Murkel am 13.02.2008 um 08:55 Uhr (0)
Hallo Leute,ich hab zwar letzte Nacht bereits diesen Beitrag geschrieben, wahrscheinlich habe ich aber beim Senden einen Fehler gemacht, deshalb hier nochmals mein Problem:Ich habe dank eurer Hilfestellungen in diesem Forum ein VBA-Programm geschrieben, welches mir bestimmte Daten aus einer Exceltabelle ausliest und diese dann in einer AutoCAD Zeichnung in einer Tabelle ausgibt. Hat auch alles geklappt, obwohl ich noch keine Programmiererfahrung habe!Nun möchte ich das Programm und die betreffenden Pläne a ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : mehr als 1 Blockname in ssnew.Select acSelectionSetAll
vittorio0 am 24.05.2011 um 17:01 Uhr (0)
Hallo,mit dem folgenden code lad ich die Attribute eines Zeichnungkopfes in eine Form. Ich möchte das aber so anpassen dass ich nach diversen Blocknamen und-color: #FFFF99'>suchen kann nicht nur "Kopf", ist das möglich?Code:Private Sub userform_Initialize()Dim EntGrp(1) As IntegerDim EntPrp(1) As VariantEntGrp(0) = 0EntPrp(0) = "INSERT"EntGrp(1) = 2EntPrp(1) = "Kopf" define error function On Error GoTo Err_Control create a selection set Set ssnew = ThisDrawing.SelectionSets.Add("TBLK") finde den Block ssnew.Select acSelec ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : z-koordinate aus attributen schreiben
m.neu am 02.12.2004 um 09:55 Uhr (0)
Hallo habe folgendes Problem. Hab eine A-Cad Zeichnung (Lageplan) bekommen die als z-Wert nur 0 enthält, aber alle Punkte sind Blöcke die in den Attributen die Höhe eingetragen haben. Hab mir nun aus den anderen Beiträgen ein Programm zusammengeschustert, das die Blöcke mit Attribut Höhe herausfiltert und in eine Excel-Datei schreibt. Klappt auch wunderbar, nur würd ich jetzt gern die ausgefilterte Höhe gleich als z-Koordinate des Blocks zurückschreiben. Kann eigentlich ja nicht so schwer sein, bin aber Ne ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Layout von Vorlage per VB(A)
PeterF am 28.08.2008 um 09:27 Uhr (0)
Hallo Klaus, habe Dich schon vermisst!Dein Voschlag ist genau dass, was ich wollte. Ich brauche für das Grundgerüst erst mal keine Kontrolle. Alle anderen Elemente bastle ich mir dann schon so hin, dass alles gut wird.Dummerweise bekomme ich nur eine Mitteilung in einer MsgBox angezeigt, die mich überhaupt nicht interessiert, aber meinen automatischen Ablauf stört"This application has dedect a mixed Version of AEC objects participating in this Operation.Newer AEC objects will be disallowed from participat ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Autocad gestartet ?
BloodyMess am 25.08.2004 um 16:08 Uhr (0)
Hallo HJ, die Lösung die ich da gefunden hatte, hat mir nicht wirklich gefallen und hab ebend nochmal gesucht und bin über nachfolgenden Code gestolpert. Könnte evtl. besser sein nach der acad.exe zu und-color: #FFFF99'>suchen. Code: Public Declare Function CreateToolhelp32Snapshot Lib Kernel32 _ (ByVal lFlags As Long, ByVal lProcessID As Long) As Long Private Declare Function ProcessFirst Lib Kernel32 Alias _ Process32First (ByVal hSnapShot As Long, uProcess _ As PROCESSENTRY32) As Long Priva ...
|
| In das Form Autocad VBA wechseln |