Vba 无法获取oleobject类的对象属性

我正在尝试将excel项目从office 2003迁移到office 2010，我不断遇到错误，试图解决这些错误我没有遇到如下错误：

Unable to get Object Property of OleObjects Class

生成此错误的行位于

SrcContainer=pTitleSheet.OLEObjects（1）

，其中pTitleSheet是microsoft excel对象，代码如下：

Option Explicit

Private Sub MasterTitleBox_BeforeContextMenu(ByVal x As Long, ByVal y As Long, ByVal Menu As OWC11.ByRef, ByVal Cancel As OWC11.ByRef)
  'MsgBox CStr(x) + " " + CStr(y)
  Cancel = True

End Sub

我不知道如何调试错误，也不知道为什么在Office2003中运行的代码中找不到对象

此外，我还有一个问题，我看不到我在上面发布代码的对象，这意味着我没有“查看对象”的选项，请参见屏幕截图：

---

工作表上似乎没有任何对象。在此之前，请尝试查看

pTitleSheet.OLEObjects.count

line SrcContainer = pTitleSheet.OLEObjects(1)  

它们可以从ActiveX控件更改为工作表上的表单控件

---

工作表上似乎没有任何对象。在此之前，请尝试查看

pTitleSheet.OLEObjects.count

line SrcContainer = pTitleSheet.OLEObjects(1)  

它们可以从ActiveX控件更改为工作表上的表单控件

---

至少多显示一点代码：至少包含变量声明。至少多显示一点代码：至少包含变量声明。