Paste Values issue

[dwg83]

Below you will find my code. I am trying to just paste the values in the cells that I just copied.

        For i = 0 To 4
            FrontPage.Range(FrontPage.Cells(UtilityRow, 79 + (i * 4)), FrontPage.Cells(UtilityRow, 82 + (i * 4))).Copy
            Range(Cells(12 + i, 1)).PasteSpecial Paste:=xlPasteValues
        Next i

The error that occurs is:

Method 'Range' of object '_Global' failed

Thanks for any help

 

[Biz]

Try code below

For i = 0 To 4
    With FrontPage.Range(FrontPage.Cells(UtilityRow, 79 + (i * 4)), FrontPage.Cells(UtilityRow, 82 + (i * 4)))
            .Value = Range(Cells(12 + i, 1)).Value
    End With
 Next i

Does it work?

Biz