Range Variable show value of it in basic format

[GerrardSVK]

Hi everyone,

Is there any possibilty to simply write value of range variable into cell? See my code

Dim SpecifiedRange As Range

Set SpecifiedRange = Application.InputBox("Označ myšou v exeli z 3D rozsah kopírovania pre 1 kartu", Type:=8)

Dim Range1K As String

Range1K = SpecifiedRange.AddressLocal

Workbooks(1).Sheets(1).Range("C10").Value = Range1K

This Code will write down into cell C10 the range which I selected by mouse for this case Its A1:D4 see below.

$A$1:$D$4

But I need to put this information but not in format like this but just In format A1:D4
So In cell C10 after running the code will be writen A1:D4 instead of

$A$1:$D$4

Can anyone help?

 

[Peter_SSs]

Try

Range1K = SpecifiedRange.AddressLocal(0, 0)

 

[GerrardSVK]

Try

Range1K = SpecifiedRange.AddressLocal(0, 0)

It works thank you so much.

 

[Peter_SSs]

You're welcome. Thanks for the follow-up.