ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Two Question (https://www.excelbanter.com/excel-programming/402229-two-question.html)

MarkS

Two Question
 
Hi,
I have this shell command in VBA
x = Shell("cmd.exe /c dir /Tw/S " & sPath & "*." & LCase(sFileExtension) &
" " & _
ThisWorkbook.Path & "\Directory.txt", 1)
which works fine, but i need to wait until it has finished running before
going to the next command

I use Sheets("Directory").Delete to delete this sheet but it asks if I
want to delete this sheets, how do I get rid of the message.

Thanks MarkS

Dave Peterson

Two Question
 
#1.

If you're lucky and you know that your .cmd file always takes less than x
seconds, you could add application.wait (x + 30% seconds)
(or whatever you feel comfortable with.)

But there are other ways.

http://support.microsoft.com/?kbid=214248
XL2000: How to Force Macro Code to Wait for Outside Procedure
or

Here's a link to a nice ShellAndWait function that does that.
http://groups.google.com/groups?thre...%40tkmsftngp03

#2.

application.displayalerts = false
'delete the sheet
application.displayalerts = true


MarkS wrote:

Hi,
I have this shell command in VBA
x = Shell("cmd.exe /c dir /Tw/S " & sPath & "*." & LCase(sFileExtension) &
" " & _
ThisWorkbook.Path & "\Directory.txt", 1)
which works fine, but i need to wait until it has finished running before
going to the next command

I use Sheets("Directory").Delete to delete this sheet but it asks if I
want to delete this sheets, how do I get rid of the message.

Thanks MarkS


--

Dave Peterson


All times are GMT +1. The time now is 06:28 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com