Ⅰ 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对象
这是我收藏的，你试一下