AW: Auslesen eines Wertes aus einer Textbox
20.07.2006 17:40:42
Dirk
Ob es funktionier kann ich noch nicht sagen, weil ich schon auf das nächste Problem dabei gestoßen bin. Dafür muß ich etwas weiter ausholen:
Der Inhalt der TextBox soll in derFußzeile auf allen Blättern stehen.
Ich wollte da so probieren:
Sub UserForm1Anzeigen()
UserForm1.Show
End Sub
Private Sub TextBox1_Change()
End Sub
Private Sub CommandButton1_Click()
UserForm1.Hide
End Sub
Private Sub CommandButton2_Click()
Call Arbeit
End Sub
Private Sub UserForm_Click()
End Sub
Sub Arbeit()
Dim ws As Worksheet
For Each ws In Worksheets
ws.PageSetup.RightFooter = TextBox1.Text
Next ws
UserForm1.Hide
End Sub
In der UserForm befindet sich das Textfeld.
Das führt jedoch zu einer Fehlermeldung.
Liegt das auch an .text bzw. .value?
Viele Grüße
Dirk