Noch mal die Suche
03.03.2006 11:27:30
Matthias
Cells.Replace What:=s_Such, Replacement:=s_Ersetz, LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
mit dieser kombinieren?
For Each o In Selection
o.Value = Replace(o.Value, s_Such, s_Ersetz)
Next o
Als dim sind folgende:
dim s_Such As String
Dim s_Ersetz As String
Dim blatt As Worksheet
Es ist ein Makro um die 255 Grenze zu umgehen ... oder gibt es eine einfachere Möglichkeit?
Es sollte so sein das Excel die normal Sucher verwendet und wenn über 255 Zeichen vorhanden sin auf die andere alternative geht
Gruß