最近写了一个程序,是vb调用EXCEL在EXCEL上生成所要的报表.
1 在VB中 工程->引用->Microsoft  Excel 11.0 Object library
   Dim bl As Excel.Application
    Dim wbook As Variant
    Set bl = New Excel.Application
    bl.Visible = True
    bl.SheetsInNewWorkbook = 1
    Set wbook = bl.Workbooks.Add
    Myexcel = True
    .............................

     With ActiveSheet.Cells(1, 2)
        .Font.Name = "宋体"
        .Font.Size = 20
        .Font.Color = RGB(0, 0, 0)
        .Font.Underline = xlUnderlineStyleDouble
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .ShrinkToFit = False
    End With
     .......
    ActiveSheet.Cells(1, 2).Value = "采购配件总表"
结果符合要求,能正确调用EXCEL,通过程序也可生成所需要的正确报表,
2  存在的问题是:
    如果不关闭程序重新打开,要想再做一张报表就出现了错误.可以再调出新的EXCEL页面,但要对其操作仍然是对第一次调出的EXCEL 的操作.


还请各位大虾赐教!不胜感激!

[此贴子已经被作者于2005-9-15 15:11:04编辑过]

怎么没有高手回答呀???

不知道能不能帮上忙 http://bbs.bc-cn.net/bbs/dispbbs.asp?boardid=6&id=27375&star=1#27375

你在调用一次后，要关闭前一次打开的excel表呀，第一次没有完全关闭第二次当然不能操作。

谢谢各位的答复,我在看看!

如果我不想关闭第一次打开并操作的EXCEL表,而想再打开新的EXCEL表对其操作该怎么办?

[此贴子已经被作者于2005-9-20 16:41:39编辑过]

那你就重新定义新的对象就行了呀

你已经够历害了，我现在也是在找能不能让VB调用系统计事本和计算器。因为我在做一个音像租借系统。