Code: Select all
Dim a As Currency, b As Currency, c As Currency, d As Currency
a = wb1.Range("I56").Value
b = wb0.Range("I500").End(xlUp).Value
c = wb1.Range("J56").Value
d = wb0.Range("J500").End(xlUp).Value
wb1.Range("I56") = sum existing value (a) & b
wb1.Range("J56") = sum existing value (c) & d
I need to adjust the value in a to incorporate the value of b, likewise for c & d, as values, not formulas.
How is the best way to achieve this?