使用VS 2015软件利用VB.NET编程操作excel 怎么样像Excel VBA那样将区域单元格直接读入数组?'首先通过菜单[项目] -- [添加引用]2015vb.net,选择[COM]选项卡,选择“Microsoft Excel XX.0 Object Library”,[确定] 。
添加一个按钮2015vb.net:
试试下面的代码:注意版本2015vb.net;先建立以个EXCEL文件保存到c:\下面,我的计算机是安装OFFICE 2010 。
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim AppXls As Microsoft.Office.Interop.Excel.Application'声明Excel对象
Dim AppWokBook As Microsoft.Office.Interop.Excel.Workbook'声明工作簿对象
Dim AppSheet As New Microsoft.Office.Interop.Excel.Worksheet'声明工作表对象
AppXls = New Microsoft.Office.Interop.Excel.Application'实例化Excel对象
AppXls.Workbooks.Open("C:\工作簿1.xlsx")'打开已经存在的EXCEL文件
AppXls.Visible = False'使Excel不可见
'AppWokBook = New Microsoft.Office.Interop.Excel.Workbook'实例化工作簿对象
'AppSheet = New Microsoft.Office.Interop.Excel.Worksheet'实例化工作表对象
AppWokBook = AppXls.Workbooks(1)'AppWokBook对象指向工作簿"C:\学生成绩.xls"
AppSheet = AppWokBook.Sheets("Sheet1")'AppSheet对象指向AppWokBook对象中的表“Sheet1”,即:"C:\学生成绩.xls"中的表“Sheet1”
'下面举一些例子:
'1、如果不声明工作表对象 AppSheet , 那么应用AppWokBook对象中的表“Sheet1”的语句就是:AppWokBook.Sheets("Sheet1")
'2、如果不声明工作簿对象 AppWokBook , 那么应用"C:\学生成绩.xls"中的表“Sheet1”的语句就是:AppXls.Workbooks("C:\学生成绩.xls").Sheets("Sheet1")
'要读取数据表"Sheet1"中的单元格“A1”的值,到变量S1里
Dim S1 As String
'方法一
S1 = AppXls.Workbooks(1).Sheets("Sheet1").Range("A1").Value
MsgBox(S1)
'方法二
S1 = AppWokBook.Sheets("Sheet1").Range("A1").Value
MsgBox(S1)
'方法三
S1 = AppSheet.Range("A1").Value
MsgBox(S1)
'把数据写入到单元格“H2”,就是第2行第8个单元格
'方法一
AppXls.Workbooks(1).Sheets("Sheet1").Cells(2, 8).Value = "https://www.04ip.com/post/您好2015vb.net!"
S1 = AppXls.Workbooks(1).Sheets("Sheet1").Cells(2, 8).Value'为2015vb.net了验证,读取并显示它
MsgBox(S1)
'方法二
AppWokBook.Sheets("Sheet1").Cells(2, 8).Value = "https://www.04ip.com/post/你们好!"
S1 = AppWokBook.Sheets("Sheet1").Cells(2, 8).Value'为了验证,读取并显示它
MsgBox(S1)
'方法二
AppSheet.Cells(2, 8).Value = "https://www.04ip.com/post/大家好!"
S1 = AppSheet.Cells(2, 8).Value'为了验证,读取并显示它
MsgBox(S1)
'使用完毕必须关闭EXCEL,并退出
AppXls.ActiveWorkbook.Close(SaveChanges:=True)
AppXls.Quit()
'完成此程序,打开EXCEL检查,可以看到在“Sheet1”表的单元格“H2”里是文本“大家好!”
End Sub
End Class
用VS2015,创建的VB.NET应用程序,如何同时操作两个EXCEL工作簿首先定义
Public xlApp As Excel.Application
Public xlBook As Excel.Workbook Public xlSheet As Excel.Worksheet然后创建对象
xlApp = CreateObject("Excel.Application") '创建EXCEL对象
xlBook = xlApp.Workbooks.Open("文件路径") '打开已经存在2015vb.net的EXCEL工件簿文件
xlSheet = xlBook.Worksheets("sheet1")
arcengine10.5适配哪版vs支持使用Visual Studio 2013社区、专业版、高级版和旗舰版或Visual Studio 2015社区、专业版、企业版;支持.net framework 4.5版本 。
Microsoft Visual Studio 2013(C++、C#、VB.NET)社区2015vb.net,专业版、高级版和旗舰版 Microsoft Visual Studio 2015(C++、C#、VB.NET)社区2015vb.net,专业版、企业版 。
推荐阅读
- 唱歌直播录屏女生怎么录,唱歌主播怎么录视频教程
- 视频流是什么意思,视频流量指的是什么
- Python爬虫报错11001,python爬虫不报错也不出结果
- 多个手机直播美女照片软件,很多手机直播图片
- 黑马go语言就业班百度云 黑马就业班学多久
- 天津erp系统有哪些品牌,天津erp技术开发招聘
- ice服务器好,ice服务器创始人
- 65js9800有用过的吗,65j9000
- vb.net计算文本框 vb统计字符个数