R
Robin Hammond
Larry,
just use a combination of ChDrive and ChDir as follows:
Sub SaveInDir()
ChDrive "c:"
ChDir "c:\Temp"
strFile = Application.Dialogs(xlDialogSaveAs).Show
End Sub
Robin Hammond
www.enhanceddatasystems.com
just use a combination of ChDrive and ChDir as follows:
Sub SaveInDir()
ChDrive "c:"
ChDir "c:\Temp"
strFile = Application.Dialogs(xlDialogSaveAs).Show
End Sub
Robin Hammond
www.enhanceddatasystems.com