suchbegriff_spaltenmarkierung
02.11.2004 10:31:30
redneck
Sub suchbegriff_spaltenmarkierung()
Dim such As Range
Set such = Cells.Find(InputBox("Bitte den Suchbegriff eingeben"))
such.EntireColumn.Select
End Sub
bei dem Wert Müller bekomme ich immer den Wert Steinmüller, was mache ich falsch?
mfg Redneck
Anzeige