求救! 如何在vs2005中引用excel 组件啊,我要操作EXCEL表格, 那老大能给出详细的步骤,不胜感激,给分多多!

Question

我加了几次,在引用栏有显示,但是在程序中不识别worksheet application range 等对象,报错,郁闷了一天,搞不定啊,急!

Answer 1

这个控件使用与在excel里使用宏是有区别的.另外execl还有一个execl.ocx组件.
            
            Dim objExcel As Object
            Dim objBook As Object
            Dim objSheet As Object            objExcel = CreateObject("Excel.Application")
            objBook = objExcel.Workbooks.Add
            objSheet = objBook.Worksheets(1)            objSheet.Range("A1:P1").Select()
            With objExcel.Selection
                .HorizontalAlignment = 3
                .WrapText = False
                .Orientation = 0
                .AddIndent = False
                .ShrinkToFit = False
                .MergeCells = False
            End With
            objExcel.Selection.Merge()
            With objExcel.ActiveCell.Characters(Start:=1, Length:=26).Font
                .Name = "宋体"
                .FontStyle = "加粗"
                .Size = 18
                .Strikethrough = False
                .Superscript = False
                .Subscript = False
                .OutlineFont = False
                .Shadow = False
            End With            objSheet = objExcel.Application.Workbooks(1).Worksheets("Sheet1")
            objSheet.Cells(2, 1).Value = "出库单号"
            objSheet.Cells(2, 2).Value = "出库日期"
            objSheet.Cells(2, 3).Value = "用户合同号"
            objSheet.Cells(2, 4).Value = "收货单位"
            objSheet.Cells(2, 5).Value = "生产合同号"
            objSheet.Cells(2, 6).Value = "产品编号"
            objSheet.Cells(2, 7).Value = "牌号"
            objSheet.Cells(2, 8).Value = "规格"
            objSheet.Cells(2, 9).Value = "钢种"
            objSheet.Cells(2, 10).Value = "表面状态"
            objSheet.Cells(2, 11).Value = "生产批号"
            objSheet.Cells(2, 12).Value = "运输方式"
            objSheet.Cells(2, 13).Value = "到站（港）"
            objSheet.Cells(2, 14).Value = "产品类型"
            objSheet.Cells(2, 15).Value = "出库类型"
            objSheet.Cells(2, 16).Value = "实际发货量（吨）"

Answer 2

http://blog.csdn.net/fangxinggood/archive/2006/04/08/655313.aspx