VBA Copy Cells Referenced in Workbook

[josephteh]

Hi All

I need a VBA to copy cell referenced in cell B1 to cell referenced in cell B2 as per workbook attached.

Thank you.
Joseph

[CheeseSandwich]

Potentially would not need copy, the below would be faster if using a lot:

Range("F3").Value = Range("E1").Value

Or are you after taking the range references from the worksheet?

[josephteh]

Thank you CheeseSandwich! Sorry, I forgot to mention.. cells referenced in cells B1 and B2 are subject to change.

[CheeseSandwich]

lol was that a trick, you highlighted J3 but I3 was the destination cell

try:

Sub CopyCell()
    Dim fRng As Range, tRng As Range
    
    Set fRng = Range(Range("B1").Value)
    Set tRng = Range(Range("B2").Value)
    tRng = fRng
End Sub

[josephteh]

Thanks CheeseSandwich! Works like a charm! And, I have managed to shorten it to:

Range(Range("B2").Value) = Range(Range("B1").Value)

Here's a Rep for you!

[CheeseSandwich]

Thanks CheeseSandwich! Works like a charm! And, I have managed to shorten it to:

Range(Range("B2").Value) = Range(Range("B1").Value)

Here's a Rep for you!

Thanks for the Rep,

It is shorter but shorter is not always better - I like to define everything as I find it easier to read later on - it's an each to their own thing...

Happy to help