View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
GS[_2_] GS[_2_] is offline
external usenet poster
 
Posts: 3,514
Default 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