Нужно выбрать диапазон для копирования - PullRequest
0 голосов
/ 28 октября 2019

Используйте приведенный ниже код для копирования вставки с одного листа на другой в той же книге. Это работает, но мне нужно скопировать на лист «Отчет должников» только из ячейки A10.

Sub filetering_kam()

    Sheets("RAW DATA FILE").Select
    ActiveSheet.Range("$A$1:$N$5000").AutoFilter Field:=1, Criteria1:=Sheets("main").Range("f11")
    Sheets("RAW DATA FILE").Columns("B:N").Copy
    Sheets("DEBTORS REPORT").Select
    ActiveSheet.Paste
    Sheets("DEBTORS REPORT").Columns("A:M").Select
    Sheets("DEBTORS REPORT").Columns("A:M").EntireColumn.AutoFit
    Sheets("debtors report").Range("A1").Select
    Sheets("RAW DATA FILE").Range("A1:N5000").AutoFilter
    Sheets("MAIN").Select
    MsgBox ("KAM Report Complete:" & " " & Range("f11"))


End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...