作用：实现插入图片
              参数：带完整路径的图片文件名字
       返回值：没有
示例：
Sub CommandButton1_Click()
                     ‘定义接口变量
           Dim sErr As String
              Dim sResult As String
Dim obj As Object 
                     ‘获取E立方管理平台的编程接口
           Set obj = Application.COMAddIns.Item("prjAddin.Office_Addin").Object
                     ‘通过接口调用InsertRowCol
           obj.InsertPic “ D:\Img\user.jpg”
                     ‘释放编程接口
           Set obj = Nothing
End Sub
       解说：在当前图片项目的单元格中插入来自“ D:\Img\user.jpg”的图片