ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   How to add a button to restore all altered cells original values? (https://www.excelbanter.com/excel-discussion-misc-queries/1035-how-add-button-restore-all-altered-cells-original-values.html)

Dawnybros

How to add a button to restore all altered cells original values?
 
I want to add a reset button to an excel spreadsheet that will restore the
values of all changed cells to the original saved ones.

Any help would be appreciated.

Thanks

Dawn

Frank Kabel

Hi
this would require quite some VBA code as you somehow have to store the
original values for example on a separate hidden sheet

--
Regards
Frank Kabel
Frankfurt, Germany

"Dawnybros" schrieb im
Newsbeitrag ...
I want to add a reset button to an excel spreadsheet that will

restore the
values of all changed cells to the original saved ones.

Any help would be appreciated.

Thanks

Dawn



GregR

Not sure this is what you want, but this macro will revert the file to the
last saved version.
Sub RevertFile()

wkname = ActiveWorkbook.path & "\" & ActiveWorkbook.Name
ActiveWorkbook.Close savechanges:=False

Workbooks.Open FileName:=wkname

End Sub

Greg
"Frank Kabel" wrote in message
...
Hi
this would require quite some VBA code as you somehow have to store the
original values for example on a separate hidden sheet

--
Regards
Frank Kabel
Frankfurt, Germany

"Dawnybros" schrieb im
Newsbeitrag ...
I want to add a reset button to an excel spreadsheet that will

restore the
values of all changed cells to the original saved ones.

Any help would be appreciated.

Thanks

Dawn






All times are GMT +1. The time now is 06:44 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com