急...（老板催着要）excel中生成的报表在vb窗体中的显示

Question

我在excel里建好了报表模板，也可以生成相应的报表，但我想把它在窗体里显示出来，只要内容部分，excel的菜单部分最好能隐藏。该用什么控件，有代码吗。

Answer 1

在EXCEL里面录制隐藏菜单的宏，在VB里面调用EXCEL时，运行宏不就OK了吗？

Answer 2

用报表控件，可以不依靠Execl出报表，报表控件如：FarPoint Spread6.0或Cell组件等。

Answer 3

to startvb 分数不是问题，只要能有帮助。to raincold 能说具体点吗，我不会做宏。还有怎样打印生成的报表，各位请多帮忙，我在这里多谢了。

Answer 4

    Dim xlApp As Excel.Application
    Dim xlBook As Excel.Workbook
    Dim xlSheet As Excel.Worksheet
OLE1.CreateLink App.Path & "\模板3.xls"
    Set xlApp = CreateObject("Excel.Application")
       xlApp.Workbooks.Open App.Path & "\模板3.xls"
    Set xlBook = xlApp.Workbooks(1)
    Set xlSheet = xlBook.Worksheets(1) 
   For Irowcount = 1 To 6
      xlSheet.Cells(Irowcount, 2).Value = Irowcount
   Next
      Irowcount = 10 '记录总数
      Icolcount = 10 '字段总数
xlBook.Save
 '  xlBook.Saved = True
  OLE1.Update
  xlSheet.PrintPreview (True)
'  Set xlBook = Nothing
 xlApp.Quit
有问题[email protected]