Копирование в Excel - Microsoft Office Excel

Igorka_81 · 03.05.2011, 00:42

Доброе время суток!!!

Помогите пожалуйста я новичок в программировании VBA!!!
Пробовал скопировать данные из одного листа в другой в Excel с помощью записи макросов, макрос работает. Сделал кнопку и пытался к ней привязать скопированный макрос? выдает ошибку Run-time error '1004' не могу понять причину

вот исходный код

Private Sub CommandButton1_Click()
Sheets("Фин").Select
range("M29").Select
Selection.Copy
Sheets("Авизо").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False

End Sub

Заранее спасибо

Igorka_81 · 03.05.2011, 01:10

архив прилагаю

R Dmitry · 03.05.2011, 01:56

Цитата:

Сообщение от Igorka_81

архив прилагаю

Код:

Private Sub CommandButton1_Click()
Range("F7") = Sheets("Фин").Range("M29")
Range("F9") = Sheets("Фин").Range("N29")
 End Sub

03.05.2011, 00:42	#1
Igorka_81 Новичок Джуниор Регистрация: 02.05.2011 Сообщений: 2	Копирование в Excel Доброе время суток!!! Помогите пожалуйста я новичок в программировании VBA!!! Пробовал скопировать данные из одного листа в другой в Excel с помощью записи макросов, макрос работает. Сделал кнопку и пытался к ней привязать скопированный макрос? выдает ошибку Run-time error '1004' не могу понять причину вот исходный код Private Sub CommandButton1_Click() Sheets("Фин").Select range("M29").Select Selection.Copy Sheets("Авизо").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False End Sub Заранее спасибо

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Копирование таблицы Excel в MS-Word	rakushka108	Microsoft Office Word	2	13.04.2011 09:45
Копирование с условием (Макрос Excel)	Gvaridos	Microsoft Office Excel	0	09.12.2010 11:44
Копирование Word из в Excel	Юрийpirs2008	Microsoft Office Excel	2	31.12.2008 05:11
Копирование из Excel в Access	Ranel	Microsoft Office Excel	2	01.11.2008 09:38