Hi,
I created a pushbutton with following code:

Private Sub CommandButton4_Click()
ActiveWorkbook.Close
End Sub

When I click I am asked if I want to save the workbook....
Tha idea is, when clicking the button, ALWAYS save the wrokbook and close
excel.

What code should I add?

Thanks

Hi
try
Private Sub CommandButton4_Click()
activeworkbook.save
application.quit
end sub

--
Regards
Frank Kabel
Frankfurt, Germany

"Jean-Paul De Winter" schrieb im Newsbeitrag
...
Hi,
I created a pushbutton with following code:

Private Sub CommandButton4_Click()
ActiveWorkbook.Close
End Sub

When I click I am asked if I want to save the workbook....
Tha idea is, when clicking the button, ALWAYS save the wrokbook and
close
excel.

What code should I add?

Thanks

great... just what I wanted
Thanks
JP
"Frank Kabel" schreef in bericht
...
Hi
try
Private Sub CommandButton4_Click()
activeworkbook.save
application.quit
end sub

--
Regards
Frank Kabel
Frankfurt, Germany

"Jean-Paul De Winter" schrieb im Newsbeitrag
...
Hi,
I created a pushbutton with following code:

Private Sub CommandButton4_Click()
ActiveWorkbook.Close
End Sub

When I click I am asked if I want to save the workbook....
Tha idea is, when clicking the button, ALWAYS save the wrokbook and
close
excel.

What code should I add?

Thanks