Variable cell reference

[Gusher]

The code below copy and pasts data to a cell AO1. I now wish to amend the code so that the destination cell that the data is copied to becomes a variable. The destination cell is calculated in a cell called "cell ref" so that if "cell ref" is equal to AA1 I want the macro to paste the data to cell AA1. Range.("Edit_Portfolio_Data_Range").Select
Selection.Copy
Sheets("Portfolios").Select
Range("AO1").Select
Selection.PasteSpecial Paste:=xlPasteValuesAndNumberFormats, Operation:= _
xlNone, SkipBlanks:=False, Transpose:=False
Sheets("Interface").Select
Range("Interface_Home").Select
End Sub

 

[VoG]

Try

Range("Edit_Portfolio_Data_Range").Copy
Sheets("Portfolios").Range(Range("cell ref").Value).PasteSpecial Paste:=xlPasteValuesAndNumberFormats
Sheets("Interface").Select
Range("Interface_Home").Select
End Sub

 

[Gusher]

Thanks VoG, that worked .