---

Hallo zusammen

Gibt es eine Möglichkeit in der Zeichnung (idw) den Arbeitsblattname als Textparameter einzufügen.
Inventor 2011 

Gruss Dani

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Es gibt die Möglichkeit unter "Blatteigenschaften" die "Blattnummer" einzufügen (IV 2018).
Keine Ahnung ob das Deinem Wunsch entspricht, und ob bei Dir verfügbar.

------------------
mfg - Leo

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Blatteigenschaften-Auswahl-IV2021.png

Zitat:

---

Original erstellt von livostin:
...in der Zeichnung (idw) den Arbeitsblattname als Textparameter...

---

Sieht nicht danach aus. 

Eine Variable für den Blatt-Namen gibt es zwar, und die wird auch im Browser verwendet, aber wohl nur dort. In der Auswahl zum Einfügen als Text ist diese Varaible nicht dabei.

------------------
Roland  
www.Das-Entwicklungsbuero.de

It's not the hammer - it's the way you hit!

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Blattnummer hab ich gesehen, danke für das Feedback. Gibt es die Möglichkeit evt. mit einem Makro oder sonst einen weg?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Moin

Makro geht immer. 

Du könntest eine iLogicregel erstellen und es mit folgendem Schnipsel versuchen. Im Schriftfeld muss ein Text mit der angeforderten Eingabe "Blattname" existieren. Ausführen musst du manuell. Ich hoffe der 2011er unterstützt bereits alles erforderliche. Testen kann ich es nicht.

Code:

---

Dim oDrawDoc As DrawingDocument = ThisDrawing.Document
Dim oSheet As Sheet
Dim oTitleBlock As TitleBlock
Dim sPromptStrings(0) As String

For Each oSheet In oDrawDoc.Sheets
If oSheet.TitleBlock IsNot Nothing Then
sName=oSheet.Name.Split(":")(0)
oTitleBlock=oSheet.TitleBlock
oTBD = oTitleBlock.Definition

For Each oTB As TextBox In oTBD.Sketch.TextBoxes
If oTB.Text = "Blattname" Then
oTitleBlock.SetPromptResultText(oTB, sName)
Exit For
End If
Next
End If
Next

---

------------------
MfG
Ralf

RKW Solutions GmbH
www.RKW-Solutions.com

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP