Hello,

I have a worksheet with several cells containing formulas which on occasion
the user needs to overwrite. The formula basicly says use the value of the
cell above it which is the case most of the time but in some cases its
different and the user enters the correct value instead.

I was thinking of having a button that when pressed copied the original
formulas from a range of cells elsewhere and put them back over top of the
ones they changed. How would I do this?

I am aware of the dragging procedure to get the formulas back from the cells
below or above By the way, I specifically want a "reset" button for other
users though.

Example

a b c
1 bob smith canada
2 joe =b1 =c1
3 kevin =b2 =c2
4 mary JONES =c3
5 John =b4 =c4

As you can see cell b4 was changed by the user to Jones.

Try the below macro which will rest the formulas in Column B and C. Adjust to
suit..

Sub Macro()
Dim lngRow As Long
lngRow = Cells(Rows.Count, "A").End(xlUp).Row
Range("B2:C" & lngRow).Formula = "=B1"
End Sub

If this post helps click Yes
---------------
Jacob Skaria


"Brian Thomas" wrote:

> Hello,
>
> I have a worksheet with several cells containing formulas which on occasion
> the user needs to overwrite. The formula basicly says use the value of the
> cell above it which is the case most of the time but in some cases its
> different and the user enters the correct value instead.
>
> I was thinking of having a button that when pressed copied the original
> formulas from a range of cells elsewhere and put them back over top of the
> ones they changed. How would I do this?
>
> I am aware of the dragging procedure to get the formulas back from the cells
> below or above By the way, I specifically want a "reset" button for other
> users though.
>
> Example
>
> a b c
> 1 bob smith canada
> 2 joe =b1 =c1
> 3 kevin =b2 =c2
> 4 mary JONES =c3
> 5 John =b4 =c4
>
> As you can see cell b4 was changed by the user to Jones.