Ankur,

In XL 2003 I got this by running the Macro Recorder (and saving the macro in
another workbook):

With ActiveWorkbook
.KeepChangeHistory = True
.ChangeHistoryDuration = 100
End With

hth,

Doug

"an01digital" wrote in message
ups.com...

Hi Experts,


I am trying to create a macro to open various files with a loop and to
share the files with "Keep Change History For" set to 100 days instead
of default 30 days.

I think I can share a workbook by using ExclusiveAccess Method. But I
am not sure, what property I need to change to set "Keep Change
History For" days to 100 Days.

Any help is deeply appreciated.

Many Thanks
Ankur