Hallo,
ich möchte bei Klick in meiner UserForm den Inhalt einer TextBox in eine globale Variable schreiben und die beim nächsten klick mit dem Inhalt der Textbox wieder vergleichen.
Die globale Variable habe ich als Integer definiert, da der Wer der Textbox max. 4stellig ist. Ich lese den Wert der Textbox als String aus und wandle ihn dann in eine Interger Variable um.
Ich bekomme aber immer die FM "Object erforderlich"
Was stimmt denn da nicht?
Modul1
Option Explicit
Dim iWERT As Integer
UserForm1
Private Sub CommandButton1_Click()
Dim tb As Object, frm As Object
Dim sWERT As String
Set frm = UserForm1
Set sWERT = frm.TextBox7.Value
...
With frm
If iWERT = "" Then
Set iWERT = Int(sWERT)
...
Henri