Informationen zum Forum Inventor VBA:
Anzahl aktive Mitglieder: 735
Anzahl Beiträge: 9.230
Anzahl Themen: 1.924

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 creoson zeichnung sec.
Inventor VBA : vba skizzierte symbole nach namen
dero2k am 29.04.2013 um 11:17 Uhr (0)
hidanke für die antwort habe es aber in diesem moment so gelöst bekommen.Code: Dim myidw As DrawingDocument Set myidw = ThisApplication.ActiveDocument Dim oSS As SketchedSymbol For Each oSS In myidw.ActiveSheet.SketchedSymbols If oSS.Definition.Name = "Zusatzschriftfeld 2" Then Set otext = oSS.Definition.Sketch.TextBoxes.Item(4)Call oSS.SetPromptResultText(otext, sMassstab1) End If NextEnd Subjetzt wäre noch die frage wie ich das macro über alle blätter einer zeichnung aufeinmal laufen lasse ...
In das Form Inventor VBA wechseln
Inventor VBA : Macro auf allen blättern einer IDW ausführen
dero2k am 29.04.2013 um 12:30 Uhr (0)
Hihabe mir gerade ein Macro geschrieben was automatisch den maßstab einer zeichnung ausfüllt funktioniert soweit auch perfekt.nun würde ich aber gerne das macro gleich über alle blätter der IDW laufen lassen, zurzeit wird der maßstab nur bei dem aktiven blatt ausgefüllt.hier mal der codeCode:Function SetPromptValue(ByVal fBlock As TitleBlock, _ByVal fPrompt As String, _ByVal fValue As String)Changes the value of prompted entry in the title blockOn Error Resume NextDim oTextbox As Inventor.TextBoxDim oTextB ...
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