to Select oder no select
ing.grohn
ich lese immer wieder, man solle Select vermeiden (nichts dagegen).
Warum Funktioniert folgendes nur mit Select?
Private Sub UserForm_Initialize()
KKasse 'unwichtig
Sheets("Personal").Select ' so gehts
Zeile = ActiveCell.Row ' dito
'Zeile = Worksheets("Personal").ActiveCell.Row ' funktioniert scheints nicht
If Zeile > Sheets("Personal").UsedRange.Rows.Count Then
Zeile = Sheets("Personal").UsedRange.Rows.Count
End If
Daten_laden (Zeile)
End Sub
bin gespannt auf die AntwortMit freundlichen Grüßen
Albrecht