|
AutoCAD VBA : Zeichnung/drawing kopieren/duplizieren
Brischke am 11.11.2013 um 20:06 Uhr (1)
... oder du erstellst das Zeug auf verschiedenen Layern und frierst und taust die wie du die brauchst.Oder du erstellst die Objekte mit entsprechendem Versatz im Modelbereich und änderst den Viewport im Layout-Ansichtsfenster.Oder du schaltest die Objekte einfach unsichtbar (Eigenschaft Visible)oder, oder, oderGrüsse!Holger------------------Holger BrischkeCAD on demand GmbHIndividuelle Lösungen von Heute auf Morgen.defun-tools Das Download-Portal für AutoCAD-Zusatzprogramme!
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Attribute auslesen von aktuellem Blatt
f-m am 01.03.2010 um 15:02 Uhr (0)
Hallo,danke zunächst für die schnelle Antwort!Richtig, meine ein AutoCad-Layout-Blatt ;-)Tool sieht aktuell folgender Maßen aus:Private Sub CommandButton1_Click() Dim blockname As String Dim a, blocktotal As Integer UserForm2.Hide ListBox1.Clear blocktotal = ThisDrawing.Blocks.count For a = 0 To blocktotal - 1 blockname = ThisDrawing.Blocks.Item(a).name If Not Mid$(blockname, 1, 1) = "*" Then ListBox1.AddItem blockname Next a
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Massstab von Layout -Ansichtsfenster
startrek am 28.08.2005 um 16:32 Uhr (0)
Hi,tippe mal im DF:Code:?thisdrawing.ActiveLayout.Block.Item(1).customscale 10,0000000602102Das ist erstmal das was du suchst.Du musst natürlich sicherstellen, ob Typeof Item(i) IAcadPViewport2 ist, also IMHO via Schleifchen.Aber am besten Du machst einfach mal sowas:Code:sub x() dim l as acadlayout set l=thisdrawing.activelayout stopend subUnd nun im Lokalfenster dein Object l samst Unterobjekten mal unter die Lupe nehmen,da steht [fast] alles drinnen, was man so braucht ;-)Gruss Nancy
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Rahmen zeichnen mit VBA
KlaK am 21.04.2008 um 12:04 Uhr (0)
Hallo Markus,ich denke als Informatiker bist Du mit den Grundsätzen der Programmierung vertraut und hast nur mit dem Objektmodell von AutoCAD Probleme.Der Begriff "Rahmen" ist sehr vieldeutig. Also schreib doch mal genau, was Du machen möchtest. Nur ein Rechteck zeichnen (Modell- oder Layoutbereich?) oder möchtest Du vielleicht ein Ansichtsfenster im Layout generieren?Was meinst Du den mit Pointern (das Coordinatesfeld ??).Für konkrete Hilfe könntest Du auch Deinen Code hochladen.Gutes Gelingen,Klaus
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : Änderungen eines Fließschema erfassen, wie?
Carsten1210 am 08.12.2006 um 21:54 Uhr (0)
Hallo Jörn,Warum fügsts du nicht einfach die Protokollierung als Text in die Zeichnung ein. Den Text einfach auf einem ausgeschalteten, nicht druckbaren Layer erstellen bzw. auf ein separates "Protokoll"-Layout packen.Für Xdatas kommt da, denke ich zuviel an Daten zusammen. Sonst kannst du ja deine Text-Datei erstellen und erweitern und einen Hyperlink in die Zeichnung einbauen, der auf die Textdatei verweist.Gruß, Carsten.
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : auflistung blockreferenzen auf layouts
ritchie1 am 18.07.2018 um 19:46 Uhr (7)
hallo holger,hab ich doch geschrieben, dass ich die blockreferenzen abfrage :-). hab es nur umgekehrt gemacht. durchsuche die einzelnen layouts auf blockreferenzen.ein zugriff auf alle blockreferenzen habe ich nicht geschafft, da ich vorher immer zuerst modelspace oder paperspace angeben muss und der paperspace bezieht sich immer nur auf das aktuelle layout. zugriff auf alle blockreferenzen (unabhängig wo sie liegen) wäre natürlich schicker ...
|
| In das Form AutoCAD VBA wechseln |
|
Autocad VBA : vorhandene Bemassungen ändern
Brischke am 02.12.2004 um 14:31 Uhr (0)
vielleicht liegt es ja daran, dass es im R14 noch gar kein Layout gibt? (oder gab es das dort auch schon?) Ansonsten nehme ich an, dass die im R14 vorhandene ActiveX-Schnittstelle diese Eigenschaften und Methoden noch nicht unterstützt. Grüße Holger ------------------ Holger Brischke (defun - Lisp over night! Autodesk User Group Central Europe AutoLISP-Programmierung für AutoCAD AUGCE Manager Deutschland Da weiß man, wann man s hat! ...
|
| In das Form Autocad VBA wechseln |
|
AutoCAD VBA : Attribute auslesen von aktuellem Blatt
alfred neswadba am 02.03.2010 um 17:04 Uhr (0)
Hi, Irgendwie klappt das alles nicht!Daraus kann ich wiederum nichts ableiten, was klappt nicht, wie äußert sich das?Lad mal eine kleine Zeichnung hoch und mach einen Screenshot von Deinem Form, damit ich sehe, was Du alles als Endergebnis eigentlich wünscht. Oder beschreib vielleicht, was Du aus dem Layout alles (was bisher läuft und läuft und läuft ) an Daten herausholst.- alfred -------------------www.hollaus.at
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Plot auf Layout anwenden
Carsten1210 am 16.10.2008 um 16:05 Uhr (0)
Hi Chris,Hier mal ein paar Sachen als Beispiel:Code:Dim p1(0 To 1) As DoubleDim p2(0 To 1) As Doublep1(0) = 0p1(1) = 0p2(0) = 210p2(1) = 297ThisDrawing.ActiveLayout.CanonicalMediaName = "A4"ThisDrawing.ActiveLayout.StyleSheet = "monochrome.ctb"ThisDrawing.ActiveLayout.StandardScale = ac1_1ThisDrawing.ActiveLayout.PlotType = acWindowThisDrawing.ActiveLayout.CenterPlot = TrueThisDrawing.ActiveLayout.SetWindowToPlot p1, p2ThisDrawing.ActiveLayout.PlotRotation = 0Ist zwar dann keine Benannte Seiteneinrichtung, ...
|
| In das Form AutoCAD VBA wechseln |
 |
AutoCAD VBA : Automatische Legende erstellen über Layernamen
sezginworld89 am 18.11.2021 um 11:28 Uhr (15)
Hallo CAD freunde,Ich habe eine frage an die programmierer unter uns.Ich möchte nach einer Programmierung fragen der aus Layernamen in einer Zeichnung eine Legende erstellt, aber für jedes Layer gibt es auch ein vordefiniertes Block. Bsp.Für Layername: Schraffur_Spielplatz soll der Block 1-1-Schraffur_Spielplatz.dwg in eine vordefiniertem Platz eingefügt werden (vordefiniertes LayouT wär ein Träumchen). Für jegliche Hilfe wäre ich dankbar
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Schriftkopf mit Überlänge
Carsten1210 am 16.04.2008 um 11:37 Uhr (0)
Hi Markus,Da ich davon ausgehe, das die Rahmengröße nicht vorhersehbar ist, musst du einen Block erstellen, in dem du die Maße über eine Abfrage (Formular) ermittelst.Danach kannst du mit Blockadd einen Block erstellen. In diesem Block kannst du dann die Attribute, Linien usw. einbauen. Danach fügst du einfach den Block im Layout, bzw. im Modellbereich ein und füllst die Attribute.Was anderes dürfte das Lisp ja auch nicht machen, oder?!Gruß, Carsten
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Automatische Legende erstellen über Layernamen
sezginworld89 am 22.11.2021 um 12:32 Uhr (1)
Hi, danke fürs antworten.Unsere Layer fangen alle mit MT an dann ändern sich halt die Zahlen und dahinter die Beziechnung des Layers.Die Blöcke liegen alle auf einen Pfadordner. Ich habe auch alle mit dem selben Namen versehen wie die Layer, weil ich das schon damals mir gedacht habe das es so klappen würde .Die sollten dann in einem A4 Layout Blatt mit Plankopf gelistet werden (LegendeBlöcke sind alle gleich breit und lang)
|
| In das Form AutoCAD VBA wechseln |
|
AutoCAD VBA : Nach Text suchen und diesen löschen
KlaK am 23.10.2008 um 23:19 Uhr (0)
Hallo Gerhard,leider schreibst Du nicht wie Du alle Texte schon gefunden hast.Vermutlich über SelektionSet mit Mode Selectall.Wenn Du im aktuellen Layout diesen Text suchen möchtest, würde ich den Selektionset mit Mode = acSelectionSetWindow und einem Fenster mit Hilfe der Systemvariablen ExtMin und ExtMax machen.Damit bekommst Du nur die Angezeigten Texte.Alternativ:Durchsuchen von ThisDrawing.ActiveLayout.Block.item( 0 - (~.count -1))Grüße,Klaus
|
| In das Form AutoCAD VBA wechseln |
