|
Autocad VBA : setXData
mapcar am 28.07.2005 um 21:24 Uhr (0)
Ja, Nancy, mit einem italienischen Ausgang in Form von "" wären die Daten wieder rechteckig. Auch "" ist eine Übersetzung von "Ausgang", allerdings eine ziemlich schlechte;-) Aber das Leben ist nun mal nicht rechteckig, oder jedenfalls in den seltensten Fällen! In der Praxis sieht es jedenfalls so aus, dass an einem Entity nachher 100 verschiedene Datensätze dranhängen, am nächsten nur drei. Interessant wird die Geschichte allerdings erst wirklich, wenn die ganzen 1000er Gruppencodes ins Spiel kommen: 1007 ...
|
| 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 : Rotated Dimension via Lisp auslesen
rexxitall am 26.01.2016 um 10:20 Uhr (1)
Hi, ich bin kein Lispler, Ich hab auch noch coe rumfliegen der Lisp direkt aufruft, muss nicht über die Uservars sein Mir gehen die Maßketten von Acad seit ewig auf den Zünder, das was die haben ist Steinzeit, das konnte Zeicon vor 30 Jahren schon besser. Ich will Masskettenzüge als ganzes anordnen, erzeugen, verschieben, Maßketten zusammenfassen, aufsplitten...Sprich mir endlich mal die Bemaßungsfunktionen bauen die ICH haben will seit 10 Jahren Geht alles na klar auch so ... Mit endlosem Zeitaufwand.Der ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Viewermodus bei Klick Dialogfeld
alfred neswadba am 04.06.2010 um 14:33 Uhr (0)
Hi, Weiterentwicklungsmöglichkeit von Autocad?!JA, kannst es ja machen. AutoCAD ist so stark vertreten, weil es programmierbar ist und nicht, weil es so gut ist. Besonders nützlich wäre sowas für FM Tätigkeiten innerhalb von ACAD.Natürlich, es gibt viele Bereiche, wo dies anwendbar wäre, aber schau mal, wie AutoCAD mit Schraffurgrenzen finden umgeht, dann erkennt man vielleicht auch, dass das Suchen der Grenzen ohne Beschränkungen gar nicht so easy ist.Im 3D-Bereich hast Du eine ähnliche Form der Objekt- ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : fso.filecopy funktioniert nicht
Karsten HST am 18.10.2004 um 10:47 Uhr (0)
Anscheinend existiert der Auswahlsatz XX bereits und kann somit nicht mehr hinzugefügt werden. In diesem Fall muss dann die Item-Funktion verwendet werden. Set ssetObj = ThisDrawing.SelectionSets.Item( XX ) Kommentierst Du die erste Zeile zur Zuweisung eines Auswahlsatzobjektes aus, kannst Du auch keine Anweisungen darauf ausführen, da die Objektvariable ssetObj keinen Verweis gespeichert hat. Zur Initialisierung könntest Du folgende 2 Zeilen nacheinander ausführen ThisDrawing.SelectionSets.Add XX Set ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Auswahlsatz mit Filtern wird nicht korrekt erzeugt
TomiProg am 24.02.2005 um 14:12 Uhr (0)
Hallo hendersson. Probiere mal folgende geänderte Zeilen: ----------------------------------------------- Dim acsAuswahlsatz As AcadSelectionSet Auswahlsatz für die Darstellung Dim intAuswahl As Long Laufindex der Objekte im Auswahlsatz Löscht eventuell vorhandene Auswahlsätze If ThisDrawing.SelectionSets.count 0 Then For intAuswahl = 0 To ThisDrawing.SelectionSets.count - 1 ThisDrawing.SelectionSets.Item(intAuswahl).Delete Next intAu ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Problem mit Aufruf von Sub
vittorio0 am 29.01.2012 um 21:23 Uhr (0)
Liebes Forumbei dem folgenden code läuft alles gut bis zum Aufruf von UpdateAttrib. Fehlermeldung: Fehler beim kompilieren, Sub oder Function nicht definiert. tAtts ist markiert. Es scheint das die Sub einmal aufgerufen wird.Was mach ich da für ein Überlegungsfehler? Danke für Eure Hilfe.Code:Public Sub writeSF() Editierte Attribute zurück in Block schreibenDim SF As StringOn Error GoTo err_controlDim EntGrp(1) As IntegerDim EntPrp(1) As VariantEntGrp(0) = 0EntPrp(0) = "INSERT"EntGrp(1) = 2EntPrp(1) = "Kop ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Programmoptimierung
Dirk.B am 03.02.2006 um 07:12 Uhr (0)
Hallo und guten Morgen Zusammen!Einen kleinen Nachschlag an Hilfe benötige ich noch.Ich möchte in dem Programm ja zur Laufzeit einen neuen Layer "Spanplattenschraube" erzeugen und den Linientyp "Verdeckt" aus der ACAD.LIN laden, da ich nicht davon ausgehen kann, daß diese in der jeweiligen Zeichnung bereits enthalten sind.Dieses funktioniert auch soweit, nur wenn ich den Layer wechsel bzw. den Linientyp, bricht das Programm ab, siehe Bildchen Fehler.Auszug aus der UserForm:Code:Private Sub UserForm_Initial ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Textobjekt --> Inhalt ausgeben
runkelruebe am 16.03.2012 um 08:57 Uhr (0)
Moin,interessanterweise läuft bei mir ja der ein verkürzte Code in einer Zeichnung mit lediglich 3 Linien, 2 MTexten und 3 Texten durch, der Text mit dem Inhalt Boltenhagen wird gefunden und die Debug.Print-Zeile geschrieben. Code:Sub vba()Dim Txt As AcadTextDim obj As AcadEntityDim i As IntegerDim TKoord() As DoubleDim Dateiname$, Ort As StringDim mittel_T As Double, mittel_S As DoubleOrt = "Boltenhagen" ZUSATZZEILE, da die txt nicht vorliegtDateiname = "Ergebnisse_fuerGrafik.txt"Open Dateiname For Input ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : InsertBlock langsam - Alternativen ?
KlaK am 20.11.2008 um 16:11 Uhr (0)
Hallo Alfred,Danke für die Antwort, Du warst ja schnell ..Codeschnipsel:Code:Sub TextAuftrag() Dim TextObj As AcadText Dim blockRefObj As AcadBlockReference Dim textString As String Dim insertionPoint(0 To 2) As Double Dim height As Double Form1.lblAblauf.Caption = " Zeichnen Texte / Symbole" Form1.lblAblauf.Visible = True Form1.ProgBar.Min = 0 Form1.ProgBar.Value = 0 Form1.ProgBar.Max = TGesamt Form1.ProgBar.Visible = TrueFor i = 1 To TGesamt i Global als Currency Form1.ProgBar.Value = i Define th ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Koordinaten in dyn. Feld
alfred neswadba am 12.12.2010 um 19:54 Uhr (0)
Hi, Ich kann deine Zeichnung leider nicht öffnen, da schreibgeschützt?!In AutoCAD kann man auch schreibgeschützt öffnen, das sollte also nicht das Problem sein. Kann es sein, dass Du eine alte AutoCAD-Version zur Hand hast und DWG-2007 noch nicht öffnen kannst? Für diese Fälle gibt es auch SystemInfo ausfüllen Zu Deinen PNG-File == wo kommen hier dynamische Felder zum Tragen?Wie Du auf Koordinatenpunkte hinkommst, findest Du bereits in der VBA-Hife, Auszug/gekürzt daraus:object.Coordinates 3DFace, 3DPolyl ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Auslesen von Blockeigenschaften mittels VBA möglich?
kiltswitch am 03.11.2004 um 09:31 Uhr (0)
Das Programm soll eigentlich nur firmenintern eingesetzt werden, aber mein Vorgesetzter hat auch erwähnt, dass man vielleicht später auch mal an einen Mobilfunkanbieter herantreten könnte - also eine spätere Vermarktung ist nicht ausgeschlossen. Nur z.Zt. ist es erstmal firmenintern geplant. Meine Aufgabe besteht im Grunde genommen darin, erstmal das Konzept aufzustellen, wie alles ablaufen soll. Vielleicht noch als i-Punkt ein kleines Programm zu entwickeln, um es mal präsentieren zu können. Doch um das ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Farbe ändern in einer Blockreferenz
Frank136 am 24.04.2009 um 17:19 Uhr (0)
Hallo Klaus,wow, das sind ja gleich 6 Wünsche auf einmal! Dann werd ich mal...Ich hab mir bis jetzt eine Blockdefinitionen erstellt und in die hab ich nur ein farbiges Rechteck(Polylinie) eingefügt. Ein Attribut hängt auch noch an der Blockdefinition.Jetzt möchte ich mehrere Blockreferenzen in die Zeichnung einfügen, wobei die Rechtecke in den Referenzen unterschiedliche Farben haben sollen. Und als Krönung möchte ich bei jeder Referenz noch das Attribut ändern, was aber schon funktioniert. kleiner Ausschn ...
|
| In das Form AutoCAD VBA wechseln |
