vb.net与excel的简单介绍

请高手指教vb.net连接Excel该怎么写

在项目中添加Excel类库的引用，然后在VB中定义Excel 的Application，WorkBook和Worksheet

然后对Worksheet中的Range进行操作，不用像Access那样建立ADO什么的连接。

比如

Dim exlApp as Excel.Application = Createobject("Excel.Application")

if exlApp is Nothing then exit sub

dim xBook as Excel.WorkBook=exlApp.Workbook.add

if xBook is Nothing then exit sub

dim xSheet as excel.WorkSheet =xbook.WorkSheet.Add

if xSheet is Nothing Then exit sub

with xSheet

.Range("A1").value="Excel Application Test"

.Range("B1" ":D2").Merge

.Range("B1" ":D2").Value="合并表格内容"

end with！

相关问答

Q1: vb.net如何与excel建立连接，并从里面查询并读取数据？

1.新建一张表格，在表格中导入学生的成绩表，如图所示，将建立一个按钮，通过它来实现查找。

 2.单击菜单栏中的“开发工具”——插入——表单控件——按钮，在出现的十字箭头上拖住画出一个按钮，如图所示。

3.在弹出的查找红对话框中选择“录制”，在弹出的“录制新宏”对话框中，修改宏名称为“查找”，单击确定。

4. 单击“开发工具”——查看代码，打开VBA编辑器，如图所示。

5.现在输入代码：

Sub 查找()

  Dim jieguo As String, p As String, q As String

  Dim c As Range

  jieguo = Application.InputBox(prompt:="请输入要查找的值：", Title:="查找", Type:=2)

  If jieguo = "False" Or jieguo = "" Then Exit Sub

  Application.ScreenUpdating = False

  Application.DisplayAlerts = False

  With ActiveSheet.Cells

      Set c = .Find(jieguo, , , xlWhole, xlByColumns, xlNext, False)

      If Not c Is Nothing Then

          p = c.Address

          Do

              c.Interior.ColorIndex = 4

              q = q c.Address vbCrLf

              Set c = .FindNext(c)

          Loop While Not c Is Nothing And c.Address p

      End If

End With

MsgBox "查找数据在以下单元格中：" vbCrLf vbCrLf _

      q, vbInformation + vbOKOnly, "查找结果"

    Application.ScreenUpdating = True

    Application.DisplayAlerts = True

End Sub

6.现在回到EXCEL表格，右击按钮，选择“编辑文字”，修改按钮名称为“查找按钮”。

7. 现在单击查找按钮，出现对话框“请输入要查找的值”，在方框中输入“男”，单击确定，出现对话框“查找数据在一下单元格中”，单击确定，对应单元格就变成了亮色。

Q2: excel 函数 与vb.net 哪个难

vb.net是变成语言哦~用于写程序的，最后生成的文件的扩展名是.exe。程序的作用不限于计算数字等，还能实现其他复杂的功能，比如实现网络通信等等，和vb.net语言属于一类的还有c语言，c++，c#，java，python等等语言。

而excel函数仅用于计算公式，他不是一种语言，只能在excel文件中写，只能用excel运行。一旦脱离excel（比如你电脑没装excel）那你学的excel函数就完全不起作用了。excel文件最后生成的文件的扩展名是.xlsx（2010版）。

介于两者之间的是vba。就是写excel里面的“宏”的语言。难度高于excel函数，低于vb.net。你从vba开始学的话，可以两头都了解一点。

Q3: vb.net2012如何连接excel2010?

使用 ADO 连接到 Excel

ADO 使用 MDAC 中以下两个 OLE DB 提供程序中的任何一个都可以连接到 Excel 数据文件。

Microsoft Jet OLE DB Provider — 或 —Microsoft OLE DB Provider for ODBC Drivers

使用 Microsoft Jet OLE DB Provider

Jet 提供程序只需要两条信息就可以连接到 Excel 数据源：路径（包括文件名），和 Excel 文件版本。

Jet 提供程序使用连接字符串

Dim cn as ADODB.Connection

Set cn = New ADODB.Connection

With cn

.Provider = "Microsoft.Jet.OLEDB.4.0"

.ConnectionString = "Data Source=C:\MyFolder\MyWorkbook.xls;" _

"Extended Properties=Excel 8.0;"

.Open

End With

提供程序版本：必须使用 Jet 4.0 提供程序；Jet 3.51 提供程序不支持 Jet ISAM 驱动程序。如果指定了 Jet 3.51 提供程序，在运行时会出现以下错误信息：

Couldn't find installable ISAM.

Excel 版本：对于 Excel 95 工作簿（Excel 版本 7.0），应指定 Excel 5.0；对于 Excel 97、Excel 2000 或 Excel 2002 (XP) 工作簿（Excel 版本 8.0、9.0 和 10.0），应指定 Excel 8.0 版本。

使用“数据链接属性”对话框的 Jet 提供程序

如果在应用程序中使用“ADO 数据控件”或“数据环境”，就会出现数据链接属性对话框来收集必要的连接设置。

在提供程序选项卡上，选择 Jet 4.0 提供程序；Jet 3.51 提供程序不支持 Jet ISAM 驱动程序。如果指定了 Jet 3.51 提供程序，在运行时会出现以下错误信息：

Couldn't find installable ISAM.

在连接选项卡上，浏览到工作簿文件。忽略“用户 ID”和“密码”项，因为这些不适用于 Excel 连接。（无法打开受密码保护的 Excel 文件作为数据源。）

在所有选项卡上，从列表中选择扩展属性，然后单击编辑值。输入 Excel 8.0;，用分号 (;) 将其与任何其他已有的项分隔。如果忽略此步骤，测试连接时将出现一条错误信息。这是因为如果不另行指定，Jet 提供程序期望 Microsoft Access 数据库。返回到连接选项卡，并单击测试连接。将出现一个消息框，通知测试已成功完成即可。

Q4: vb.net如何调用打开外部excel文档

第一步，新建项目。

1

打开vb.net，也就是打开Microsoft visual studio 2010，第一次使用的时候设置为basic语言就行。新建项目--打开excel。

2

新建成功。

END

第二步，添加引用。

1

“项目”--“添加引用”。

2

添加Microsoft Excel 14.0 Object Library。

END

第三步，添加打开文件对话框工具。

1

工具箱--对话框--openfiledialog。

2

添加成功。

END

第四步，添加命令按钮控件。

1

工具箱--公共控件--button。

在控件上右击鼠标，进入属性设置。

2

text属性设置为“打开excel”。

3

name属性也设置为“打开excel”。

END

第五步，编写程序。

1

鼠标双击命令按钮，进入编程界面，编写程序。

END

第六步，运行程序。

1

鼠标单击启动调式图标，程序开始运行。

2

单击打开excel命令按钮，调用打开文件对话框，选择自己要打开的excel文件。

END

第七步，保存程序。

第一次程序运行完，关闭程序，出现关闭项目提示，选择保存。

2

选好自己要保存的位置。

Q5: 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关闭宏

还有很多，这个要自己慢慢摸索