VBA To Exit Excel Application Not Only Workbook?
Feb 17, 2012
I have some code that I am using to save and close the active workbook, this code works perfectly, but I need the code to also close the excel application, not just the workbook. I have tried active window.close but it didn't work even though when I recorded the actions that was the code that I was give.
background -I set a task in my OS to open the workbook, then I wrote some code on the Workbook.open trigger to run and then save and close, but only the activebook closes.
View 2 Replies
ADVERTISEMENT
Apr 24, 2009
I would like to call upon a function until a certain criterion is fullfilled. Then, I would like to have the result returned to me and exit (all) open functions. For value1 = 1 and value2 = 10 I expect value1*value2 = 100. Instead, the routine returnz zero. What is the logical flaw in the code below.
Function testfunction(value1, value2)
If value1 = value2 Then
'Calculating the difference
testfunction = value1 * value2
Exit Function
ElseIf value1 < value2 Then
value1 = value1 + 1
Call testfunction(matrix1, matrix2)
End If
End Function
View 9 Replies
View Related
Mar 21, 2012
I have some code that does some maintenance on my workbook, calls a second macro to delete all of the VBA and saves it with a new name.
However, after it finishes and I try to exit Excel, I am still prompted to save the workbook. I'm not sure why because the last thing my code does is save the workbook and no additional changes have been made.
Code:
'Loop through all cells
For Each Sht In ThisWorkbook.Worksheets
With Sht
[Code].....
View 9 Replies
View Related
May 20, 2013
I'm trying to solve when hitting the Save/Close button on my Userform.
Give the User the option to Save As the toolGive the User the option to either exit or return after Save AsIf Exit - hide all but the first worksheet (in case they open with Macros DisabledClose/Exit
My current issue is when I click the button and choose Exit Yes then the form and workbook close, but Excel is still open. Is there a way to have Excel fully close if no other workbooks are open?
Code:
Private Sub cmbSaveAs_Click()
Dim sFilename
If MsgBox("Save the file?", vbYesNo) = vbYes Then
sFilename = Application.GetSaveAsFilename(fileFilter:="Excel Macro-Enabled Workbook (*.xlsm),*.xlsm")
[Code] .........
View 2 Replies
View Related
Nov 5, 2009
I am trying to sort a csv file through a VBScript. My problem is that Excel continues to run as a process on script completion. Running multiple variation of this script results in multiple instances of Excel being present in the WinXP Process Manager.
Set xlObj = CreateObject("Excel.Application")
xlObj.Visible = false
xlObj.Workbooks.Open "C:Test.csv"
xlObj.ActiveWorkbook.ActiveSheet.Range("A1").Sort xlObj.ActiveWorkbook.ActiveSheet.Range("A1"),,,,,,,0
xlObj.ActiveWorkBook.Save
xlObj.ActiveWorkBook.Close true
xlObj.quit
set xlObj = Nothing
As a second part to my question, is there any way to modify the code to allow multiple field sorts, i.e., A1 is Primary, C1 is secondary?
View 9 Replies
View Related
Dec 20, 2013
The macro does numerous things, including deleting the sheet that was active when it is called. If the sheet is not deleted, there is no crash. Otherwise, Excel crashes as soon as the VBA interpreter hits "Exit Sub". The Excel message is simply "Excel Stopped Working". The macro also saves the workbook before finishing, and the saved workbook opens just fine, but it's unacceptable to have to kill Excel and restart it every time (I am not the main user for this spreadsheet). I'm using Excel 2010 on Windows 7.
View 7 Replies
View Related
Jun 19, 2009
Ive got a script in which I call another script using the Application.Run method. The exact line is below:
Application.Run "'" & wb & ".xls'!save_case", sheetname, fieldvalue
The macro runs fine, but after that a different workbook becomes active. There are a couple more lines of code after the line above that don't get executed (ive tested this by putting a MsgBox command after it).
How do i pass control back to the starting subroutine? Or should it and there is something wrong with my code?
View 9 Replies
View Related
Apr 21, 2008
I've been informed that an excel workbook can be saved as a vba application -
View 3 Replies
View Related
Jul 28, 2009
I didn't receive a response to a previous post where I was trying to use a batch file to close and open a workbook at a scheduled time everyday. I was thinking about this problem over the weekend, and thought that it would probably be easier to just use a macro to close the file at a certain time everyday (if it is open) and then use a batch file to open the file a couple of minutes later.
I'm having problems with what I thought should be pretty simple though. I tried this to close the file at 5:15pm
View 14 Replies
View Related
Oct 22, 2011
I'm having some trouble getting control ENTER & EXIT events to fire properly when having controls embedded on frames within a userform. I'm using Excel 2003, 2007, & 2010. Here's the userforms I'm working with:
With FRAME:
Without FRAME:
In both cases, the DESCRIPTION field is disabled. The selectable controls on both are a combo-box, textbox, listbox, & 2 buttons. On the FRAMED version, the combo-box & textbox are contained on a FRAME.
Here's the code, same on both userforms:
Code:
Option Explicit
Private Sub cmbRecipes_Enter()
ListBox1.AddItem "ENTER - " & cmbRecipes.Value
End Sub
Private Sub cmbRecipes_Exit(ByVal Cancel As MSForms.ReturnBoolean)
ListBox1.AddItem "EXIT - " & cmbRecipes.Value
End Sub
All this is doing is posting a message to the listbox when the combo-box ENTER & EXIT events fire. This works as expected without the FRAME, ENTER is shown when the combo-box is entered and EXIT is shown as focus is moved to another control. But when running it on the FRAMED version all I get is a single ENTER event recorded regardless of how I move the focus through the control set.
Another oddity is that if I have more than 1 control that can receive focus on the FRAMED version, it appears to work correctly.
View 6 Replies
View Related
Sep 19, 2013
I have code that opens a .pdf file and copies the content to an excel spreadsheet.
However, in order to loop through multiple pdf's, I need to be able to close the Adobe Reader application before I open each new pdf file.
With excel being the active application, any suitable code to activate and close Adobe Reader?
View 1 Replies
View Related
Jun 15, 2014
Any way to auto-close the excel application after finishing my macro run?
I tried this code,but it doesn't work... i added a sub and ran it like this:
Sub CloseandSave()
ActiveWorkbook.Close SaveChanges:=True
End Sub
to be more specific,there is a macro running,closes all open workbooks,but excel itself stays open...
View 4 Replies
View Related
Nov 3, 2009
This relates to Excel for Mac 2004
I'm trying to use Application.FileSearch in a procedure to open files in a folder one by one and then do some stuff. It works fine when I developed it on my Windows machine but won't work on the Mac platform. The culprit instruction seems to be the
Application.FileSearch instruction, and I've also tried what I think may be a Mac equivalent Application.FileFind, but I get the 'Object doesn't support this action' error.
So I wrote a simple procedure below just to test the .FileSearch instruction but this fails in the same way.
Any ideas anyone? I've commented out lines which relate to Windows syntax.
View 12 Replies
View Related
Jun 26, 2007
The Application.FileSearch method is not available in excel 2007, is there a similar functionality I can use?
View 9 Replies
View Related
Sep 13, 2006
I hate to have to come back to the forum after I Thanked you all for solving my problem, but here I am.
The code below disables the (X) button, no problems
Option Explicit
Public BooleanForClosing As Boolean
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If BooleanForClosing = False Then
Cancel = True
MsgBox "Please Use Exit Button"
End If
End Sub
The next code saves the workbook , but won't Quit the programme and goes back to the Exit Button ...
View 3 Replies
View Related
May 28, 2014
I encountered a strange anomaly where a worksheet "freezes" when Application.DisplayFormulaBar = False. I can only replicate this in Excel 2013. Excel 2010, for example, works perfectly well, and as expected.
[Code].....
To replicate the anomaly (Excel 2013 only):
1. In a new workbook, insert an ActiveX command button on "Sheet1", no code required.
2. Run the following code
[Code] .....
3. Click on the command button.
4. Now click on any cell and try to enter a value.
Is your screen "frozen"? If so, go to another sheet, return to Sheet1 and try again. Does it work?
Here's an alternative code for MyTest() that causes no problems. Can spot the difference? Is there a reasonable explanation?
[Code] ....
Even more curious, call the following MyTest3 on Workbook_Open() and the workbook behaves. Run MyTest3 again and the screen starts freezing(!)
[Code] .....
View 3 Replies
View Related
Jul 3, 2009
I have a piece of code that was written by someone else (namely Phil_V, from these very forums) that only works in versions of Excel before 2007. I was just hoping that someone could update the code for me?
I know it's a lot to ask, but I simply don't have the expertise to do it myself I really appreciate any help received.
The code that needs updating is as follows:
View 10 Replies
View Related
Dec 20, 2009
I wrote a macro to list all the excel files from a directory and its sub-directories to an excel sheet. It is working in excel 2003 but shows error (object does not support this action) in 2007. Actually I have copied almost this entire macro from excel 2007 help only. Can somebody modify this to use in both the versions of excel?
View 6 Replies
View Related
Jun 24, 2007
For those who use Application.FileSearch in Excel and Access, it's a huge pain that the object has been hidden in Office 2007.
I spent some time looking around for alternatives and have found two so far.
1. A FileSearch class that you can add to your project. Instead of using Application.FileSearch, you reference FileSearch instead
2. You can also use VBScript.
View 9 Replies
View Related
Apr 11, 2012
Someone Im working with says she used to change Excel to work on it on some vertical monitor. Is there a way to do that in Excel 2010 or even 2007?
Obviously I'm not talking about print layout, but viewing the whole application in portrait view, as if she turned a monitor sideways and altered the Aps view.
View 6 Replies
View Related
Jul 20, 2012
How I can directly write info from an external application to an Excel sheet
Actually, I'm using a special dll collection to do it, but I would need to buy the 64 version soon. Problem is I use only one function of the entire collection so I want to look on how to create it my self. Basically, it took data from my charting software and write directly to my Excel Worksheet.Cell
View 3 Replies
View Related
Apr 3, 2014
I need to resize Excel pretty frequently - I need to size the whole Excel app tall and all the way to the left, taking up about a third of my screen - then maximize it - then back to tall and left, etc. I can do it by clicking the "Restore Down" icon in the top right corner, but I can't figure out how to do it using the keyboard.
I've tried Ctrl-F8, Ctrl-F9 and Ctrl-F10, but they all act on individual workbooks within the Excel application. I want to resize the whole Excel application. Does it exist?
View 3 Replies
View Related
Jul 23, 2013
I have the following code which edits an excel file and saves it in a different format, I think want the code to take this newly saved file and open it in an external application (Softplot) and then save it through this new application.
VB:
Sub FormatMacro1a(ws As Worksheet)
ws.Copy
Rows(1).Delete
Columns("D:E").Cut Destination:=Columns("J:K")
Columns("F:K").Cut Destination:=Columns("D:I")
Range("E1:E201").Value = "0"
[Code] .....
As it stands I have the file saving in a new format and I can open a specific file in softplot through VBA however where I am getting stuck is opening my newly saved file and then saving it.
I have tried the following :
VB:
Path = "C:Program FilesSoftPlot-8softplot.exe"
File = "ActiveWorkbook"
View 3 Replies
View Related
May 27, 2014
I am using Windows 7 and have a piece of code that brings up a warning message after 20 minutes to warn the user they have been in a workbook for too long.
If they have the Excel application window minimized, is there a way to get Excel to take the application out of minimized mode into max screen, before revealing the message.
Currently when the warning message activates, the excel icon just flashes in the start bar. Some users may not see this.
Here is the code I have so far:
[Code] ....
I have already tried simply adding a piece of code with maximize screen, however this doesn't seem to work.
View 2 Replies
View Related
Nov 23, 2011
I am trying to hide the excel 2010 application, open a csv file on a network drive, show the excel application.
The problem is a "Downloading" progress indicator appears, during the workbook open event I assume.
Code:
Sub Macro1 ()
Application.Visible = False
Application.DisplayAlerts = False
Workbooks.Open Filename:="S:LOGT5.CSV"
Application.Visible = True
Application.DisplayAlerts = True
I have seen the similar progress indicator during the "Save" event too. How to hide this?
View 3 Replies
View Related
Dec 7, 2011
I was wondering if it is possible to have cells formatted based on the presence of an autofilter? I have a large worksheet, and to clean it up I would like to make the entire sheet (minus the category headers) invisible. Then, when the user applies a filter, the cells become visible.
View 1 Replies
View Related
Nov 7, 2012
Am getting 1004- object or application undefined error in macro excel.
ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-4],[Book1]Sheet1!R1:R65536,4,FALSE)"
View 4 Replies
View Related
Jul 8, 2008
I’m simply trying to copy all the data on one sheet, open up a new excel application:
Set objExcel = CreateObject("Excel.Application")
objExcel.Workbooks.Add
and then paste all the information to the new workbook. When I try, the charts don’t paste, only the values and formats.
View 9 Replies
View Related
Jul 14, 2006
Im copying and pasting data from one workbook to another but when I want to close the source workbook, it comes up with this message that I have much data and if I want to keep this in a clipboard. I thought I could disable this with Application.DisplayAlerts = False but when I do this, Excel freezes. Im I doing something wrong. How can I supress this window?
Public path As String
Sub Get_data()
path = "\Nlchoosa.nlOPS_Processes$OPS_ProcessesReports Sector performance"
Workbooks.Open Filename:=path & "ReportsSector Performance Reporting week.xls"
Range("A1").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.copy
Windows("Sector Performance report Week.xls").Activate
ActiveSheet.Paste
Application.DisplayClipboardWindow = False
Windows("Sector Performance Reporting week.xls").Activate
Application.DisplayAlerts = False
End Sub
View 6 Replies
View Related
May 27, 2014
I cannot make this work in XL2010.
I am opening a second workbook in ReadOnly in the Workbook Open and Closing it in the Workbook BeforeClose.
I don't EVER want to save changes on either workbook.
I need to leave excel open as the macro created a 3rd workbook which the user will need.
[Code]....
View 6 Replies
View Related
