Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 15.10.2009, 15:44   #1
Apostolx
Пользователь
 
Аватар для Apostolx
 
Регистрация: 14.09.2009
Сообщений: 48
По умолчанию Как заменить запятую точной

Кто знает как заменить запятую точкой
Смысл такой делается отчет в котором вносятся данные через точку
Пример
№ ФИО Сумма
001 Петров ВВ 1000.00
002 Иванов ВВ 2000.00

Для подсчета общей суммы надо заменить точку на запятую и вывести общую сумму ( это я сделал), а теперь нужно вернуть обратно запятую на точку.
Пример
№ ФИО Сумма
001 Петров ВВ 1000
002 Иванов ВВ 2000

Ведь тут уже запятая пропадает и обратно не знаю как поставить точку

Пожалуйста помогите кто знает как


Все это должно выглядить в виде двух кнопок подсчета и возврата
ICQ 26-55-99-888
Apostolx вне форума Ответить с цитированием
Старый 15.10.2009, 16:11   #2
motorway
Участник клуба
 
Регистрация: 28.06.2009
Сообщений: 1,950
По умолчанию

Т.е. непонятно, как поставить точку в конце какой-то строки?
motorway вне форума Ответить с цитированием
Старый 15.10.2009, 16:53   #3
Apostolx
Пользователь
 
Аватар для Apostolx
 
Регистрация: 14.09.2009
Сообщений: 48
По умолчанию

Цитата:
Сообщение от motorway Посмотреть сообщение
Т.е. непонятно, как поставить точку в конце какой-то строки?
Да у меня получается что в конце пропадают знаки припинания.
Если делать через функцию "Замена" то работает все нормально заменяются Точка на запятую (Пример . на ,000001)
и запятая на точку (Пример ,000001 на .)
Но при сохранение всех действий в макрос данные меняются неправильно. вместо ,000001 ставиться 00000, (пример 2.00 меняеться на 2000001,00

Помогите переписать макрос
ICQ 26-55-99-888
Apostolx вне форума Ответить с цитированием
Старый 15.10.2009, 16:59   #4
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Цитата:
Помогите переписать макрос
Переписать что? Какой макрос?
Может, Вы имели ввиду написать?

Где пример файла с данными? Какие диапазоны ячеек обрабатывать?

Почему нельзя сразу вводить данные с запятой?
EducatedFool вне форума Ответить с цитированием
Старый 15.10.2009, 17:01   #5
EugeneS
Форумчанин
 
Регистрация: 06.08.2009
Сообщений: 472
По умолчанию

Добрый день, пример файла можете выложить?
EugeneS вне форума Ответить с цитированием
Старый 15.10.2009, 19:24   #6
EugeneS
Форумчанин
 
Регистрация: 06.08.2009
Сообщений: 472
По умолчанию

вариант решения Вашей задачи с помощью пользовательской функции: см. вложение
Предполагается, что после точки (согласно Вашему примеру) всегда следуют нули. Выделите ячейку, далее Мастер функций - Определенные пользователем - SUMSPECIAL, укажите столбец с "текстовыми числами"
Вложения
Тип файла: zip Sum_special_function.zip (7.3 Кб, 19 просмотров)
EugeneS вне форума Ответить с цитированием
Старый 16.10.2009, 09:17   #7
Apostolx
Пользователь
 
Аватар для Apostolx
 
Регистрация: 14.09.2009
Сообщений: 48
По умолчанию

Спасибо я даже не знал что можно считать без запятой
Но почему то формула не работает у меня на листе??
ICQ 26-55-99-888

Последний раз редактировалось Apostolx; 16.10.2009 в 09:46.
Apostolx вне форума Ответить с цитированием
Старый 16.10.2009, 09:47   #8
Apostolx
Пользователь
 
Аватар для Apostolx
 
Регистрация: 14.09.2009
Сообщений: 48
По умолчанию Вот фаил

Вот мой фаил с моими вычислениями
Вложения
Тип файла: rar временный фаил.rar (38.8 Кб, 15 просмотров)
ICQ 26-55-99-888
Apostolx вне форума Ответить с цитированием
Старый 16.10.2009, 12:03   #9
EugeneS
Форумчанин
 
Регистрация: 06.08.2009
Сообщений: 472
По умолчанию

см. вложение

PS. Извините не сообщил, что для использования в другой книге, ее необходимо скопировать в редакторе VB и вставить в модуль VB Вашей книги
Вложения
Тип файла: zip temp_file.zip (77.6 Кб, 21 просмотров)

Последний раз редактировалось EugeneS; 16.10.2009 в 12:07.
EugeneS вне форума Ответить с цитированием
Старый 16.10.2009, 14:04   #10
Apostolx
Пользователь
 
Аватар для Apostolx
 
Регистрация: 14.09.2009
Сообщений: 48
По умолчанию

Цитата:
Сообщение от EugeneS Посмотреть сообщение
см. вложение

PS. Извините не сообщил, что для использования в другой книге, ее необходимо скопировать в редакторе VB и вставить в модуль VB Вашей книги
А как это сделать не подскажешь где именно написать нужно?
И почему (так для ознакомления)?
ICQ 26-55-99-888
Apostolx вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Как поменять точку на запятую Stay Microsoft Office Excel 13 14.04.2010 17:41
Как заменить окошко в календарике? Extez1 Общие вопросы Delphi 5 19.04.2009 17:59
Как заменить курсор на форме RAVAL)) Общие вопросы Delphi 11 31.01.2009 01:49
Замена точки на запятую SIV84 Microsoft Office Excel 1 11.01.2009 11:16
Поменять точку на запятую Romuald Microsoft Office Excel 7 17.12.2007 18:55