Получение пасты из определенной ячейки

Question

я хочу скопировать диапазон, начиная с ячейки B до ячейки N в столбцах, но в строках он может доходить до 1000. Я хочу макрос, который начинает вставлять любые данные из B:10 и больше нигде.PS Данные являются динамическими, которые доступны для просмотра пользователю на основании их Id-пароля.

Sub Portfolio()
'
' Portfolio Macro
'

'
    Sheets("Master").Select
    Selection.End(xlToLeft).Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.AutoFilter
    Range("Table1[[#Headers],[CRN]]").Select
    Selection.End(xlToRight).Select
    ActiveSheet.ListObjects("Table1").Range.AutoFilter Field:=13, Criteria1:= _
        "TRUE"
    Selection.End(xlToLeft).Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    ActiveSheet.Previous.Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    ActiveSheet.ListObjects.Add(xlSrcRange, Range("$B$10:$N$1000"), , xlYes).Name = _
        "Table2"
    Range("Table2[#All]").Select
    ActiveSheet.ListObjects("Table2").TableStyle = "TableStyleLight9"
    Range("Table2[[#Headers],[CRN]]").Select
End Sub

Я создал этот макрос, но когда я дал указатель на любую другую ячейку ячейки, а не на ячейку B:10, данные начинают копироваться оттуда.

Answer 1

... Я хочу макрос, который начинает вставлять любые данные из B:10 и больше нигде.

Для этого добавьте строку

Range("B10").Select

как раз перед

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False

Это заставит вставку начинаться в B10 .