Страница: 1 |
Не удается скопировать данные из одного листа в другой. Код примерно такой: где ws и wsThis есть Worksheet: ws.Activate В результате получаю ошибку: Метод Paste из класса Worksheet завершен неверно. Помогите, пожалста. Может нужно как то по другому это делать?
Страница: 1 |
Вопрос: Не удается скопировать ячейки
Добавлено: 25.05.04 11:44
Автор вопроса: bojo | ICQ: 167189600
ws.Range(ws.Cells(2, 1), ws.Cells(maxCount, 12)).Select
Selection.Copy
wsThis.Activate
wsThis.Cells(2, 10).Select
wsThis.Paste
Ответы
Всего ответов: 2
Номер ответа: 1
Автор ответа:
OAN
Вопросов: 2
Ответов: 17
Профиль | | #1
Добавлено: 25.05.04 19:50
Я с помощью записи макросов (меню Экселя "Сервис-Макрос-Начать запись" получил такой вариант, попробуй подобное:
Sub Macro3()
Range("G5:H9".Select
Selection.Copy
Windows("Книга2".Activate
Sheets("Лист2".Select
Range("B4".Select
ActiveSheet.Paste
End Sub
Номер ответа: 2
Автор ответа:
bojo
ICQ: 167189600
Вопросов: 1
Ответов: 1
Профиль | | #2
Добавлено: 27.05.04 07:53
Спасибо. Уже работает. Скорее всего дело было именно в строке Windows("Книга".Activate!