Code:
Dim i As Integer
Dim j As Integer

With ActiveWorkbook.Worksheets("Sheet1").Range("A" & i & ":K" & j)
i and j would change depending on what you were doing at the time.