
正文
vb.net打开EXEL的简单介绍
提示:扫一扫查出行【扫一扫了解最新限行尾号】
复制提示
VB.net如何打开添加在现有项里面的EXCEL文件
现在工程里添加引用Microsoft.Office.Interop.Excel,然后可以使用如下代码输出。
Dim oXl As Excel.Application = New Excel.Application()
Dim oWb As Excel.Workbook
Dim oWs As Excel.Worksheet
On Error GoTo Morn
oWb = oXl.Workbooks.Add()
oWs = oWb.Worksheets(1)
With oWs
.Cells._Default(1, 1).Value ="a"
.Cells._Default(1, 2).Value ="b"
.Cells._Default(1, 3).Value ="c"
.Cells._Default(1, 4).Value ="d"
.Cells._Default(2, 1).Value ="32"
.Cells._Default(2, 2).Value ="1"
.Cells._Default(2, 3).Value ="90"
.Cells._Default(2, 4).Value ="合格"
End With
oWs.Parent.Names.Add("CostRange", "=" "A1:B39")
oWs.SaveAs(sFileName)
System.Windows.Forms.Cursor.Current = System.Windows.Forms.Cursors.Default
If MsgBox("已将数据输出到Excel文件中! 现在打开该文件?", MsgBoxStyle.Question + MsgBoxStyle.YesNo, "已完成") = MsgBoxResult.No Then
oXl.Quit()
Else
oXl.Visible = True
End If
oXl = Nothing
oWs = Nothing
oWb = Nothing
相关问答
Q1: VB.NET操作访问Excel
1、office2003的驱动应该是:Microsoft.Jet.OleDb.4.0.你必须加引用这个包。
2、这个是office自带的驱动,不需要打包了,客户机器上装了office就OK了。
根据客户机子的office版本,加载对应的驱动吧。
希望能帮到你。有问题继续追问吧。
Q2: vb.net怎么访问excel表格
我的是2007版本,其它类似
1.在工程中引用Microsoft Excel 12.0 Object Library
2、在通用对象的声明过程中定义EXCEL对象:
Dim xlApp As Excel.Application
Dim xlBook As Excel.WorkBook
Dim xlSheet As Excel.Worksheet
3、在程序中操作VB.NET EXCEL常用命令:
Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象
Set xlBook = xlApp.Workbooks.Open("文件名") '打开已经存在的EXCEL工件簿文件
xlApp.Visible = True '设置EXCEL对象可见(或不可见)
Set xlSheet = xlBook.Worksheets("表名") '设置活动工作表
xlSheet.Cells(row, col) =值 '给单元格(row,col)赋值
xlSheet.PrintOut '打印工作表
xlBook.Close (True) '关闭工作簿
xlApp.Quit '结束EXCEL对象
Set xlApp = Nothing '释放xlApp对象
xlBook.RunAutoMacros (xlAutoOpen) '运行EXCEL启动宏 xlBook.RunAutoMacros (xlAutoClose) '运行EXCEL关闭宏
还有很多,这个要自己慢慢摸索
vb.net打开EXEL的介绍就聊到这里吧,感谢你花时间阅读本站内容,更多关于、vb.net打开EXEL的信息别忘了在本站进行查找喔。






