Grüss Gott!
In A1 steht z.B. Chr(10)
ein Makro soll nach dem was in Zelle A1 steht suchen. Aber nicht nach Chr(10), sondern nach einem Zeilenumbruch.
Was muss man in die Zelle schreiben, dass das Makro es als Zeilenumbruch erkennt und nicht als Text? Oder wie muss man das im VBA Kod machen, dass normale Zeichen (Buchstaben, Wörter, Satzzeichen usw.) gesucht werden können UND solche ANSI Codes Chr(10) oder wie das heisst
In A2 steht der Text den das Makro anstelle des Textes in A1 austauschen soll.
Das Makro sieht so aus:
Set RS = newData 'Replace Sheet: where you want to replace items
Set LS = ChangeColumns 'List Sheet: with replace-lists
LR = LS.Cells(Rows.Count, 11).End(xlUp).Row
With Application
.ScreenUpdating = False
AppCalcSet = .Calculation
.Calculation = xlCalculationManual
End With
For i = 7 To LR
RS.Cells.Replace what:=LS.Cells(i, 11), Replacement:=LS.Cells(i, 13), lookat:=xlWhole, MatchCase:=False
Next i
With Application
.ScreenUpdating = True
.Calculation = AppCalcSet
End With
Viele Grüsse
Kailash