|
Autocad VBA : Rechteck schraffieren
startrek am 21.10.2004 um 13:05 Uhr (0)
huch, ähm Axel meinst Du wegen des dim bla(1 to 5) as sonstwas? Das war nur so dahergeschrieben hätt auch bla(1 to 17) lauten können, mir gings mehr um das ( 1 to n), damit muss ich ja nicht extra Base auf 1 setzen, wenn das 0 te Element nicht erwünscht sein sollte. ;-) lg Nancy
| | In das Form Autocad VBA wechseln |
|
Autocad VBA : Rechteck schraffieren
startrek am 18.10.2004 um 21:39 Uhr (0)
Nunja, geb ich mal auch noch meinen Senf dazu ;-) Ist nich viel, jedenfalls nur soviel: hab ja auch unter Excel begonnen und bin auch nicht grad der ACAD-Hirsch, so einiges habe ich mir unter xl auch selbst angeeignet, aber IMHO so ganz ohne Foren & Bücher - eher nicht ... ehrlichgesagt - auch schwer vorstellbar. Zurück zum Thema, auch ich hatte anfangs Probleme mit meinen Excel-Kenntnissen & Arrays, da diese wohl eher nur zB. mit Sheets oder Shapes vom Recorder aufgezeichnet werden. Bei reinen Range Ob ...
| | In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Inhalte eines ListViews an AutoCAD - Tabelle übergeben
startrek am 20.11.2011 um 17:57 Uhr (0)
Hi Dirk,wenn ich das richtig sehe im Objektkatalog F2 hat AcadTable gar keine GetColumnname-Methode, sondern nur IAcadTable2 aber selbst da werd ich auch nicht recht schlau draus;-)Ich würde es so in der Art angehen (in einer neuen, leeren Zeichnung):Code:Sub table_add() Dim table As AcadTable, pt(2) As Double, i%, s Set table = ThisDrawing.ModelSpace.AddTable(pt, 4, 7, 10, 20) For i = 0 To table.Columns - 1 table.SetText 1, i, CStr(i) Next ZoomExtentsEnd SubSub vgl() Dim table As AcadTable, arr, i ...
| | In das Form AutoCAD VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |
