Ⅰ 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我
Ⅱ VB和excel的無縫鏈接
唉，何不直接復用excel呢？
不過也簡單。制
第一步，給工程添加excel。方法是：菜單--工程--部件--可插入對象，勾選「Microsoft excel 工作表」，確定。工具欄會出現excel圖標。
第二步，將這個控制項繪制到窗體上。
第三、步，運行。
Ⅲ VB和excel如何連接到一起.
你好，EXCEl就有VB的開發功能，如果是您編的軟體，就可以直接在excel中編輯，是excel的VBA開發功能。具體步驟如下，office按鈕---excel選項----常用工具----在功能區顯示開發工具選項卡。----------———————————— 確定後，回來就可以看到「開發工具」第一個就是 您可以將VB程序編輯在這里，然後保存在Excel中。保存的時候要另存為啟用宏的工作簿。VBA開發界面如下和ＶＢ是一樣的，。。，
Ⅳ VB可以和excel之間連接嗎
你的這個功能不需要用到VBA，用下拉列表和vlookup函數就可以實現了~
Ⅳ 怎麼用VB與EXCEL連接，實現對數據的錄入、修改、刪除
用以下代碼：
Set ObjExcel = New Excel.Application
ObjExcel.SheetsInNewWorkbook = 1
Set ObjWorkbook = ObjExcel.Workbooks.Open("e:\111.xls") 『xls的文件名路徑可以修改
Set ExcelSheet = ObjWorkbook.Worksheets(1) 』指定為sheet1
ObjExcel.Visible = True
ExcelSheet.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單元
With ObjExcel.ActiveSheet.Range("A1:B4").Borders '邊框設置
.LineStyle = xlBorderLineStyleContinuous
.Weight = xlThin
.ColorIndex = 1
End With
ObjWorkbook.Save
ObjWorkbook.Close
Set ObjExcel = Nothing
Ⅵ 如何將VB與excel表格和excel中的VBA計算函數完美連接~
可以用VBA製作一個FORM1窗體，建一個文本框輸入日前和一個Combobox選擇班組或其它選項。在版workbook open 添加調用FORM1窗體。當權Excel啟動宏時就自動會跳出FORM1窗體。這就不會影響您的VBA運算而且比較容易管理。
Ⅶ 如何實現VB與EXCEL的無縫連接
1、Nuget
很多Excel開發包甚至不需要再安裝Office..都可以。當然也有office object library........
2、在Excel裡面使用編寫宏
3、把專Excel作為數據源，當成屬資料庫來用。
Ⅷ VB中如何與EXCEL關聯，請教代碼
用類似控制項輸出查詢excel結果，修改數據後保存到excel，同時重新讀取excel數據到控制項，我個人比較熟悉這樣的操作方式，一般不直接引用excel對象。
讀取excel的代碼：
Dim objExcelFile As Excel.Application
Dim objImportSheet As Excel.Worksheet
Dim objWorkBook As Excel.Workbook
Set objExcelFile = New Excel.Application '´´創建新的excel應用程序
objExcelFile.DisplayAlerts = False 'Excel不可見
Set objWorkBook = objExcelFile.Workbooks.Open(App.Path & "\公司在冊人員名單.xls")
Set objImportSheet = objWorkBook.Sheets(1) '選定工作表單1
objWorkBook.RunAutoMacros (xlAutoOpen)
Do Until line = 3000
line = line + 1
a(line)= objImportSheet.Cells(line, 2)
b(line)= objImportSheet.Cells(line, 3)
Loop
objWorkBook.RunAutoMacros (xlAutoClose) '''後台關閉excel
objWorkBook.Close (True)
objExcelFile.Quit
保存excel數據的代碼：
Dim objExcelFile As Excel.Application
Dim objImportSheet As Excel.Worksheet
Dim objWorkBook As Excel.Workbook
Set objExcelFile = New Excel.Application
objExcelFile.DisplayAlerts = False
Set objWorkBook = objExcelFile.Workbooks.Open(App.Path & "\公司在冊人員.xls")
Set objImportSheet = objWorkBook.Sheets(1)
objWorkBook.RunAutoMacros (xlAutoOpen)
objImportSheet.Cells(PrizeLine, 7) = a
objImportSheet.Cells(PrizeLine, 8) = b
objImportSheet.Cells(PrizeLine, 9) =c
objExcelFile.SaveWorkspace '''保存表單
objWorkBook.RunAutoMacros (xlAutoClose)
objWorkBook.Close (True)
objExcelFile.Quit
Ⅸ VB和excel如何連接到一起.
具體步驟如下，office按鈕---excel選項----常用工具----在功能區顯示開發工具選項卡。----------—————— 回—答————— 確定後，回來就可以看到「開發工具」第一個就是 您可以將VB程序編輯在這里，然後保存在Excel中。保存的時候要另存為啟用宏的工作簿。VBA開發界面如下 和ＶＢ是一樣的，。。，
Ⅹ 求VB與EXCEL的連接方法
、在工程中引用Microsoft Excel類型庫：
從"工程"菜單中選擇"引用"欄；選擇Microsoft Excel 9.0 Object Library（EXCEL2000），然後選擇"確定"。表示在工程中要引用EXCEL類型庫。
2、在通用對象的聲明過程中定義EXCEL對象：
Dim xlApp As Excel.Application
Dim xlBook As Excel.WorkBook
Dim xlSheet As Excel.Worksheet
3、在程序中操作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對象
這是我收藏的，你試一下