View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Jim Thomlinson Jim Thomlinson is offline
external usenet poster
 
Posts: 5,939
Default Newbie Run Time Error

There is no way to avoid the error, but you can handle the error, something
like this...

Dim x As Integer
Dim WB As String
dim wbk as workbook

For x = 1 To 10
WB = "G:\myFolder\TEST\RBA\RBA " & x & ".xls"
on error resume next
set wbk = Workbooks.Open (Filename:=WB)
on error goto 0
if not wbk is nothing then
'the workbook exists so have at it...
endif
Next
End Sub

--
HTH...

Jim Thomlinson


"have_a_cup" wrote:


When using a Dim statement, is there any way to declare a generic value,
so that if there aren't actually 10 workbooks, the macro just ends...or,
how do I get around the run time 1004 error from happening / displaying
alert????

Dim x As Integer
Dim WB As String

For x = 1 To 10


WB = "G:\myFolder\TEST\RBA\RBA " & x & ".xls"
Workbooks.Open Filename:=WB


Next

End Sub


--
have_a_cup
------------------------------------------------------------------------
have_a_cup's Profile: http://www.excelforum.com/member.php...o&userid=35394
View this thread: http://www.excelforum.com/showthread...hreadid=552501