Syntax for Copy / Paste Range using Cells?

[JazzSP8]

Hey All

I can't seem to get the syntax right for this and I'm at the point where I'm understanding it less the more I read :/

I'm trying to copy from one worksheet to another with a variable paste range but I can't seem to get the paste part to work, this is what I originally thought would work but doesn't;

                            If Cells(i, "N").Value = "Suggested" Then
                                Range("P" & i).Copy Destination:=Worksheets("Alts and Accessories").Range(Cells(CopyTo, Sug))
                                Sug = Sug + 1
                            End If

With the variables CopyTo and Sug holding the row and column variables I want to paste into.

Can someone help with the correct way of referencing one cell for the "paste" part?

Thanks for looking.

 

[JazzSP8]

Never mind, worked it out...

                            If Cells(i, "N").Value = "Suggested" Then
                                Range("P" & i).Copy Destination:=Sheets("Alts and Accessories").Range(Sheets("Alts and Accessories").Cells(CopyTo, Sug), Sheets("Alts and Accessories").Cells(CopyTo, Sug))
                                Sug = Sug + 1
                            End If

Soon as I hit submit I saw the problem :/

Thanks anyways

 

[steve the fish]

If you are just using the one cell you dont need the Range part in there. You also need to qualify Cells with the worksheet. So

Worksheets("Alts and Accessories").Cells(CopyTo, Sug)

 

[JazzSP8]

If you are just using the one cell you dont need the Range part in there.

Ha. Even better - Thanks!