|
AutoCAD VBA : Mittels VBA den Layoutnamen ändern ?
alfred neswadba am 12.03.2010 um 15:49 Uhr (0)
Hi,vermeide GoTo-Anweisungen, wenn Du Dich später mal mit anderen Programmiersprachen auseinandersetzten willst. Und dann gäbe es noch das On Error ...., das ich wie folgt verwendet hätte:Code:Private Sub cmdOK_Click() Dim Layout As AcadLayout Set Layout = ThisDrawing.ActiveLayout If TextBox9.Text = "Model" Then MsgBox "Sie befinden sich im Modellbereich", vbInformation, "Zur Info" ThisDrawing.SelectionSets.Item("DB15").Delete Else dann koennen wir weiter fortsetzen If TextBox9.Text = "" Then ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Mittels VBA den Layoutnamen ändern ?
alfred neswadba am 12.03.2010 um 16:36 Uhr (0)
Hi, Gibt es dazu schon Infos und Anleitungen auf deutsch?Nichts von Autodesk, einige (wenige) Hinweise zu (deutschen) Büchern für dotNET mit AutoCAD hätte es in dem Forum AutoCAD-ObjectARX schon gegeben, bisschen suchen. - alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Aktuelles Projekt per VBA auslesen
alfred neswadba am 12.03.2010 um 17:06 Uhr (0)
Hi,nicht falsch verstehen, ACA ist nicht etwas vollständig anderes als AutoCAD aus der Sicht für VBA.Nur wenn Du explizit ACA-Objekte/-Eigenschaften ansprechen willst, dann ist zumindest die Systeminfo schon wichtig, sonst kommen Leute wie ich (aus dem AutoCAD, aber eben nicht aus dem ACA-Umfeld) und fragen dann was ist .... Solange Du mit VBA Linien, Polylinien, andere AutoCAD-Objekte bearbeiten willst, ist es für AutoCAD und ACA ablosut ident. Als solches ist es natürlich auch nicht ganz eindeutig, in w ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Mittels VBA den Layoutnamen ändern ?
Carsten1210 am 12.03.2010 um 18:18 Uhr (0)
Hi Dirk,Ich würde mich an deiner Stelle erst einmal grundsätzlich mit VB.Net auseinander setzten bevor man sich gleich daran macht etwas mit AutoCAD und VB.Net zu machen.Es gibt doch einige Unterschiede zwischen VBA und VB.Net.Du kannst dir ja das Galileo Openbook Visualbasic 2008 anschauen. Da hast du Online ein komplettes Buch kostenlos zu VB.Net zur Verfügung.Gruß, Carsten
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Koord auslesen und sortieren
alfred neswadba am 14.03.2010 um 18:08 Uhr (0)
Hi,Diese Zeile:Open "D:E.txt" For Input As #100 öffnet eine Datei im sequentiellen Lesemodus, damit kann diese nur von vorne lesen, sprich von 1 beginnen. Mit dieser Öffnungsmethode würde das bedeuten: Vorne anfangen, so lange lesen bis die gewünschte Zeilennummer erzielt ist.Schau Dir daher in der VB/VBA-Hilfe mal die anderen Parameter (und Lesemethoden) von OPEN an, damit Du diese nicht sequentiell liest.- alfred -PS: Du siehst immer #100 als Dateizugriffsnummer an, die könnte aber schon reserviert sein. ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Koord auslesen und sortieren
Knerstin am 05.03.2010 um 18:00 Uhr (0)
Hi, ich habe die gleiche Aufgabe, hänge aber zurzeit an einem anderen Problem.und zwar habe ich die txt datei und muss ja diese x und y-werte einlesen,wenn ich schreibeInput #100, x, yliest er jedoch nur die 1. zeile aus *ist ja auch logischwie kann ich ihm sagen dass er die nächste zeile auch auslesen soll?bei der bubblesort funktion, will er ja den ersten wert mit dem zweiten wert vergleichen, jedoch hapert es daran dass er den zweiten wert nicht liest,hat jemand eine idee wie ich das tun kann?Dachte sch ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Koord auslesen und sortieren
Knerstin am 05.03.2010 um 18:24 Uhr (0)
hey....ich kann dich ja verstehen und ehrlich gesagt will ich es auch verstehen und googlen tu ich schon seid 3 tagen....habe jede menge sachen gelesen und ausprobiert und komme dennoch nich weiter.mein "derzeitiges" problem-da hast du recht- hat nicht wirklich etwas mit autocad zu tun....dennoch läuft das VBA unter Autocad.vielleicht hast du ja dennoch ein tipp für mich, wie ich die x werte (welche zur zwischenspeicherung in einer textdatei untereinander stehen) nach und nach einlesen und dann vergleichen ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Koord auslesen und sortieren
alfred neswadba am 05.03.2010 um 18:44 Uhr (0)
Hi,bin gespannt, was jetzt passiert Code:Public Sub myImport() Dim tFNr As Integer tFNr = FreeFile Dim X As Double Dim Y As Double Dim Z As Double Dim tArr() As Variant Dim tArrIndex As Integer Open "C:TEMPXYZ.TXT" For Input As #tFNr Datei zum Einlesen öffnen. Do While Not EOF(tFNr) Auf Dateiende abfragen. Input #tFNr, X, Y, Z Dim tPnt(2) As Double tPnt(0) = X tPnt(1) = Y tPnt(2) = Z ReDim Preserve tArr(tArrIndex) tArr(tArrIndex) = tPnt tArrIndex = tArrIndex + 1 ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : UCS ändern
alfred neswadba am 14.03.2010 um 22:51 Uhr (0)
Hi,aus der AutoCAD-VBA-Hilfe:Code: Create a UCS named "New_UCS" in current drawing Dim ucsObj As AcadUCS Dim origin(0 To 2) As Double Dim xAxisPnt(0 To 2) As Double Dim yAxisPnt(0 To 2) As Double Define the UCS origin(0) = 4#: origin(1) = 5#: origin(2) = 3# xAxisPnt(0) = 5#: xAxisPnt(1) = 5#: xAxisPnt(2) = 3# yAxisPnt(0) = 4#: yAxisPnt(1) = 6#: yAxisPnt(2) = 3# Add the UCS to the UserCoordinatesSystems collection Set ucsObj = ThisDrawing.UserCoordinateSystems.Add(origin, xAxisPnt, yAxisPnt, ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Programmaufruf mit Rechter Maustaste wiederholen
Gigerota am 15.03.2010 um 15:37 Uhr (0)
Aha! Das hört sich doch ganz gut an!Hier ist der Programmaufruf:Kann man eventuell dort bereits was mitgeben??^C^C^P(setq datei (strcat ( getenv "SSIMACAD") "Palreg_PR600_Rahmen.dvb!PR600Rahmen.PR600_Rahmen"))(command "-vbarun" datei)ansonsten Danke vielmals, ich gebe euren Tip an den Programmierer weiter!
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Neue Zeichnung mit VBA-Code
GüSo am 16.03.2010 um 13:51 Uhr (0)
Hallo allerseits!Ich bin bei meinen Arbeiten an einen Punkt gekommen, an dem ich es sinnvoll fände, wenn ich per VBA-Code ein neues Blatt anlegen könnte und diesem unter "ThisDrawing" maschinell Standardfunktionen mitgeben könnte. ... set Zeichnung = Documents.Add .... .... Dieser Zeichnung ein oder mehrere VBA-Funktionen mit geben, die beispielsweise aus einer *.bas - Datei eingelesen werden und dann unter ThisDrawing im VBA-Editor auftauchen. Die neue Zeichnung soll also Standardfunktionen auf bestimmte ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Objekte beschriften
9TomCat am 17.03.2010 um 15:59 Uhr (0)
Hallo Alfred,vielen Dank, dass mit der Umwandlung in Regionen hatte ich mir auch schon gedacht, na ja, bin noch nicht so ganz firm mit den AutoCad-VBA-Objekten, also mal sehen. Ich hätte gedacht, da gibt’s was für den Schwerpunkt.Viele Grüße 9TomCat
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Objekte beschriften
9TomCat am 17.03.2010 um 11:52 Uhr (0)
Hallo liebe Community,ich habe mir ein Programm gebastelt, welches von gewählten Objekten (z.B. geschlossenen Polylinien) die Flächen ermittelt und in eine Datei ausgibt. Soweit so gut, nun würde ich gern noch ein Routine implementieren, welche die Ermittelte Fläche jeweils in das Objekt schreibt. Ich hab eaber keine Eigenschaft, wie z.B. den Schwerpunkt einer Fläche, welche ich dafür verwenden kann. Oder gibt es da was? Bin für alle Hinweise dankbar.Schönen Tag9TomCat
|
| In das Form AutoCAD VBA wechseln |
