Здравствуйте, все!

Столкнулся со следующей проблемой: в ячейках есть числа в формате "3265.656".
Нужно:

1. Определить, содержится ли в ячейке точка.
2. Если содержиться — заменить ее на запятую.
Как это сделать?


В конторе программист в отпуске, а нужно было "вчера"...

_>1. Определить, содержится ли в ячейке точка.
_>2. Если содержиться — заменить ее на запятую.
_>Как это сделать?

Ctrl-H . <tab> , <enter>

Здравствуйте, Igogo, Вы писали:

_>>1. Определить, содержится ли в ячейке точка.
_>>2. Если содержиться — заменить ее на запятую.
_>>Как это сделать?

I>Ctrl-H . <tab> , <enter>

нееее...
нужно макрос или функцию...

Здравствуйте, 777_80, Вы писали:

_>1. Определить, содержится ли в ячейке точка.
_>2. Если содержиться — заменить ее на запятую.
Ну когда-то я ставил себе такую же задачу... решалась она так:
Выделяешь ячейку смежную в той ж строке справа, {ALT+F11}, {Ctrl+G}, вставляешь вот этот текст:

Selection.FormulaR1C1="=REPLACE(RC[-1],FIND(""."",RC[-1],1),1,"","")"

, {Enter}, {Alt+F11}

Но тут нашёлся бухарик, который разделителем разрядов использует "|". Задача поменялась, а с ней и решение:
Выделяешь ячейку смежную в той ж строке справа, {ALT+F11}, {Ctrl+G}, вставляешь вот этот текст:

Selection.FormulaR1C1="=VALUE(LEFT(RC[-1],FIND(""."",RC[-1],1)-1))+VALUE(MID(RC[-1],FIND(""."",RC[-1],1)+1,100))/10^(LEN(RC[-1])-FIND(""."",RC[-1],1))"

, {Enter}, {Alt+F11}

Это фантастика!
Спасибо большое!

А нельзя ли объяснить, как оно работает?
Очень интересно... для общего развития...

Здравствуйте, 777_80, Вы писали:

_>Это фантастика! :)
Афигеть! Я втыкаю, как сыр хохланд! :-D

_>А нельзя ли объяснить, как оно работает? :)))
Как работает формула, можно увидеть так: Сервис->Зависимости формул->Вычислить формулу (есть в MSO 2003 и выше)
Как работает Immediate window в VBA можно узнать из любой книги по работе в VB6/VBA.
Как работает Excel тебе никто не объяснит.
Как работает клавиатура, можно узнать на втором курсе МИРЭА.
Как работает мой мозг, я не уверен что знаю.

_>Очень интересно... для общего развития...
Ну куда идти я сказал. ;)

Здравствуйте, ZAMUNDA, Вы писали:

ZAM>Ну куда идти я сказал.

ок. и на том спасибо...
Просто проблема еще в том, что согласно корпоративным страндартам у нас весь софт на английском языке... help читать тяжеловато...

Здравствуйте, 777_80, Вы писали:

_>Здравствуйте, ZAMUNDA, Вы писали:

ZAM>>Ну куда идти я сказал. ;)

_>ок. и на том спасибо... :)
_>Просто проблема еще в том, что согласно корпоративным страндартам у нас весь софт на английском языке... help читать тяжеловато...
Есть MSDN, а в нём есть Office Home [Ru]. По русски, формулы выглядят так:

=ЗАМЕНИТЬ(RC[-1];НАЙТИ(".";RC[-1];1);1;",")

=ЗНАЧЕН(ЛЕВСИМВ(RC[-1];НАЙТИ(".";RC[-1];1)-1))+ЗНАЧЕН(ПСТР(RC[-1];НАЙТИ(".";RC[-1];1)+1;100))/10^(ДЛСТР(RC[-1])-НАЙТИ(".";RC[-1];1))

Здравствуйте, ZAMUNDA, Вы писали:

ZAM>Есть MSDN, а в нём есть Office Home [Ru].

Это здесь http://msdn.microsoft.com/library/rus/, я правльно понимаю?
Что-то не нашел я там help на русском по Экселю...

Здравствуйте, 777_80, Вы писали:
_>Это здесь http://msdn.microsoft.com/library/rus/, я правльно понимаю?
_>Что-то не нашел я там help на русском по Экселю... :(
http://office.microsoft.com/ru-ru/default.aspx

На всякий случай нашёл справку по одной из функций: здесь.

PS:Похоже корпоративные стандарты не самая большая твоя проблема. ;-)

Здравствуйте, 777_80, Вы писали:

_>Столкнулся со следующей проблемой: в ячейках есть числа в формате "3265.656".
_>Нужно:

_>1. Определить, содержится ли в ячейке точка.
_>2. Если содержиться — заменить ее на запятую.
_>Как это сделать?

_>
_>В конторе программист в отпуске, а нужно было "вчера"...

Excel2003: Меню Сервис -> Параметры -> Вкладка Международные -> Разделитель целой и дробной части. Меняешь точку на то, что тебе нужно.

Вау!

Добавил в избранное...
Еще найти бы где-нибудь перевод русских функций в английские...

_>Добавил в избранное...
_>Еще найти бы где-нибудь перевод русских функций в английские...

http://www.planetaexcel.ru/files.php , файл "Functions.xls"

Здравствуйте, a18, Вы писали:

_>>Добавил в избранное...
_>>Еще найти бы где-нибудь перевод русских функций в английские...

a18>http://www.planetaexcel.ru/files.php , файл "Functions.xls"

Супер!
Спасибо вам еще раз, добрые люди!