|
Rund um Autocad : Layermaske Exportieren
RoSiNiNo am 11.04.2003 um 20:16 Uhr (0)
Hier ein kleines VBA-Tool, hab ich mal schnell geschrieben. Code: Option Explicit Public ExcelVBA As Excel.Application stellt Excel für alle Prozeduren bereit Schreibt Layerliste in Exceldatei Public Sub LayerListeExcel() If ExcelVBA Is Nothing Then Set ExcelVBA = New Excel.Application Dim LayerListe As AcadLayers Dim LayerObj As AcadLayer Dim Elem As Object Dim Fenster As AcadPViewport Dim GibtFenster As Boolean Dim ExcelSheet As Excel.Worksheet Dim ...
| | In das Form Rund um Autocad wechseln |
|
Autocad VBA : Polylinie Abschnittslänge
RoSiNiNo am 02.03.2004 um 08:34 Uhr (0)
Ich hab mir so ein kleines Tool geschrieben, dafür brauchst du aber AcadX.arx oder VLAX.cls und Curve.cls, brauchst einfach nur in diesem Forum und-color: #FFFF99'>suchen. Es wird einiges nicht bei dir funktionieren, ich habe einige Funktionen nicht drangehängt, ebenso die Benutzereingabe die ich von Bernd Cuder übernommen habe. Darum geht es aber in dem Beispiel nicht. Wenn du AcadX.arx verwendest, gilt NEU, verwendest du allerdings die VLAX- und CURVE-Klassenmodule, dann ALT. Code: Public Sub LaengeExtend() ALT Dim ...
| | In das Form Autocad VBA wechseln |
|
Anzeige:
Anzeige: (Infos zum Werbeplatz)
 |