概述
Imports excel = Microsoft.Office.Interop.Excel
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim xlapp As excel.Application
Dim xlbook As excel.Workbook '工作表
Dim xlsheet As excel.Worksheet '工作簿
Dim sheetname As String
xlapp = CreateObject("Excel.Application")
xlbook = xlapp.Workbooks.Open("C:UsersAdministratorDesktopxxx.xls") '打开已经存在的EXCEL文件
xlapp.Visible = False '设置EXCEL对象可见(或不可见)
xlapp.DisplayAlerts = False
sheetname = xlbook.Worksheets(1).Name
Dim x = xlapp.Workbooks(1).Sheets(sheetname).range("K" + (8).ToString, Type.Missing).Text.ToString()
'按照回车进行分割
Dim s() = Split(x, vbLf)
For i = 0 To UBound(s)
MsgBox(s(i))
Next
End Sub
End Class
最后
以上就是激情摩托为你收集整理的vb.net 对excel文件进行操作的全部内容,希望文章能够帮你解决vb.net 对excel文件进行操作所遇到的程序开发问题。
如果觉得靠谱客网站的内容还不错,欢迎将靠谱客网站推荐给程序员好友。
本图文内容来源于网友提供,作为学习参考使用,或来自网络收集整理,版权属于原作者所有。
发表评论 取消回复