Thank you very much for the reply but Application.Wait does not work.
Paul,
I try to implement your method but the problem is the file is not created
yet. Can you tell me how to save the file I am creating to save
automatically in a directory? Whenevr I try to activate the new file it
does not activate and it goes for indefinite loop.
Here is my code:
Dim InitialName As String
Dim fileSaveName As Object
On Error Resume Next
InitialName = "C:\temp2\RN Data.xlsx"
WorkBookName = "RNsOutstanding[1].csv"
If Dir(InitialName) <> "" Then
Kill InitialName
End If
WorkbookOpen = False
While WorkbookOpen <> True
If Dir(InitialName) <> "" Then
If Not wb4 Is Nothing Then
WorkbookOpen = True
End If
Else
Windows.Application.Workbooks(WorkBookName).Activate
Set wb4 = Workbooks("RNsOutstanding[1].csv")
If Not wb4 Is Nothing Then
wb4.SaveAs FileName:="C:\Temp2\RN Data.xlsx", FileFormat:= _
xlOpenXMLWorkbook, CreateBackup:=False
End If
End If
If i > 20000 Then
WorkbookOpen = True
Else
i = i + 1
' Application.Wait Now + TimeValue("00:00:01")
End If
Wend
On Tuesday, June 10, 2014 7:09:22 AM UTC-7, Sukanta Datta wrote:
> I am trying to automate metrics collection. My macro is downloading data
> from an Internet Application. Then I use that data to generate metrics.
> When I run the macro in break mode (line by line execution) it works fine
> but when I take out the break it does not work. I think the problem is that
> Internet Application takes few minutes to generate the file and my macro
> runs beyond that point so it does not Set the workbooks properly. I tried
> to slow it down with Application.Wait command but then the Internet File
> generation wait until my timeer is over. I tried to loop it until I find
> the file in in the Internet download Teamporary director but the
> application hangup and I have to kill the process to start over. Can
> somebody tell me how can I stop executing my macro in a certain point but
> that will not stop generating the Internet Application down load file.
>
>
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
https://www.facebook.com/discussexcel
FORUM RULES
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.
NOTE : Don't ever post confidential data in a workbook. Forum owners and
members are not responsible for any loss.
---
You received this message because you are subscribed to the Google Groups "MS
EXCEL AND VBA MACROS" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/d/optout.
