Bắt dán từ ô cụ thể

tôi muốn sao chép một phạm vi bắt đầu từ ô B sang ô N trong columms nhưng trong Hàng có thể lên tới 1000 tôi muốn một macro bắt đầu dán bất kỳ dữ liệu nào từ B: 10 và không ở đâu khác .PS Dữ liệu là động có thể xem được người dùng dựa trên Mật khẩu Id của họ.

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

Tôi đã tạo macro này nhưng khi tôi đưa con trỏ lên bất kỳ ô nào khác và không phải trên dữ liệu B: 10 bắt đầu sao chép từ đó.

... Tôi muốn một macro bắt đầu dán bất kỳ dữ liệu nào từ B: 10 và không ở đâu khác.

Để đạt được điều đó, thêm dòng

Range("B10").Select

ngay trước đó

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

Nó sẽ buộc dán để bắt đầu tại B10.