Is Excel 2000 on the Pc

Is there a method for checking the existence of Microsoft excel 2000 on the client machine?
visualbasicAsked:
Who is Participating?
 
vinnyd79Commented:
Private Sub Command1_Click()
MsgBox IsExcel2000Installed
End Sub

Function IsExcel2000Installed() As Boolean
Dim xcel As Object
On Error Resume Next
Set xcel = CreateObject("excel.application")
If Err.Number = 0 Then
    If xcel.version = "9.0" Then
        IsExcel2000Installed = True
        Exit Function
    End If
End If
IsExcel2000Installed = False
End Function
0
 
joefunsmithCommented:
although you could rely on vb cleaning up after itself, you might want to include after
 IsExcel2000Installed = True,
 "set xcel = nothing"
unless of course you are going to use the created object

:)
0
 
vinnyd79Commented:
I think the function I posted should have answered the question.
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.