Closing a File

Mike E Golding

Board Regular
Joined
Mar 7, 2002
Messages
71
I run a Macro from a button to close Excel which is OK when I have only one file open. I can't create a Macro to close just the current file. (With the offer to save)Some help would be great, thanks.
 

Excel Facts

Whats the difference between CONCAT and CONCATENATE?
The newer CONCAT function can reference a range of cells. =CONCATENATE(A1,A2,A3,A4,A5) becomes =CONCAT(A1:A5)
On 2002-03-08 22:08, Mike E Golding wrote:
I run a Macro from a button to close Excel which is OK when I have only one file open. I can't create a Macro to close just the current file. (With the offer to save)Some help would be great, thanks.


Activeworkbook.Close

Ivan
 
Upvote 0
...Or

Sub CloseOrQuit()
Dim IwbCount As Integer
On Error Resume Next

IwbCount = 2
If Workbooks("Personal.xls") Is Nothing Then
IwbCount = 1
End If

On Error GoTo 0
If Application.Workbooks.Count > IwbCount Then
ActiveWorkbook.Close
Else
Application.Quit
End If

End Sub

_________________
Kind Regards
Dave Hawley
OzGrid Business Applications
Microsoft Excel/VBA Training
If it's Excel, then it's us!
This message was edited by Dave Hawley on 2002-03-09 01:35
 
Upvote 0

Forum statistics

Threads
1,213,531
Messages
6,114,172
Members
448,554
Latest member
Gleisner2

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top