![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#41 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
Ну давай.
Только я скоро домой, так что будет пауза... Распиши подробно, что нужно сделать - от этого макрос будет сильно зависеть ![]()
webmoney: E265281470651 Z422237915069 R418926282008
|
![]() |
![]() |
![]() |
#42 |
Пользователь
Регистрация: 15.03.2011
Сообщений: 35
|
![]()
Открыл новую книгу в ней открыл основн.табл.,создал макрос,ввёл твой код
Код:
Run time error '9': Subscript out of range. До этого ругался на вот эту строчку : Set gottabl = Workbooks("2_готовая табл.xlsx") |
![]() |
![]() |
![]() |
#43 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
Надо видеть, на какой строке ошибка, вернее на что именно ругается.
Тут должно ругаться: Код:
Код:
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 18.03.2011 в 18:25. |
![]() |
![]() |
![]() |
#44 |
Пользователь
Регистрация: 15.03.2011
Сообщений: 35
|
![]()
Всё расписал во вложенном файле.Раньше не мог войти,сервер перегружен был судя по всему.
|
![]() |
![]() |
![]() |
#45 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
Так ведь в http://www.programmersforum.ru/showp...4&postcount=34
уже всё это реализовано. Там только обратите внимание на строки: "Т.к. так и не определились, как подвязаться к файлу "2_готовая табл.xlsx", то я сделал как мне проще: Set gottabl = Workbooks("2_готовая табл.xlsx") т.е. эта книга тоже уже должна быть открыта." Но сейчас на всякий случай ещё перепроверю на приложенных файлах... Да, всё работает без переделок. Только важно - в строке Set gottabl = Workbooks("2_готовая табл.xlsx") должно быть указано имя Вашего сводного файла, он должен быть открыт, и код нужно запускать при активном листе с обрабатываемыми данными.
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 18.03.2011 в 23:29. |
![]() |
![]() |
![]() |
#46 | |
Пользователь
Регистрация: 15.03.2011
Сообщений: 35
|
![]() Цитата:
|
|
![]() |
![]() |
![]() |
#47 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
![]()
У меня открывается...
Это 34-е сообщение этой темы. Берите код целиком и помещайте в любой стандартный модуль. Хотя может и вообще в любой можно, не проверял.
webmoney: E265281470651 Z422237915069 R418926282008
|
![]() |
![]() |
![]() |
#48 |
Пользователь
Регистрация: 15.03.2011
Сообщений: 35
|
![]()
Всё код откомпилировался чистенко вроде)
Компилировал в 1_почти_готовая.. Дальше его нужно сохранить или как? |
![]() |
![]() |
![]() |
#49 |
Пользователь
Регистрация: 15.03.2011
Сообщений: 35
|
![]()
Пробовал.
Всё запустилось,но не подходит,так как данные не правильные. Как мне просто выгрузить в туже книгу где и начальные данные? Или можно только в новую? |
![]() |
![]() |
![]() |
#50 | |
Пользователь
Регистрация: 15.03.2011
Сообщений: 35
|
![]() Цитата:
Прошу прошения,что проигнорировал. Только попробовал ваш код.Просмотрел но не понял его.) Как убрать кнопку Жми меня. Кнопку я попробую вывести потом на панель управления. И если не трудно объясни как после выгрузки сделать сводную таблицу) |
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Макрос группировки данных в таблице | magana | Microsoft Office Excel | 1 | 28.01.2011 23:52 |
Обновление данных из табл в др. | Ал3 | Microsoft Office Access | 1 | 04.07.2010 00:27 |
Результат перевода из 10й сис-мы в 16-ю занести в табл(10-е число - 16), до тех пор пока не будет введено | Maemi_IT | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 1 | 11.01.2010 21:27 |
Кол-во данных в таблице | dani92 | БД в Delphi | 1 | 02.04.2009 07:58 |
Как выпонить действия по двойному слику на созданной таблице | Tiolic | Общие вопросы Delphi | 2 | 21.06.2007 09:53 |