AW: Aber wie soll das Makro aussehen ?
16.09.2009 07:19:40
xr8k2
Hallo Walli,
ok ... dann eben alle beide Beispiele:
Änderung zur Userform-Laufzeit per Commandbutton:
Private Sub CommandButton1_Click()
'TB5 wird nach TB4 aktiviert
TextBox5.TabIndex = TextBox4.TabIndex + 1
End Sub
Private Sub CommandButton2_Click()
'TB7 wird nach TB4 aktiviert
TextBox7.TabIndex = TextBox4.TabIndex + 1
End Sub
Und hier noch die von NoNet vorgeschlagene generelle Variante:
Sub TB5nachTB4()
With ThisWorkbook.VBProject.VBComponents("Userform1").Designer
.Controls("Textbox5").TabIndex = .Controls("Textbox4").TabIndex + 1
End With
End Sub
Sub TB7nachTB4()
With ThisWorkbook.VBProject.VBComponents("Userform1").Designer
.Controls("Textbox7").TabIndex = .Controls("Textbox4").TabIndex + 1
End With
End Sub
Gruß,
xr8k2