Suchen und Ersätzen von Ergebnisen VBA
07.10.2014 13:17:42
Ergebnisen
ich habe Spalte H
Zelle H1: 300
Zelle H2: 500
usw...
Die Spalte H sind Ergebnise von zwei anderen Spalten.
=WENN([@[Anzahl der CPUs]]=1;[@[CPU-Geschwindigkeit (in MHz)2]]; [@[Anzahl der CPUs]]&"X"&[@[CPU-Geschwindigkeit (in MHz)2]])
Ich möchte das in der Spalte H die Ergebnise die, die Zahl 300 und 500 betragen, in 333 und 566 umwandelt oder ersäzt.
Suchen und Ersätzen klappt leider nicht, da die Spalte H Ergebnisse sind und findet z.B. 300 nicht!
Sub CPU_Geschwindkeit_Ersätzen()
' CPU_Geschwindkeit_Ersätzen Makro
' 561-562-563-564-565=566 331-332=333
Columns("H:H").Select
Cells.Replace What:="500", Replacement:="566", LookAt:=xlWhole, _
SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Cells.Replace What:="300", Replacement:="333", LookAt:=xlWhole, _
SearchOrder:=xlByColumns, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub
Anzeige