ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Сверка цен
17 сообщений из 17, страница 1 из 1
Сверка цен
    #33874019
Sergey_su
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_su
Участник
Всем Привет!!!
Может кто сможет подсказать, как сделать так, чтобы можно было быстро сверять цены в excel. Суть такая:
приходит счет с позициями и ценами, надо чтобы макрос рядом проставлял значения цен по этим позициям, которые он найдет из прайсов (другие файлы).
и если цена совпадает - там выделяет зеленым, если нет, то красным.

Если не сложно, подскажите.. СПАСИБО.
...
Рейтинг: 0 / 0
24.07.2006, 14:36:43
| Ответить | Цитировать | Написать  
Сверка цен
    #33874277
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
нет проблем, как написал, так и нужно делать :). что можно еще подсказать?
...
Рейтинг: 0 / 0
24.07.2006, 15:47:32
| Ответить | Цитировать | Написать  
Сверка цен
    #33874288
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
если серьезно, то решается с помошью VBA достаточно просто
...
Рейтинг: 0 / 0
24.07.2006, 15:50:32
| Ответить | Цитировать | Написать  
Сверка цен
    #33874452
Sergey_su
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_su
Участник
Не, ну нормально????? Написал в форум VBA, а мое сообщение перебросили сюда, СПРАШИВАЕТСЯ КАКОГО Х......?????????????
Верните меня назад.
...
Рейтинг: 0 / 0
24.07.2006, 16:30:06
| Ответить | Цитировать | Написать  
Сверка цен
    #33874536
Tachkin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Tachkin
Участник
Вот все кричат: "VBA- это рулез!!!!, VBA- это кулл!!!! VBA- это супер гуд!!!!"
Нет, я не спорю конечно, но зачем же забивать гвозди микроскопом!!!?

Сделайте сначала ВПР, а затем условное форматирование. Все будет так как надо по описанию и быстрее (ну это кому как).
...
Рейтинг: 0 / 0
24.07.2006, 16:49:55
| Ответить | Цитировать | Написать  
Сверка цен
    #33874538
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
Здесь тебе тоже помогут. Напиши подробнее в чем проблема, чем конкретно помочь! Хотя решение скорее всего такое: готового решения нет, нужно писать прогу под конкретные файлы счетов и справочников.
...
Рейтинг: 0 / 0
24.07.2006, 16:50:06
| Ответить | Цитировать | Написать  
Сверка цен
    #33874585
Sergey_su
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_su
Участник
ВПР надо проставлять в каждой позиции, а мне бы чтобы оно само находило позицию и искало в файлах-прайсах позицию с ценой. Файлов-прайсов несколько и с несколькими ярлыками.
...
Рейтинг: 0 / 0
24.07.2006, 17:02:10
| Ответить | Цитировать | Написать  
Сверка цен
    #33874593
Sergey_su
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_su
Участник
а вот прайс
...
Рейтинг: 0 / 0
24.07.2006, 17:03:30
| Ответить | Цитировать | Написать  
Сверка цен
    #33874605
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
если это не ком. тайна, выложи файл справочник, можно без цен, но чтоб форма и заголовки колонок были как в рабочем.
вопросы:1) все файлы-справочники имеют одинаковый формат? 2) искать во всех или пользователь выбирает в каком? 3) формат листа -счета такой всегда будет?
...
Рейтинг: 0 / 0
24.07.2006, 17:07:19
| Ответить | Цитировать | Написать  
Сверка цен
    #33874681
Sergey_su
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_su
Участник
Ком.тайна, но я немного подправил прайс, ща выложу. Прайсы отличаются тем, что они по разным доп.соглашениям, и в каждом таком доплашении в прайсе меняется пару цен в позициях. В основном я пользуюсь двумя-тремя прайсами(к примеру конец 2005 и начало 2006). Формат одинаковый, искать во всех. Хотя наверное будет правельнее вручнуюю подключать прайсы. Формат счета тоже одинаковый.
...
Рейтинг: 0 / 0
24.07.2006, 17:27:14
| Ответить | Цитировать | Написать  
Сверка цен
    #33875750
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
пробуй
...
Рейтинг: 0 / 0
25.07.2006, 10:30:15
| Ответить | Цитировать | Написать  
Сверка цен
    #33875830
Sergey_su
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_su
Участник
Привет, а что делает эта строка?
RowIndex = Module1.FindInColumn(WBInvoice.ActiveSheet, "ID позиції", 2).Row + 1
...
Рейтинг: 0 / 0
25.07.2006, 10:53:00
| Ответить | Цитировать | Написать  
Сверка цен
    #33875848
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
Sergey_suПривет, а что делает эта строка?
RowIndex = Module1.FindInColumn(WBInvoice.ActiveSheet, "ID позиції", 2).Row + 1
находит первую строку после заголовка колонки, с которой будет идти вниз проверка
...
Рейтинг: 0 / 0
25.07.2006, 11:00:01
| Ответить | Цитировать | Написать  
Сверка цен
    #33875877
Sergey_su
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_su
Участник
не фунциклирует :-(
вот пример счета и прайса реального, в прайсе только одна закладка AD
...
Рейтинг: 0 / 0
25.07.2006, 11:08:10
| Ответить | Цитировать | Написать  
Сверка цен
    #33875987
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
нужно было в том же формате высылать в первый раз. держи
...
Рейтинг: 0 / 0
25.07.2006, 11:29:17
| Ответить | Цитировать | Написать  
Сверка цен
    #33876128
Sergey_su
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sergey_su
Участник
ОК. Работает, блин, спасибо тебе огромное, а то я всю почти всю ночь проверял эти гребанные счета.
Но без траблов никуда. Вообщем есть позиции AD,FD,SD,RT,RF,PS все отлично, только вот есть строки - названия подразделов там "установка оборудования","монтаж","демонтаж" и вот по ним искать не надо, надо чтобы четко искало ячейку, которая начинается с AD,FD.... Я просмотрел прайсы и там такая фигня, редкая, но есть, в закладке install есть позиции RF PS, соответственно, если находит RF, то ищет закладку RF, а таковой нету.Вообщем наверное будет лучше вручную вбить на каком ярлыке находятся соответ позиции. И как поставить игнор на любую ошибку в поиске?

ЕЩЕ РАЗ СПАСИБО ДРУЖИЩЕ
...
Рейтинг: 0 / 0
25.07.2006, 11:57:33
| Ответить | Цитировать | Написать  
Сверка цен
    #33876286
vbapro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbapro
Участник
Sergey_su... И как поставить игнор на любую ошибку в поиске? ...

обработка ошибли делается после ErrHandler: Хочешь закомментируй после него операторы, хочешь измени

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Private Function GetPrice(PosID As String) As Double

...

On Error GoTo ErrHandler

...
    
ErrHandler:
    MsgBox "Не найден лист " & ShName & " для позиции " & PosID, vbCritical
    GetPrice =  9999999999999 #
End Function
...
Рейтинг: 0 / 0
25.07.2006, 12:23:51
| Ответить | Цитировать | Написать  
17 сообщений из 17, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Сверка цен
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&msg=33874277&tid=2184583]:
 0ms
get settings:
 10ms
get forum list:
 16ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 70ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 59ms
get tp. blocked users:
 2ms
others: 229ms
total:  403ms
созд. / загр.: 403ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]