Frage, ist es möglich der besseren Übersicht wegen die Textfelder in einer UserForm für die Zeit der Aktivierung farbig zu gestalten. Also wenn ich Cursor nach TAB in das Feld setze über Zeitraum der Beschriftung bis zum nächsten TAB.
mfg Werner
hallo werner
versuchs mal so:
Option Explicit
Private Sub TextBox1_Enter()
TextBox1.BackColor = RGB(1, 2, 3)
End Sub
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox1.BackColor = RGB(255, 255, 255)
End Sub
Private Sub TextBox2_Enter()
TextBox2.BackColor = RGB(1, 2, 3)
End Sub
Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
TextBox2.BackColor = RGB(255, 255, 255)
End Sub
ransi
Ps:
Wie wird man eigenlich Excell Profi ?
ransi
hallo werner
wenn die textboxen in der userform liegen (wovon ich ausgegangen bin), muss der code auch in den code der userform.
das die textboxen schwarz sind ist ein zufall.
wollte in den RGB werten beim enter nur irgendeine zahl reinschreiben damit das prinzip klar wird. erlaubt sind zahlen von 1 bis 255(glaube ich).
musst da mal einwenig experimentieren.
wenn die textboxen auf dem tabellenblatt liegen brauchst du andere ereignisse.
enter & exit greifen da nicht.
da brauchst du:
Private Sub TextBox1_GotFocus()
code
End Sub
Private Sub TextBox1_LostFocus()
anderer code
End Sub
der code dafür muss allerdings dann in den code des jeweiligen tabellenblattes.
ransi