Страницы: 1
RSS
Что не так с макросом?
 
Пытался помочь, но у пользователя "вылетает" ошибка, которой нет у меня.  
Что это может быть?  
Файл и тема по ссылке  
http://www.planetaexcel.ru/forum.php?thread_id=5144
 
---  
Игорь, у девушки, скорее всего, не самый новый Excel.  
Для проверки этой гипотьезы я загрузил Вашу книгу в Excel 97, и получил такую же ошибку (и еще одну - см. ниже), т.к. метод Find этой версии Excel не понимает именнованный параметр SearchFormat:=False (нужно просто удалить это фрагмент во всех местах), а также метод Sort не понимает DataOption1:=xlSortNormal (тоже можно смело удалить). После таких правок Ваш код работает даже в Excel 97  
---  
ZVI
 
Не без опечаток, к сожалению.    
Правильно: гипотезы, именованный
 
Большое спасибо!    
Будем спрашивать девушку, и искать варианты решения.
 
Добрый день! На свою страницу не могу войти, но прочитала про "Что не так с макросом!. Да, действительно, у нас не самая новая версия программы))) это корпоративная политика, ничего не поделаешь. Я попробовала удалить все что сказано в сообщении... РАБОТАЕТ!!!!!! ОГРОМНОЕ СПАСИБО!  
..ояталось только проверить правильность результатов.  
 
И можно еще вопрос?  
Чтобы привести входные данные к нужному виду мне следует записать еще маленький макрос. Могу я как-то объединить новый и этот, чтоб рез-т выходил при нажатии одной кнопки?
 
Конечно можно. Следует в "старом" макросе в нужном Вам месте написать строку  
Call Макрос1 (если он ТАК называется).  
Если не удается войти в какую-либо тему - удалите кикисы. Подробнее можно найти в Поиске.
 
...после удаления макрос заработал, но есть еще загвоздка.  
Макрос теперь считает строку "Остальные" раньше чем выводит 5 самых активных покупателей. И эта строка Остальные получается самая активная- стоит на первом месте. Плюс к этому макрос еще раз вычисляет строку Остальные, в результате чего у меня в итогах высвечивается две строки с названием Остальные(((.
 
Если это произошло после "добавки" - значит Вы не в тот момент запускается Ваш вновьзаписанный макрос. Поместите его вызов в другое место. Может быть перед End Sub?
 
я еще ничего не добавляла, просто решила проверить результаты работы макроса после удаления указанных выше параметров.
 
Ирина, еще раз подправленный макрос. У меня обрабатывает приложенные данные правильно. А по темам - удалить Cookies и можно будет смотреть все.
 
СУПЕР! все открылось и макрос заработал!!!!!!!  
Спасибки прибольшое!!!!
 
Игорь, посмотри пжлста, после запуска макроса у тебя строк "Остальные" в каждой позиции сколько?  
У меня почемуто все таки две...
 
Вот что получилось после прогона макроса.  
Остальные - 1 строка.  
И, пожалуйста, архивируйте файлы.
 
{quote}{login=Igor67}{date=07.08.2008 04:26}{thema=}{post}Вот что получилось после прогона макроса.  
Остальные - 1 строка.  
И, пожалуйста, архивируйте файлы.{/post}{/quote}  
 
хорошо, буду архивировать)  
А с первыми позициями что-то можно сделать?
 
Ира, попробуйте закомментировать строки - поставить значок апострофа перед строкой кода '.  
Возможно из-за этого идет повтор. Тогда только не будет присваиваться формат строке "Остальные"    
                                       'присваиваем формат таблицы созданной строке данных  
                                       iSheetItog.Range("B" & iRowItog + 1 & ":" & "D" & iRowItog + 1).Copy  
                                       iSheetItog.Range("B" & iRowItog1 & ":" & "D" & iRowItog1).Pas
Страницы: 1
Наверх