怎么确定excel工作表中是否存在图表对象

如何确定excel工作表中是否存在图表对象
各位同行,如何确定excel工作表中是否存在图表对象??

------解决方案--------------------
判断它是否为shape对象试试!
------解决方案--------------------
Excel图表有两种存在的形式:1,单独的Chart工作表,2,嵌入在普通工作表中,输入Shape对象
VB code
    If xlApp.ActiveWorkbook.Charts.Count > 0 Then bFlag = True
    For Each shp In xlApp.ActiveSheet.Shapes
        If shp.Type = msoChart Then bFlag = True: Exit For
    Next
    If bFlag Then Debug.Print "Workbook has chart" Else Debug.Print "No Chart"

------解决方案--------------------
还在学习中