Добрый день!
Начала недавно осваивать VBA, поэтому если мой вопрос глупый - прошу прощения.
Мне необходимо скопировать данные с активного (рабочего) листа и вставить на другой лист в определенное место, не переключаясь на этот лист.
Определить позицию (место куда скопировать данные) я смогла вот так, и сразу проверила корректность:
| Код |
|---|
RowInReport = Sheets("Отчет").Cells(Rows.Count, 1).End(xlUp).Row
Sheets("Отчет").Cells(20, 1).Value = RowInReport |
Но, вставить диапазон данных не вышло(
1-й нерабочий способ:
| Код |
|---|
Dim rg As Range
Set rg = Range(Cells(2, 1), Cells(colRow - 1, 1))
rg.Copy Sheets("Отчет").Range(Cells(RowInReport, 1)) |
2-й нерабочий способ:
| Код |
|---|
Sheets("Отчет").Range(Cells(RowInReport, 1)).Select
Selected.Paste |
Подскажите, пожалуйста, в чем ошибка.
