|
Autocad VBA : Autodesk Map 5, VBA-Erweiterung, interessantes Rätsel
BloodyMess am 30.10.2004 um 17:04 Uhr (0)
Hallo Hendersson, was mir so beim ersten drüberschauen aufgefallen ist. Code: Dim strAliasnamen, strQuelldatei, strQuellpfad, strBearbeitung As String deklariert strAliasnamen, strQuelldatei, strQuellpfad als Variant und nicht wie sicherlich vorgesehen als String. Was passiert eigentlich wenn der Alias schon vorhanden ist? Dein Programm wird sicher crashen! Ein Alias ist für mich dazu da um Netzlaufwerken einen Pfad zu geben, da standardmaessig nur der Alias auf C: gesetzt ist und man nur ueber den Al ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Werte von Excel auf Attribute übergeben
Bernhard F. am 17.03.2008 um 15:03 Uhr (0)
Zitat:[/QUOTE]Woher soll das Programm wissen welche Attribute sich ändern sollen ?[QUOTE]Die gebe ich an. z.B.: ba(6).TextString = Cells(15, 6).Value Zitat:[/QUOTE]Wie ist denn die Verbindung der Blockreferenz zur Exceltabelle ? (Handle, Koordinate, ???)[QUOTE]Das ist eben die Frage, das kann ich nicht sagen. Zitat:[/QUOTE]Wenn man das dem Programm immer blockweise angeben musst, kann man die Werte ja fast von Hand ändern.[QUOTE]Das ist richtig, aber die Exceltabelle (Blattverzeichniss) wird von jemanden ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : noch mal die Frage nach dem Layereigenschaften-Filter
CADOpa am 05.11.2005 um 10:24 Uhr (0)
Hallo Stelli,Also der Fall ist der...Wir bekommen häufig Pläne von großen Gebäuden um unsere Gewerke dort einzuplanen. Nun haben die Pläne schon sehr viele Layer, die sehr synonym benannt sind. Um die Planungsarbeit zu erleichtern habe ich eine Layerstruktur festgelegt, die in den ersten 5 Zeichen die Firma, den Arbeitsbereich des jeweiligen Gewerk´s festlegt.X1_SUnrein...X2_SRein... usw.Nun habe ich 5 Werkzeuge mit denen ich wenn der Eigenschaftenfilter im LayerManager festgelegt ist auf X?_S die Mö ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Grundlegende Frage
4thdimension am 24.06.2013 um 21:21 Uhr (0)
Hallo!Ich hab mal eine grundsätzliche Frage ob VBA das kann.Also mein Problem:Ich bin seit kurzem in einer neuen Firma in der ACAD 2014LT verwendet.Meine Aufgabe ist es Zeichnugen zu erstellen und die .dwg in einen Ordn er zu Kopieren der sich jedes Monat ändert.Und dann eine .dxf in einen anderen Ordner und einen "anderen Namen" (dieser Ordner ändert sich einmal im Jahr).Mein Wunsch:Da ich nicht immer die Ordner wechseln will (Braucht Zeit) und genauso wenig immer den ganzen Namen neu eingeben will, habe ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : .Find meldet unzulässige Verwendung eines Objekts
vittorio0 am 18.10.2011 um 20:44 Uhr (0)
Auf die Antwort von -alfred- etwas mehr code. In der msgbox sehe ich die einzelnen Einträge, benutze ich jedoch .Find kommt die besagte Fehlermeldung. XP Prof, Autocad 2000 Access 2003 Runtime alles neu installiert und updates gefahren, (inkl. Office 2003 SP3)Code:Private Sub btnAttrFromZV_Click() Attribute von MS Access holen und in der Form einlesenDim oConnect As New ADODB.ConnectionDim oRecSet As New ADODB.RecordsetDim strDWG As StringDim sSQL As StringDim dwgPrefix As StringDim dwgName As StringDim DW ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : AutoCAD plotten
facebraker am 23.03.2009 um 13:46 Uhr (0)
Hallo,ich weiß nicht so recht, wo ich mein Problem einordnen muss, aber ich würde sagen VBA trifft es am besten.Ich habe einen Stapel Zeichnungen in einem Verzeichnis liegen, dann ein Makro schreiben, wo ich alle Zeichnungen mit dem FileDialog markieren kann, diese der reihe nach geöffnet werden und geplottet.Das sind alles ProSteel3D Dateien und Zeichnungen.Das mit dem FileDialog bzw. das Drumherum ist erstmal Nebensache, ich probiere grad den grundlegenende Code aus, ich habe mit folgenen angefangen:Code ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Punktnummern und Koordinaten
feffi am 07.03.2007 um 08:48 Uhr (0)
Hallo,ich habe folgendes Problem. Die jetzige Arbeitsweise ist folgende:Es wird ein Block in der Zeichnung gesetzt. Dazu wird ein Text daneben gesetzt. Der Einfügepunkt ist aber nicht der gleiche wie der vom Block. Der Text heißt z.B "P1". Nun wird der Block und der Text in einer Art Matrix angeordnet. Also habe ich z.B. 7 Zeilen und 5 Spalten dieses Blockes und Textes. Als nächstes werden alle Texte ausgewählt und über einen Befehl hochgezählt. Befehl kenne ich leider nicht. Jetzt habe ich also eine fortl ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Autocad aus Excel heraus ansprechen
Murkel am 19.02.2008 um 23:23 Uhr (0)
Hallo,ich habe noch ein Problem, aber bitte nicht gleich in die Luft gehen, weil die ganze Geschichte schon mehrfach besprochen wurde. Hier erstmal mein Ansatz:Sub Acadtabelle() Dim acApp As Object Anwendungsobject (AutoCAD) Dim acDoc As Object Set acApp = CreateObject("Autocad.Application") Autocad starten die entsprechende Zeichnung (strFilename wurde vorher ermittelt) öffnen: acApp.Documents.Open (strFilename) acApp.Application.WindowState = acMax Auto ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Attribute auslesen
KlaK am 06.03.2008 um 16:51 Uhr (0)
Hallo Markus,ja das Thema ist nicht so einfach wie die vielen Beiträge zeigen.Hier mal ein kleines Hilfsmakro zum Verständnis:Code:Sub test_blocks() Dim returnObj As AcadObject Dim basePnt As Variant Dim blockRefObj As AcadBlockReference Dim attributeObj As Variant On Error Resume Next The following example waits for a selection from the userRETRY: ThisDrawing.Utility.GetEntity returnObj, basePnt, "Select an object" If Err 0 Then Err.Clear MsgBox "Program ended.", , "GetEntity Example ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Auslesen von Blockeigenschaften mittels VBA möglich?
Brischke am 09.11.2004 um 13:49 Uhr (0)
Hallo kiltswitch, Zitat: Original erstellt von kiltswitch: ...Habe trotzdem mal noch eine Frage: Bei der Programmierung der automatisierten Mastzusammensetzung benötige ich wohl definitiv eine Datenbank? Ohne die würde das nicht gehen, oder? Ich muß das wissen, um mein Konzept fortführen zu können. Holger gab mir den Ratschlag, alle Bauteile zu katalogisieren und von denen die technischen Eigenschaften zu ermitteln, die zur eindeutigen Zuordnung einer Bauteildatei notwendig sind. Diese Eigenschaften s ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Liegt eine Blockref an diesem Punkt?
Frank136 am 04.07.2009 um 12:44 Uhr (0)
Hallo,dann werde ich mal etwas weiter ausholen:Ich möchte in einer Zeichnung mehrere Polylinien einzeichnen. Ich bekomme aus Excel jede Menge X- und Y-Werte (Z immer 0) und zeichne diese Linien. Das funktioniert alles schon super. Jetzt kommt das Problem:Es kann sein, dass zwei oder meherere Linien horizontal übereinander liegen (vertikal ist mir egal) und ich kann evtl nicht erkennen, wie viele Linien es sind. Als Lösung möchte ich die Linien mit einem kleinen Y-Versatz zeichnen.Ich möchte mir die Y-Werte ...
|
| In das Form AutoCAD VBA wechseln |
Formular1.zip |
AutoCAD VBA : Formulardaten an 2tes Modul übergeben
Pantan am 25.03.2013 um 11:57 Uhr (0)
Hallo. Ich beschäftige mich seit ein paar Tagen mit Visual Basic für CAD. Diverse Tutorials und Beispiele habe ich bereits erfolgreich erstellt. Was gut für die Motivation ist. Jetzt versuche mich aber an einem eigenen Script. Das ist deutlich schwieriger, da niemand etwas vorgibt.Was ist meine Absicht?Ich möchte gerne mit dem Script ein Formular aufspringen lassen, welche ein paar Eckdaten (Strings) festlegt die der User eingibt. Diese Strings sollten dann in die passenden Textobjekte übertragen werden, w ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Gruppen bilden und löschen
Stefan1905 am 26.03.2009 um 11:03 Uhr (0)
Hallo Alfred,hier erst mal Programm-TextSub ZeiBalloon(Inhalt As String) Zeichnen des Balloons Dim Epkt As Variant Einfügepunkt Dim LineObj As AcadLine Führungslinie Dim Container As AcadBlock Balloon Dim ContainerRef As AcadBlockReference Referenz zum Balloon Dim Stamp As Date Datums- und Zeitstempel Dim TI As String * 6 Positionsnummer Dim tAtts As Variant Attribute Dim GruNamNew As String neuer Gruppenname Dim NewGroup As Aca ...
|
| In das Form AutoCAD VBA wechseln |
