VBA Check workbook open function

[pong]

Hi i am a new learner of VBA
Just wanna know why there is err.clear on the two difference places
Why do i need the first err.clear ? since at the second line , the program just run the dim code. there should be no error arising ?

Function BookOpen(Bk As String) As Boolean
Dim T As Excel.Workbook
Err.Clear
On Error Resume Next
Set T = Application.Workbooks(Bk)
BookOpen = Not T Is Nothing
Err.Clear
On Error GoTo 0
End Function

 

[VoG]

I don't think that you need the first Err.Clear.

I think this is better

Function BookOpen(wbName As String) As Boolean
On Error Resume Next
BookOpen = Len(Workbooks(wbName).Name)
End Function

 

[pong]

I also realized the code there are very complicated to understand and yours is a way simpler
Thats why i feel hard of vba programming
there is no always exact at that

 

[pong]

thanks anyway

 

[VoG]

If you are trying to learn VBA take a look at Hiker's list http://www.mrexcel.com/forum/showpost.php?p=2676997&postcount=5

 

[mikerickson]

I think that any On Error statement clears the Err object.