Скрипт замены точки на запятую неверно пашет

[Estilla]

Почему заскриптованное действие замены через Ctrl-H не работает?
Данные в ячейках A1 и B1:
111.11 и 222.22 соответственно.
Сам скрипт:

Код: Выделить всё


Sub Макрос2()
Range("A1:B1").Select
Selection.Replace What:=".", Replacement:=",", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub

Проблема в том, что числа остаются в текстовом виде.

[Template]

Код: Выделить всё

Range("A1:B1").Replace What:=".", Replacement:="."

[Estilla]

Код: Выделить всё

Range("A1:B1").Replace What:=".", Replacement:="."

забавно. спасибо

[Lumen]

Код: Выделить всё

Range("A1:B1").Replace What:=".", Replacement:="."

В цитаты

[Wasup!]

Код: Выделить всё

Range("A1:B1").Replace What:=".", Replacement:="."

В цитаты

Оно работает!
(Excel 2000 rus)

В ячейке текст 111.11, replace ".","." , в ячейке число 111,11!

Template, что это - бага, фича

[Template]

Это точно не баг, ведь число хранится в виде 1.5, а отображается с учётом настроек компьютера, у автора вопроса и большинства других, это 1,5 поэтому, когда происходит замена, то excel меняет текст "1.5" на число 1.5

[Lumen]

Хм. Не знаю, не проверял, но выглядит будто автор пытается заменить точку точкой.

[Estilla]

Хм. Не знаю, не проверял, но выглядит будто автор пытается заменить точку точкой.

на самом деле автор пытался заменить текст с точкой на число с запятой. А получал текст с запятой.

[Wasup!]

Хм. Не знаю, не проверял, но выглядит будто автор пытается заменить точку точкой.

Вот в том-то и фишка. Replace точки на точку производит преобразование текста с точкой в число.