button that opens open dialogs but saves path to sheet
Hi Cereldine,
try this:
sub GetPath
dim pathandfilename as variant
pathandfilename=application.getsaveasfilename
if pathandfilename=false then
msgbox "User quits the dialog"
else
msgbox "The path is: " & pathandfilename
end if
end sub
this gives you the path and filename or false when user quits the
dialog.
Regards,
Ivan
|