Resize Melompat

Sub test()

Range("B3:C3").Select
Selection.Offset(2, 2).Resize(Selection.Rows.Count + 2, Selection.Columns.Count + 1).Select


End Sub