Automatic Paste Values

[Mike TheSpike]

Hi All,

I need a macro which is "event-driven" meaning whenever there's a change in cell C1(has formula) it will automatically pasted into cell D2(paste values).
Ex:
C1 =TEXTJOIN(", ", TRUE, B6:B43)
D1 = C1 (paste value)

Thanks,
Mike

 

[Zot]

Perhaps something like this. Need to put under the sheet of interest, not in normal macro module.

Private Sub Worksheet_Calculate()

If Not Range("D1") = Range("C1") Then
    Range("C1").Copy
    Range("D1").PasteSpecial (xlPasteValues)
    Application.CutCopyMode = False
End If

End Sub

 

[Mike TheSpike]

Zot,​

Perfect! Thank you so much. you saved my day.

 

[Zot]

Zot,​

Perfect! Thank you so much. you saved my day.

Thanks for the update. You're welcomed