VB怎么定义spreadsheet

VB如何定义spreadsheet
Private Sub Form_Load()
  Dim mExcel As Excel.Application
  Dim mSheet As Excel.Worksheet
   
  Set mExcel = CreateObject("Excel.Application")
   
  mExcel.Workbooks.Open ("c:\ABC.xls")
  Set mSheet = mExcel.Sheets("sheet1")
  mSheet.Activate

  For i = 0 To (mSheet.userange.Row.Count)
  For j = 0 To mSheet.userange.Column.Count
  Spreadsheet1.ActiveSheet.Cells(i, j) = mSheet.Cells(i.j)
  Next
  Next
  
End Sub

我想用以上代码连接EXCEL但是提示要求对象，后来发现是没有定义spreadsheet请问应该怎么定义这个控件呢，达人们有代码或者例程吗？？谢谢

[解决办法]
Spreadsheet一个第三方电子表格控件，你连接excel可以与它无关。
把它换成mshflexgrid或msflexgrid都可以，在部件里添加。