After my macro runs (and does a "file save as" automatically) I want a popup
message box to display with an OK or Continue button, and a simple message
stating that the file was saved or the process is complete. If you have
code that can verify that the file was saved that would be great. But if
that is not possible then just an example of how to get the box to appear and
exit the procedure when the button is pressed will work.

This is my save routine if it helps you be more specific in the example
code. I just steal bits and pieces from posts so it is probably messy
looking to real programmers.



'Procedure to save the Sales Workbook to the Sharepoint Library

Sub SaveWork()

Dim venname As String
Dim vennumber As String
Dim venyear As String
Dim venperiod As String

venname = Worksheets("Sales").Range("B2")
vennumber = Worksheets("Sales").Range("B3")
venyear = Worksheets("Data").Range("J15")
venperiod = Worksheets("Data").Range("J16")

ActiveWorkbook.SaveAs
Filename:="HTTP://teams.kedc.org/mst/Sales_Reports/" & venname & "_" &
vennumber & "_" & venyear & "_" & venperiod & ".xls"
End Sub

Any help is greatly appreciated.