VBA Code umschreiben
27.11.2012 10:33:41
BuStue
kann man folgenden Code so umschreiben, das wenn der User die Tabelle öffnet
er nur seine Zeile sieht. Das Ganze eben ohne Login.
Sub LogIn()
Application.ScreenUpdating = False
Tabelle1.Unprotect "0000"
Rows("9:34").EntireRow.Hidden = True
Select Case Tabelle1.ComboBox1.Value
Case "Müller"
Rows(10).Hidden = False
Case "Meier"
Rows(11).Hidden = False
Case "Lehmann"
Rows(12).Hidden = False
Case "Schuster"
Rows(13).Hidden = False
End Select
Application.ScreenUpdating = True
Tabelle1.Protect "0000"
End Sub
MfGBurghard