I'm running the following code:
If .Range("E" & RowCount) = CatArray(CatArr) Then
.Range("D" & RowCount).Copy
.Paste Destination:=Worksheets _
(MonthArray(MonthArr)).Cells _
((RowCount + 19 + CatArr), (Day + 3))
End If
Which works fine. But I want to paste special values except when I try this:
If .Range("E" & RowCount) = CatArray(CatArr) Then
.Range("D" & RowCount).Copy
.PasteSpecial xlPasteValues Destination:=Worksheets _
(MonthArray(MonthArr)).Cells _
((RowCount + 19 + CatArr), (Day + 3))
End If
I'm getting a syntax error. How do I make this work?
Bookmarks