Clever-Excel-Forum

Clever-Excel-Forum > Office-Anwendungen > Excel > Textbox Bezug weiterschalten
Normale Version: Textbox Bezug weiterschalten
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.

M.Wichmann

05.02.2018, 09:52
Hallo,

ich befülle eine Textbox per folgenden Code:

Code:
'TextBoxen füllen
           TextBox1 = Tabelle1.Cells(lZeile, 1).Value
           TextBox3 = Tabelle1.Cells(lZeile, 7).Value

Jetzt möchte ich aber, für TextBox3 die Spalten per Button, oder Drehfeldsteuerung in der geöffneten UF weiterschalten. Wie kann ich das am besten einbauen?

Steffl

05.02.2018, 10:33
Hallo Mario,

mal als Ansatz

Code:
'TextBoxen füllen
            TextBox1 = Tabelle1.Cells(lZeile, 1).Value
            TextBox3 = Tabelle1.Cells(lZeile, 7 + SpinButton1.Value).Value

M.Wichmann

05.02.2018, 12:31
Hallo,   leider funktioniert das so nicht.

Steffl

05.02.2018, 12:42
Hallo Mario,

Gegenfrage: Wieso nicht? Bei meiner Testuserform funktioniert es schon.

M.Wichmann

05.02.2018, 14:12
In welcher Routine hast du das drin?   ich hab es in Initia. probiert, und direkt bei den Spinbutton. Da passiert nix, bzw error.

Wenn ich das ins Click Listbox packe gehts, aber dann muss man immer wieder in die Listbox klicken.

Steffl

05.02.2018, 14:22
Hallo,

so

Code:
Private Sub SpinButton1_Change()
   TextBox1.Value = Tabelle1.Cells(1, 7 + SpinButton1.Value).Value
End Sub



Private Sub UserForm_Initialize()
   TextBox1.Value = Tabelle1.Cells(1, 7 + SpinButton1.Value).Value
End Sub
Clever-Excel-Forum > Office-Anwendungen > Excel > Textbox Bezug weiterschalten