|
AutoCAD VBA : Attribute auslesen von aktuellem Blatt
f-m am 11.03.2010 um 11:35 Uhr (0)
Code:tDxfCodes(2) = 410: tDxfValues(2) = "Layout 1"das Leerzeichen? oder auf welchen Fehler spielst du an?
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Bereich im Modell auswählen und im Papierbereich einfügen
AandreasH am 17.01.2008 um 10:18 Uhr (0)
Hallo,so das Teil läuft jetzt.- Plotter auf system ermitteln- verfügbare Blattgrössen auslesen- Layout erstellen und Ansichtsfenstergrösse mit Massstab als Block für Auswahl im Modellbereich erzeugen- temp. Block (hängt am cursor) mit einem Lispcode einfügen und den Event bei endLisp abfangen- Event abhandeln, Layout fertigstellen und auf den gewählten Bereich zoomen.Was ich noch nicht ganz durchschaut habe ist die Eventbehandlung.Ich habe das in ThisDrawing geschrieben, ist das schlecht ?Wie sieht das aus ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : alle Layer in Ansichtsfenster tauen
_stphn_ am 19.10.2006 um 15:11 Uhr (0)
bei mir läuft es ohne Probleme:Nochmal zum Verständnis - es geht darum, im Modellbereich eines Layout einzelne Layer zu frieren/tauen (also "im Anichtsfenster").Du muss also ins Anischtsfenster wechslen und dort das Makro "selectVPobjectsToFreeze()" starten, anschließend Objekte auf den zu frierenden Layern auswählen und schwupps sind sie weg.Bist du wirklich im Ansichtsfenster, wenn du das Makro startest? Gibt es irgendwelche Fehlermeldungen? Setz doch zur Not mal einen Breakpoint und geht das Makro zeile ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Polyline breite änderung
KlaK am 18.12.2007 um 12:12 Uhr (0)
SelectionSet mode=selectall mit Filterkriterium Polygondiesen durchlaufen lassen und Eigenschaft wie oben ändern.Code:Aufruf über: (command "vbarun" "main")Sub main()Dim SS1 As AcadSelectionSetDim ent As VariantDim plineObj As AcadLWPolylineDim gpCode() As IntegerDim dataValue() As VariantReDim gpCode(2) As IntegerReDim dataValue(2) As Variant gpCode(0) = 67 Filter ob Modell oder Layout dataValue(0) = 0 Modell (0) / Layout (1) gpCode(1) = 0 Filter nach Element dataValue(1) = "LWPOLYLINE" Objekt ...
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Benannte Text-Variablen im Layout ?
wwwilli am 10.12.2007 um 11:43 Uhr (0)
OK, ich habe es wohl, mit.HasAttributes und .GetAttributes ...Danke und MfG,wwwilli
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : alle Layout löschen in Zeichnung
KlaK am 15.03.2013 um 14:55 Uhr (0)
oder gleich mit:Code:..For each entity in ThisDrawing.Layouts ..da spart man sich solch lästige Fehler ...GrüßeKlaus
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Layout Block Attribute eingepasst -> Plot?
CADMA am 29.02.2008 um 08:42 Uhr (0)
Sorry, ein Versehen, dass es in der Rubrik VBA gelandet ist.Gruß CADMA
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Benannte Text-Variablen im Layout ?
wwwilli am 11.12.2007 um 13:10 Uhr (0)
Naja, es geht.Hatte wohl ein kleines SET vergessen oder so... MfG,wwwilli
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Text (Beschriftung) in Layout ausrichten
otm am 29.10.2009 um 22:58 Uhr (0)
Hi alfred,hab zu Hause kein Civil.Kann ich also erst wieder morgen probieren Werd ich tun. Eine gute Nacht Dir.------------------Christian
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Layout kopieren
CADmium am 11.02.2011 um 09:34 Uhr (0)
naja .. googeln ist auch Eigeninitiative ------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Elemente in Viewport auslesen
Carsten1210 am 22.05.2007 um 20:28 Uhr (0)
Hallo,Nur mal als Hinweis, was es irgendwann mal von Autodesk geben wird: AutoCAD Export Layout to Model Space Tool.Gruß, Carsten
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Layout löschen
mapcar am 16.07.2004 um 08:41 Uhr (0)
Zitat: Original erstellt von rkl3011: In meinem Fall müssen alle Entities des Blocks durchlaufen werden, da ich wissen möchte, wie viele Ansichtsfenster in dem Layout vorhanden sind, denn nur die, die keine Ansichtsfenster haben (also leere Layouts) müssen gelöscht werden. Öh, Ronny, du hast offensichtlich nicht verstanden, was ich meinte. Es ist doch egal, wie viele Ansichtsfenster drin sind. Wenn du 1 gefunden hast, kannst du schon abbrechen, oder? Um zu prüfen, dass in einem See Wasser drin ist, ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Alle Zeichenobjekte einer Zeichnung in eine andere Kopieren
Theo37 am 23.10.2008 um 16:19 Uhr (0)
Hallo,das mit "copyobjects" funktioniert recht gut. Wenn auch etwas langsam bei großen Dateien. Ich habe dazu folgende Prozedur geschrieben:Public Sub copyalle()Dim Enti As AcadEntityDim Alle() As ObjectDim i As IntegerDim olddwg As AcadDocumentDim newdwg As AcadDocumentDim newobj As Variant i = 0 Set olddwg = ThisDrawing ReDim Alle(olddwg.ModelSpace.layout.block.Count - 1) Set newdwg = ThisDrawing.Application.Documents(1) For Each Enti In olddwg.ModelSpace.layout.block Set Alle(i) = Enti i = ...
|
| In das Form AutoCAD VBA wechseln |
