How would you set the value of a Range Object to a specific range from a specific sheet?

I have code right now that navigates and activates the correct sheet and cell, but when I set the value of the range, and copy, it ends up copying a range from Sheet 1 when I want it to take a value from another sheet.

Here is the code I have right now when trying to set the Range.

```
    Dim NewValuesRange As Range
    Dim ActiveCellRowNumber As Integer
    Sheets(err).Activate
    Set NewValuesRange = Range(Cells(ActiveCellRowNumber - 1, 1), Cells(ActiveCellRowNumber - 1, 18))
    NewValuesRange.Copy
    NewValuesRange.Insert Shift:=xlDown

```

I've tried setting line four as:

```
    Set NewValuesRange = Sheets(err).Range(Cells(ActiveCellRowNumber - 1, 1), Cells(ActiveCellRowNumber - 1, 18))

```

and 

```
    Set NewValuesRange = Worksheet(sheetname).Range(Cells(ActiveCellRowNumber - 1, 1), Cells(ActiveCellRowNumber - 1, 18))

```

However, those two give me an 1004 error. Any idea's on how to tackle this?

Thanks!

EDIT: err is an integer already set, activecellrownumber is an integer already set, and sheetname is a string that has been set.