QTP Functions

Check If Datasheet in a Excel Sheet Exists using VB Script

 Public Function IsDataSheetExist( sSheetName,sColumnName)
On Error Resume Next

  Val = DataTable(sColumnName,sSheetName)
  If Err.Number<> 0 Then
   IsDataSheetExist="False"
  Else
    IsDataSheetExist="True"  
  End If
 
End Function