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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 06.11.2011, 15:11   #1
is2
Новичок
Джуниор
 
Регистрация: 06.11.2011
Сообщений: 3
Вопрос Отсортировать ячейки с разными валютными форматами

Добрый день

Есть таблица (Excel 2003) в которой внесены суммы контрактов в рублях и в евро. Обозначения валют установлены в формате ячеек.

Как отделить от рублевых сумм (отсортировать или перенести на другой лист) суммы в евро. Таблица может содержать тысячи строк и поступает в отдел в таком виде как приведена в прикрепленном файле.


Решение устраивает любым способом (встроенными в Excel формулами и функциями, средствами макросов)
Вложения
Тип файла: zip Реестр.zip (7.2 Кб, 8 просмотров)
is2 вне форума Ответить с цитированием
Старый 06.11.2011, 15:36   #2
Watcher_1
Форумчанин
 
Аватар для Watcher_1
 
Регистрация: 22.06.2011
Сообщений: 325
По умолчанию

Держите код!
Заказать макрос можно на сайте http://excel4you.ru/
Watcher_1 вне форума Ответить с цитированием
Старый 06.11.2011, 15:37   #3
Watcher_1
Форумчанин
 
Аватар для Watcher_1
 
Регистрация: 22.06.2011
Сообщений: 325
По умолчанию

Чот не приложилось
Вложения
Тип файла: rar Книга1.rar (14.3 Кб, 13 просмотров)
Заказать макрос можно на сайте http://excel4you.ru/
Watcher_1 вне форума Ответить с цитированием
Старый 06.11.2011, 17:21   #4
is2
Новичок
Джуниор
 
Регистрация: 06.11.2011
Сообщений: 3
По умолчанию

Watcher_1
cпасибо за файл.

Подскажите как перенести эту функцию в другую книгу Excel или нужно только переносить содержимое в этот файл и после выполнения сортировки пересохранять файл под нужным именем?

Если добавляю столбец перед сортируемым, то функция не работает. Как можно переместить кнопку с функцией самостоятельно для добавления столбца. Если это не предполагается без установки дополнительных приложений, то переместите пожалуйста на 9 столбец, чтобы была возможность заполнять таблицу как в приложении (Реестр 2).
Вложения
Тип файла: zip Реестр 2.zip (9.1 Кб, 7 просмотров)
is2 вне форума Ответить с цитированием
Старый 06.11.2011, 18:05   #5
Hugo121
Старожил
 
Регистрация: 11.05.2010
Сообщений: 5,166
По умолчанию

Другой вариант - UDF:

Код:
Function WazzUp(r As Range)
WazzUp = r.NumberFormat
End Function
Не спрашивайте, почему WazzUp - какая по сути разница?

Но не идеально - там есть разброд и шатания на валютном рынке:

#,##0.00" EUR"
0.00" EUR"

Но можно использовать - протянуть по столбцу и по нему отсортировать.
Если фильровать по "содержит EUR" - то разброд не влияет
webmoney: E265281470651 Z422237915069 R418926282008
Hugo121 вне форума Ответить с цитированием
Старый 06.11.2011, 20:14   #6
Watcher_1
Форумчанин
 
Аватар для Watcher_1
 
Регистрация: 22.06.2011
Сообщений: 325
По умолчанию

Ловите!
С вашим файлом не разобрался в нем отсутствуют ярлыки листов
Вставляйте данные в мой, но имейте ввиду начинает считать с 8-строки (с этой строки начинаются данные у вас)
Вложения
Тип файла: rar Книга1.rar (18.3 Кб, 11 просмотров)
Заказать макрос можно на сайте http://excel4you.ru/
Watcher_1 вне форума Ответить с цитированием
Старый 06.11.2011, 20:52   #7
is2
Новичок
Джуниор
 
Регистрация: 06.11.2011
Сообщений: 3
По умолчанию

спасибо за помощь
is2 вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблема с форматами видео Maie Помощь студентам 6 04.01.2011 03:46
Объеденить ячейки с разными стилями шрифта doober Microsoft Office Excel 9 09.09.2010 12:58
Работа с файлами и форматами Casper-SC Общие вопросы .NET 1 03.01.2010 19:50
Помогите с форматами CrOsP Общие вопросы по Java, Java SE, Kotlin 1 23.06.2009 13:29