Задача состоит в том, чтобы скопировать определенный диапазон текущего листа, открыть другую книгу, и вставить эти скопированные данные в определенную ячейку, сохранить этот файл и закрыть. Что собственно макрос и делает. Что в нём дописать, чтобы вставлялись только значения ?
У самого ничего не получается.
Вот код:
У самого ничего не получается.
Вот код:
Код |
---|
Sub Kopirovanie() ' ' Kopirovanie Макрос ' 'Выделить диапазон который необходимо скопировать Range("Таблица1").Select 'Скопировать то, что выделено Selection.Copy ChDir "C:\Users\Oleg\Desktop" Workbooks.Open Filename:="Книга2.xlsm" 'Выделить начальную ячейку в которую необходимо вставить скопированные данные Range("A2").Select 'Вставить данные ActiveSheet.Paste 'сохранить текущую книгу ActiveWorkbook.Save 'Закрыть книгу ActiveWorkbook.Close End Sub |