Informationen zum Forum Inventor VBA:
Anzahl aktive Mitglieder: 734
Anzahl Beiträge: 9.223
Anzahl Themen: 1.923

Im Beitrag/Titel Nur im Titel Nur nach Datum sortieren Docs / Anhänge mit Lösung
Suchmaschinenstatistik
Livesuche
Einstellungen
Info

Auch mit chatGPT* können Lösungen aus dem CAD.de-Forum recherchiert werden:

* chatGPT ist eine eingetragene Marke von openAI

Ergebnisse 1 - 2, 2 Gesamtergebnisse mit Suchbegriffen schreibschutz aufheben bei autocad-datei sec.
Inventor VBA : DXF Export auf Desktop
EKW am 21.08.2013 um 08:46 Uhr (1)
Zitat:Original erstellt von Bluejay:Public Sub CreateDXF()    On Error Resume Next    If ThisApplication.ActiveDocument.DocumentType kDrawingDocumentObject Then        Exit Sub    End If      Dim oDoc As Inventor.DrawingDocument    Set oDoc = ThisApplication.ActiveDocument    If oDoc.FullFileName = "" Then        MsgBox "Bitte zuerst die Zeichnung speichern...  "        Exit Sub    End If    oDoc.SaveAs Replace(oDoc.FullFileName, Right(oDoc.FullFileName, 3), "dxf"), True      If Err.Number = 0 Then        ...

In das Form Inventor VBA wechseln
Inventor VBA : Makro oder ILogic: Ein-/Ausblenden Tangentialer Kanten
EKW am 12.07.2018 um 09:50 Uhr (5)
Hallo,ich hatte mir damals schon eine iLogic Regel per Makro (Button) ausführen lassen, dass in allen Ansichten auf dem Blatt der gleiche Maßstab verwendet wird. Das ist wichtig für unsere 1:1 Ableitung ins AutoCAD===Blattstab = InputBox("Der eingegebene Maßstab wird auf alle Ansichten, innerhalb des aktuellen Zeichnungsblatt, angewandt.", "Einheitlicher Zeichnungsblattmaßstab", "1 : X")On Error Resume NextDim oDrawDoc As DrawingDocumentoDrawDoc = ThisApplication.ActiveDocumentDim oView As DrawingViewFor E ...

In das Form Inventor VBA wechseln

Anzeige:

Anzeige: (Infos zum Werbeplatz)


Alle Produkt-, Schrift-, Firmennamen und Logos sind Warenzeichen oder eingetr. Warenzeichen der jeweiligen Firmen.
©2026 CAD.de , Lenggries. Tel: ++49 (8042) 973 8208 | Datenschutz