VBA Word: Form-Feld beim Namen ansprechen?

Computer: Software & Programmierung Visual Basic
#1

Guten Tag miteinander

Ich habe ein Makro gestrickt, welches den FONT eines Formular-Textfeldes ändert.

Nun möchte ich einen STRING als Namen des Text-Feldes verwenden und dieses so ansprechen.

Leider hab ichs noch nicht hinbekommen.

Kann mir jemand helfen?

Grüsse
Oliver

Meine Versuche:

’ Name Formular: „MeinFormular“
’ Name Inputfeld: „MeinFeld“

sFeldName = „MeinFeld“

MeinFormular.Controls(sFeldName).Font.Bold = .Bold
oder
MeinFormular.Name(sFeldName).Font.Bold = .Bold
oder
MeinFormular.sFeldName.Font.Bold = .Bold
oder
MeinFormular.MeinFeld.Font.Bold = .Bold ’ Funktioniert, aber das
’ ist nicht was ich will

#2

Hi Oliver,

Ich habe ein Makro gestrickt, welches den FONT eines
Formular-Textfeldes ändert.

wo ist der Code?

Nun möchte ich einen STRING als Namen des Text-Feldes
verwenden und dieses so ansprechen.

Wenn du aus der Symbolleiste „Formular“ ein Textfeld im Dokument erstellst so hat es von Word aus den namen „TextBox1“, das nächste „TextBox2“ usw.

Auslesen kannst du das z.B. so

MsgBox ThisDocument.TextBox1.Value

Wenn du es in „MeinTextfeld“ umbenennest dann so

MsgBox ThisDocument.MeineTextfeld.Value

Ob sein Inhalt fett oder nicht fett angezeigt wird regelst du so:

ThisDocument.MeineTexfeld.Font.Bold = True
bzw.
ThisDocument.MeineTexfeld.Font.Bold = False

Hilft dir das weiter?

Gruß
Reinhard

#3

…

Nun möchte ich einen STRING als Namen des Text-Feldes
verwenden und dieses so ansprechen.

Wenn du aus der Symbolleiste „Formular“ ein Textfeld im
Dokument erstellst so hat es von Word aus den namen
„TextBox1“, das nächste „TextBox2“ usw.

Auslesen kannst du das z.B. so

MsgBox ThisDocument.TextBox1.Value

Wenn du es in „MeinTextfeld“ umbenennest dann so

MsgBox ThisDocument.MeineTextfeld.Value

Ob sein Inhalt fett oder nicht fett angezeigt wird regelst du
so:

ThisDocument.MeineTexfeld.Font.Bold = True
bzw.
ThisDocument.MeineTexfeld.Font.Bold = False

Hilft dir das weiter?

Gruß
Reinhard

Hallo Reinhard

Danke für Deine Antwort.
Ich hatte mich wohl zu wenig klar formuliert, bitte entschuldige.

Anstelle des Namens eines Elementes will ich einen String verwenden.
Leider habe ich die Syntax dafür nicht heruasbekommen.

Beispiel:

formular.MameDesFeldes.value

soll ersetzt werden mit

formular…value

wobei den Namen des Feldes hält,

Weitere Ideen sind sehr willkommen.

Grüsse
Oliver