A. vb,連接EXCEl資料庫
首先要在項目里添加Excel object library
聲明變數
Dim xlSheet As Object
Dim MobjExcel As Excel.Application
Dim mobjworkbook As Object
在代碼部分：
Set MobjExcel = CreateObject("Excel.Application")
'MobjExcel.Visible = False
Set mobjworkbook = MobjExcel.Workbooks.Open(「數據表」)
Set xlSheet = mobjworkbook.Worksheets(1)
B. VB與EXCEL連接
兩個文件？還是同一個文件兩個工作表？或者是同一工作表中？
同一個工作表的技巧方法：
選擇B2：D6復制這個區域，選擇B2，右鍵選擇性粘貼，把轉置選上，確定，搞定了
VBA代碼：
Sub zz()
Dim arr
arr = Range("B2:D6").Value '提取區域的數據
ragne("B2:D6").ClearContents '清除原數據區域數據
Range("B2").Resize(UBound(arr, 2), UBound(arr)) = Application.Transpose(arr) '寫入你要求的數據
End Sub
直接運行這個宏，搞定了
不明白，直接HI我
C. 如何實現VB與EXCEL的無縫連接
用以下代碼：SetObjExcel=NewExcel.ApplicationObjExcel.SheetsInNewWorkbook=1SetObjWorkbook=ObjExcel.Workbooks.Open("e:\111.xls")『xls的文件名路徑可以修改SetExcelSheet=ObjWorkbook.Worksheets(1)』指定為sheet1ObjExcel.Visible=TrueExcelSheet.Cells(1,1)=「123456」『給第一行第一列賦值ExcelSheet.Cells(2,1)=「45679」』給第二行第一列賦值』類推，括弧中第1個數表示行，第2個數表示列，比如A1就是1,1，B1就是2，1『同理ExcelSheet.Cells(1,2)=「1111」』A2單元格ExcelSheet.Cells(2,2)=「2222」『B2單元WithObjExcel.ActiveSheet.Range("A1:B4").Borders'邊框設置.LineStyle=xlBorderLineStyleContinuous.Weight=xlThin.ColorIndex=1EndWithObjWorkbook.SaveObjWorkbook.CloseSetObjExcel=Nothing
D. vb adodc 連接excel
使用
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
資料庫。
返回到連接選項卡，並單擊
測試連接。將出現一個消息框，通知您測試已成功完成。
E. vb.net如何與excel建立連接，並從裡面查詢並讀取數據
三種方式
1.用OLEDB ，將Excel視為數據源
2.採用Office 的API
3.將Excel作為Zip文件解壓縮，獲得內容的Xml文檔
F. VB和excel的無縫鏈接
這個太簡單了。。。在面板上加上一個部件就OK了。
G. VB與EXCEL怎麼連接
http://..com/question/88880156.html
http://..com/question/88863340.html
H. vb的資料庫怎麼和excel連接
你所說的資料庫是access資料庫嗎？
access數據連接execl直接通過文件里的獲取外部數據，即可連接。