zeile markieren
01.07.2003 15:02:07
thomas
hab folgendes makro:
Sub such()
Dim rngSuch As Range
strSuch = InputBox("Schlüssel-Suche")
Set rngSuch = Worksheets("OST").Range("A:A").Find(strSuch)
If Not rngSuch Is Nothing Then
rngSuch.Select
End If
End Sub
-möchte, dass nach auffinden des wertes in spalte A die gesamte spalte markiert wird
-wie??
dank im voraus thomas
Anzeige