habe folgende Formel in J2:
=WENN(A4>0;TEILERGEBNIS(3;$F$4:$F$65000);"Filter 0")
Da ich keine Daten eingelesen habe zeigt die Filterung auch 0 an.
Habe folgendes Makro:
If ActiveSheet.Range("J2").Value = 0 Then
MsgBox "Es wurde KEINE Daten zur Selektion gefunden ! " & Chr(13) _
& Chr(13) & Chr(13) & _
"Neue Selektion durchführen ... " & Chr(13) & Chr(13) _
, vbInformation, " Hinweis !"
Range("B7").Select
Exit Sub
Else
leider werden mir 800 Seiten ausgedruckt (leere), habe natürlich abgebrochen.
Frage was habe ich Falsch gemacht ?
mfg Walter