如何让导入的execl文件显示在窗体里？选用ole控件，可运行起来却是跳出窗体来运行，不知为何？
Private Sub Command1_Click()

Dim OLE1 As Object
      Set OLE1 = CreateObject("Excel.Application")
      OLE1.Visible = True

OLE1.Workbooks.Open FileName:="e:\test.xls"

End Sub

等待中.............................................................

好像不行，麻烦将例子改一下我看看与我该的有什么不同可以么？

再请看看

谢谢，显示在窗体里了，不大的窗体想显示整页的表格，能自动缩放成一页么，方便预览，多谢各位关注，谢谢了。