copy values from current area to other area using indirect addressing

I have form with check boxes - it's current area. I fill the form and I want to save the values (let's say it is A1:P50) to store!A1:P:50 the same workbook - storage area.
Is it possible to use target addressing in the cell?
I see this like that:
1. I fill the form, it is the ticking check boxes and automated change of values in the area current!A1:P50
2. write address in the cell current!R1. The address is store!A1:P:50 at this time
3. execute a macro. Macro makes copy values from current!A1:P50 to store!A1:P:50 using value of current!R1 as target address.

How to use cell value in the macro?

macro looks like that:
Sub copy1()
' copy values
Range("A1:P50").Select
Selection.copy
Sheets("store").Select

' I need to take "Range" from current!R1

Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
I need to take target range from the cell current!R1. I want to use variable range

the macro:
Sub copy_04()
' copy_1
Dim MyWs As Worksheet
Dim area As Variant
Set MyWs = Worksheets("current")
area = MyWs.Range("R1").Value
Sheets("current").Select
Range("A1:P50").Select
Selection.copy
Sheets("store").Select
Range(area).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
takes value of cell current!R1 as target for pasting copied values.