Новости
Видео
Microsoft
Windows 10
Железо
Программы
Форум

Имя пользователя:
Пароль:
 | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » VBA - Ошибка в макросе Excel

Ответить
Настройки темы
VBA - Ошибка в макросе Excel

Новый участник


Сообщения: 3
Благодарности: 0

Профиль | Отправить PM | Цитировать

Добрый день, форумчане. У меня такая проблема:
Есть две книги с данными, price и data требуется сравнить наименования в двух книгах и обновить данные в книге data. Т.е. перенести цену и количество из price. Написал такой простенький макрос, но при запуске он ничего не считает. Подскажите, где я ошибся

Sub Press_me()
Dim CompareRange1 As Variant, CompareRange2 As Variant, x As Variant, y As Variant
Set CompareRange1 = Workbooks("Data.xls").Worksheets("Sheet").Range("A2:A1175")
Set CompareRange2 = Workbooks("Price.xls").Worksheets("TDSheet").Range("D15:D600")
Workbooks("Data.xls").Worksheets("Sheet").Range("M2:M1175").Value = 0

For Each x In CompareRange1
indicator = 1
For Each y In CompareRange2
If x = y Then
Workbooks("Price.xls").Worksheets("TDSheet").cell(y, 2) = Workbooks("Data.xls").Worksheets("Sheet").cell(x, 11)
Workbooks("Price.xls").Worksheets("TDSheet").cell(y, -1) = Workbooks("Data.xls").Worksheets("Sheet").cell(x, 12)
End If

Next y
Next x
End Sub

Отправлено: 12:23, 08-09-2012

 

Ветеран


Сообщения: 27449
Благодарности: 8088

Профиль | Отправить PM | Цитировать

OlegSt, где примеры рабочих книг «price» и «data»?

Отправлено: 13:28, 08-09-2012 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

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


Новый участник


Сообщения: 3
Благодарности: 0

Профиль | Отправить PM | Цитировать

Вложения
Тип файла: xlsx Price.xlsx
(9.1 Kb, 10 просмотров)
Тип файла: xlsx Data.xlsx
(9.6 Kb, 12 просмотров)

Вот примеры файлов

Отправлено: 13:35, 08-09-2012 | #3


Ветеран


Сообщения: 27449
Благодарности: 8088

Профиль | Отправить PM | Цитировать

OlegSt, и что там с чем сравнивать?

Отправлено: 13:54, 08-09-2012 | #4


Новый участник


Сообщения: 3
Благодарности: 0

Профиль | Отправить PM | Цитировать

Собственно сравниваются столбцы D в книге price и А в книге Data, если совпадение находится, то цену из столбца F книги Price копируем в книгу Data столбец L и так же обновляем количество, если совпадения не находятся, то ставим 0

Отправлено: 14:02, 08-09-2012 | #5


Ветеран


Сообщения: 27449
Благодарности: 8088

Профиль | Отправить PM | Цитировать

Цитата OlegSt:
Собственно сравниваются столбцы D в книге price и А в книге Data, если совпадение находится, »
Что ж Вы тогда подобрали такие примеры, что совпадений нет?

Цитата OlegSt:
если совпадения не находятся, то ставим 0 »
Куда ставим 0?

Отправлено: 18:20, 08-09-2012 | #6



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » Программирование и базы данных » VBA - Ошибка в макросе Excel

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Разное - Диспетчер сценариев Excel – внутренняя ошибка Доярка Microsoft Office (Word, Excel, Outlook и т.д.) 0 05-01-2012 08:14
2010 - Excel 2010 и странная ошибка при запуске MSVCR90.dll r-studio Microsoft Office (Word, Excel, Outlook и т.д.) 8 17-12-2011 12:34
2007 - Ошибка при установке EXCEL illusionmgs Microsoft Office (Word, Excel, Outlook и т.д.) 8 20-10-2011 19:36
C/C++ - Ошибка при закрытии Excel из под Builder 6! SGKorotkow Программирование и базы данных 7 06-05-2008 10:06
Ошибка в Excel Guest Microsoft Windows 95/98/Me (архив) 2 17-03-2003 19:33


« Предыдущая тема | Следующая тема »


 
Переход