Servus Leute,
ich benötlge Hilfe bei VBA.
Nach dem Filtern von gewissen Daten, hätte ich gerne die Nummer der ersten aktive Zeile (diese hängt von Filter ab und ist nicht immer die 1 ).
ich möchte gerne eine Row-Zufallsvariable haben die mir eine Zeile zufällig in einem Rang [erste aktive Row, letzte aktive Row] "nach dem Filtern" ergibt und diese weiter zum Bearbeiten zur Verfügung stellt.
ich habe dabei den folgenden Code benutzt.
-----------------
Dim nErsteRowAs Long, nLetztetRow As Long
Dim ZufallRow As Integer
nErsteRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).row
nLetztetRow = ?
'Zufall-Row bestimmen
ZufallRow = Application.WorksheetFunction.RandBetween(nErsteRow, nLetztetRow)
---------------------------------
wäre dankbar für jeden Tipp.
Beste Grüße und schönes Wochenende wünsche ich