PDA

View Full Version : Solved: Share a workbook without a prompt



Poundland
07-30-2008, 08:57 AM
Guys,

I need your help once again, I have written some code to share a workbook, but my code asks for a prompt each time.
How can I modify the code so that it will simply overwrite the saved workbook with the shared workbook without prompting the user.

With ActiveWorkbook
.KeepChangeHistory = True
.ChangeHistoryDuration = 30
End With
ActiveWorkbook.SaveAs Filename:= _
"I:\H925 Buying\BuyingTeamsALL\New Essentials Availability Report\2008-2009\07) July 2008\Essentials Availability Report 3007.xls" _
, AccessMode:=xlShared

Thanks in advance for your swift response.

Oorang
08-07-2008, 06:22 AM
Application.DisplayAlerts = False
'Your code here.
Application.DisplayAlerts = True