|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
09.06.2011, 13:08 | #1 |
Пользователь
Регистрация: 15.11.2009
Сообщений: 65
|
Запуск макроса из формы
Добрый день. Есть такой макрос:
Sub Макрос1() Application.ScreenUpdating = False r = Cells(Rows.Count, 2).End(xlUp).Row For i = 4 To r Sheets("Данные").Cells(i, 1).Value = "x" Sheets("Бланк").Copy After:=Sheets("Бланк") Cells.Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False ActiveSheet.Name = Sheets("Данные").Cells(i, 2) Sheets("Данные").Cells(i, 1).Value = "х" Next i Sheets("Данные").Select Application.ScreenUpdating = True End Sub Макрос формирует бланки,беря данные из таблицы на листе"Данные". На данный момент он запускается из листа "Данные",хотелось бы запускать его из формы,но при работе макроса он выдает ошибку "1004" и выделяет строку ActiveSheet.Name = Sheets("Данные").Cells(i, 2) При запуске из других листов тоже не срабатывает... Помогите пожалуйста довести до ума. |
09.06.2011, 13:27 | #2 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
У меня и из формы один раз отработал.
На второй раз ругнулся на эту строку, ибо такое имя уже есть. Если запускать из формы, нужно указать, чьи это cells: Код:
Код:
Код:
Код:
webmoney: E265281470651 Z422237915069 R418926282008
Последний раз редактировалось Hugo121; 09.06.2011 в 13:37. |
09.06.2011, 13:47 | #3 |
Пользователь
Регистрация: 15.11.2009
Сообщений: 65
|
А ведь заработало.. Спасибо большое!
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Запуск макроса | kaa1977 | Microsoft Office Excel | 5 | 12.04.2011 10:44 |
Запуск макроса | Gvaridos | Microsoft Office Excel | 4 | 22.11.2010 11:35 |
Запуск макроса | serafim09 | Microsoft Office Excel | 9 | 03.09.2009 16:55 |
Запуск макроса по событию | tim13 | Microsoft Office Excel | 5 | 17.08.2009 13:33 |
Запуск макроса с параметрами из другого макроса | Saladin | Microsoft Office Excel | 2 | 19.01.2009 09:43 |