Замена точек пробелом

Question

Я пытаюсь заменить точки пространством и работает, но он также заменяет значения, содержащие запятые.

Пример 1.506,45 преобразуется в 1 506,45

но 1,506,45 преобразуется в 1 506,45

и это разрушает ценности. Любые идеи, как заменить ТОЛЬКО точки, а не запятые?

ActiveSheet.Columns("A:A").Select 

Selection.Replace What:=".", Replacement:=" ", LookAt:=xlPart, _ 
SearchOrder:=xlByRows, MatchCase:=False 

Answer 1

Я бы просто использовать =SUBSTITUTE() формулу:

На соседнем клетке:

=SUBSTITUTE(A1, ". ", " ") 

Answer 2

попробовать с = Substitute (цв, oldtxt, newtxt)