使用 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 數據庫。返回到連接選項卡,并單擊測試連接。將出現一個消息框,通知測試已成功完成即可。
1、office2003的驅動應該是:Microsoft.Jet.OleDb.4.0.你必須加引用這個包。
2、這個是office自帶的驅動,不需要打包了,客戶機器上裝了office就OK了。
根據客戶機子的office版本,加載對應的驅動吧。
希望能幫到你。有問題繼續追問吧。
在項目中添加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!
我的是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關閉宏
還有很多,這個要自己慢慢摸索
第一步,新建項目。
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
選好自己要保存的位置。
網頁題目:vb.net連接excel的簡單介紹
路徑分享:http://vcdvsql.cn/article46/dooooeg.html
成都網站建設公司_創新互聯,為您提供外貿網站建設、微信公眾號、網站收錄、小程序開發、網站策劃、搜索引擎優化
聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯