Thread
:
Application.GetSaveAsFilename
View Single Post
#
2
Posted to microsoft.public.excel.misc
GS[_2_]
external usenet poster
Posts: 3,514
Application.GetSaveAsFilename
presented the following explanation :
Major novice requiring assistance.
Using the following for a button (very basic) but whilst it opens as expected
(save as) it doesn't actually save.
Sub Xxxxxx_SaveAs()
Application.GetSaveAsFilename
End Sub
I hear it may be a compatibility issue, but if anyone can provide an
alternative to solve my problem, it would be most appreciated.
Cheers
It does exactly what its name implies; it returns the filename you want
to save as. You actually have to save it using Application.SaveAs and
pass the filename obtained...
Dim vFileToSave As Variant
With Application
vFileToSave = .GetSaveAsFilename
If vFileToSave = False Then Exit Sub '//user cancels
.SaveAs Filename:=vFileToSave
End With 'Application
--
Garry
Free usenet access at
http://www.eternal-september.org
Classic
VB
Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.
vb
.general.discussion
Reply With Quote
GS[_2_]
View Public Profile
Find all posts by GS[_2_]