application.run in standalone mode by VBA

Ask Question Forum:

Model Library:2025-02-08 Updated:A.I. model is online for auto reply question page

Show

ASK RECENT

application.run in standalone mode by VBA

Asked by duncanb7

at 2024-08-06 06:37:59

Point:250 Replies:3 POST_ID:828364USER_ID:11059

Topic:

Microsoft Excel Spreadsheet Software;Visual Basic Programming;Miscellaneous Programming

I have two questions, hope you can help

Question-1
When open new excel application in my VBA code and using application.run to
run the new excel window application module, "'newexcel.xls'!S_main" but
it will take some time to finish the task and the main.xls with VBA code and excel
file is hang-up to stop any editing until
the application is finished. The question is that how can I let the the application.run
function running in background task that won't affect my vba or excel editing or doing
other job in the orginal VBA file, main.xls
'Main.xls file with VBA code
Sub main()
Dim ex As New Excel.Application
ex.Run "'newexcel.xls'!S_main"
ex.ActiveWorkbook.Save
ex.quit
end sub

Question-2, From the question-1 above, I think using Shell command might
be working that won't affect operation of original main.xls file because no any
excel application command involve. RIght ? Could shell command call the
newexcel.xls!Smain module instead of program of newexcel.xls

Please advise

Duncan

Author: duncanb7 replied at 2024-08-06 20:34:49

I tried the shell command , the excel is opened and it can open the file without S_main
module name invlove but can't
run S_main module by the command. Please comment these for the following code .

Application.run can run the module but shell comand is only running the file not module, Right ?

Sub test()
Dim wkdir As String
Dim datafilename As String

Application.ScreenUpdating = False
wkdir = ActiveWorkbook.Path
datafilename = wkdir & "'newexcel.xls'!S_main"
Debug.Print datafilename
Shell "C:Program FilesMicrosoft OfficeOFFICE11Excel.exe " & datafilename, vbNormalFocus '''''''THe error can't find the file """

End Sub

Author: duncanb7 replied at 2024-08-06 07:55:16

Accepted Solution

Expert: wobbled replied at 2024-08-06 07:02:32

250 points GOOD

新聞財經娛樂♬資訊 News Economy

About Us|Service|Pricing

Stock Index全球即時指數期貨:

&nbps;

News即時新聞:↓

News即時新聞:↑

On Balance Volume (OBV):

Youtube Video♬ Sharing by members:↓

Youtube Video♬ Sharing by members:↑

Ask Question Forum:

application.run in standalone mode by VBA

Your Information

Members/Profolio