|
Autocad VBA : Layout wechseln
dan_rather am 08.09.2004 um 09:01 Uhr (0)
Hallo nancy, genau so schauts aus! Hier ein kleiner Ausschnitt aus dem Code: Antwort = (MsgBox( Vorlage wählen , vbOKOnly, Layout wechseln )) If Antwort = vbOK Then msg = vbCrLf & vbCrLf Start with a space For Each Layout In Layouts msg = msg & Layout.Name & vbCrLf Next Set aws = ThisDrawing.SelectionSets.Add( ausw001 ) ThisDrawing.ActiveLayout = Layouts(1) aws.SelectOnScreen For Each ausw In aws If ausw = IAcadBlockReference Then varAttributes = ausw.GetAt ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layout wechseln
dan_rather am 07.09.2004 um 14:37 Uhr (0)
Hallo zusammen, habe folgendes Problem. Ich möchte ein selectionset erstellen. Die auswahl erfolgt über selectOnscreen . Ich möchte aber in diesem moment auch das Layout wechseln(für den rest des Progs wichtig). Wenn ich aber nun das Layout wechseln möchte, ist die Auswahl für das sels. natürlich schon aktiv. Wie lautet der Code für vor dem Auswählen des sels. das Layout wählen das der Benutzer angeklickt hat ? Wenn jemand eine Idee hat bitte Antworten Danke schon mal im vorraus
|
| In das Form Autocad VBA wechseln |
|
Rund um Autocad : Layout
dan_rather am 10.12.2003 um 14:31 Uhr (0)
Hallo Muhamar CAD affi, Du mußt erst dein Lyot mit Seite einrichten erstellen, oder beim Plotten den Hacken bei Änderungen in Layout speichern setzen
|
| In das Form Rund um Autocad wechseln |
|
Autocad VBA : Alle Layouts nach blöcken durchsuchen
dan_rather am 19.05.2004 um 14:08 Uhr (0)
Zitat: Original erstellt von Brischke: Hallo, erstell dir einen Auswahlsatz über alle Elemente der Zeichnung, die ein Block bestimmten Namens sind. Da werden alle Elemente, egal in welchem Layout, gefunden. Falls es für dich wichtig ist, das Layout zu wissen oder die Blöcke nach Layout sortiert auszugeben, dann kannst du das ja dann aus den Elementeigenschaften ermitteln und entsprechend sortieren. Grüße Holger Hallo Holger, das ist genau das Problem. Wie erstelle ich den Auswahlsatz??? mit select ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layout wechseln
dan_rather am 10.09.2004 um 11:22 Uhr (0)
Hallo TP, das mit der unteren linken Ecke ist kein Fehler. Du mußt einfach nur im Papier Layout von unten links nach oben rechts ein Fenster ziehen. Die größe des Fensters ist dann dein Zeichnungsbereich. Du musst unten links anfangen damit die Punkte die berechnet werden um die Linien zu erzeugen auch an der richtigen Stelle sind.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layout wechseln
dan_rather am 10.09.2004 um 10:30 Uhr (0)
Tscha, äh was soll ich sagen, in der dvb Datei waren noch ne ganze menge von Beispielen und Postings aus dem Forum. Habe die Sachen jetzt gelöscht und die reine dvb Datei noch mal angehängt. @TP somit hat sich das mit Modul1 zur gänze erledigt ;-). Das mit Select Case habe ich heute Morgen zum erstenmal gelesen(Visual Basic für Dummies). Zitat: Die KomboBox des Forms füllt sich auchirgendwie nicht. Wozu ist die da? Die Funktion in der diese gefüllt werden soll wird auch nie aufgerufen. Doch sie füllt sich. ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layout wechseln
dan_rather am 10.09.2004 um 12:03 Uhr (0)
hallo TP, habe das ganze mal mit Acad 2002 getestet, ohne erfolg. Nachdem ich die Blöcke(Rahmen,zkopf) in Acad 2000 konvertiert habe ging es jedoch ohne prob.
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Alle Layouts nach blöcken durchsuchen
dan_rather am 19.05.2004 um 13:45 Uhr (0)
Hallo zusammen, kann mir jemand sagen wie ich alle layouts nach einem bestimmten block durchsuchen kann und die Attribute dann in eine excel-Datei schreiben. Hier mein Ansatz: Sub Ch12_Extract() Dim Excel As Excel.Application Dim ExcelSheet As Object Dim ExcelWorkbook As Object Dim RowNum As Integer Dim Header As Boolean Dim elem As AcadEntity Dim Array1 As Variant Dim Count As Integer Dim Pfad As Variant Pfad = R:/AutocadEinstellungen/Zeichnungskopf/ZeichnungsVerwa ...
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layout wechseln
dan_rather am 08.09.2004 um 15:22 Uhr (0)
Danke für die Hilfe, wer möchte kann sich das Makro herunterladen. Mit dem Makro erstellt man einen Zeichnungsrahmen mit freier Größe oder mit DIN Formaten. Zusätzlich kann man sich noc einen Schriftkopf einfügen lassen. Außerdem kann man aus vorhandenen Schriftköpfen die Attribute übernehmen. Ihr müßt natürlich die Verzeichnisspfade an eure Bedürfnisse anpassen. Bis dann und viel Spaß
|
| In das Form Autocad VBA wechseln |
|
Autocad VBA : Layout wechseln
dan_rather am 10.09.2004 um 09:21 Uhr (0)
Hallo Nancy, ich habe absolut kein Problem mit Kritik. Danke dafür!!! zum Code: Es war für mich das erste umfanreichere Makro das ich geschrieben habe und war erstmal glücklich das es bei mir läuft. Mit dem zusammenkopiert hast Du teilweise recht. Ich habe mir halt aus der Acad Hilfe und aus den Anregungen in diesem Forum die Sachen zusammen gesucht und umgestellt die ich brauchte. Da ich ein Newbe in Sachen VBA bin sieht das ganze halt etwas umstänlicher aus als es warscheinlich sein müßte. Mich würde Int ...
|
| In das Form Autocad VBA wechseln |
