Suche nur auf dem geöffneten Blatt
15.06.2017 11:58:36
Fritz
ich habe hier eine Suche die sich aber auf die ersten 10 Blätter ausweitet.
Ich möchte nun diese Suche nur auf ein bestimmtes Blatt beschränken.
Am besten wäre die Suche nur auf dem Blatt, welches gerade geöffnet ist.
Würde mich über eine Lösung sehr freuen.
Hier die bisherige Suche
Sub Schaltfläche17_Klicken()
Dim Sh As Worksheet
Dim GZelle As Range
Dim FStelle$
Dim SBegriff
SBegriff = InputBox("Bitte Suchbegriff eingeben:")
If SBegriff = "" Then Exit Sub
For Each Sh In Worksheets
If Worksheets(Sh.Name).Index
Gruß Fritz