怎么从EXCEL中提取某行数据作为VB编程中能使用的数组

因为变成需要的源数据比较多，所以就像把需要的数据反复在EXCEL中，求问高手些，怎么从EXCEL中把某行数据提取出来，前提是可以在写程序的过程中把这些数据提取出来的数据当成已知使用，最好是可以作为数组的模式

举报该问题

第1个回答 2013-06-07

VB操作EXCEL 全面控制 Excel 首先创建 Excel 对象，使用ComObj: Dim ExcelID as Excel.Application Set ExcelID as new Excel.Application 1) 显示当前窗口： ExcelID.Visible := True; 2) 更改 Excel 标题栏： ExcelID.Caption := \'应用程序调用 Microsoft Excel\'; 3) 添加新工作簿： ExcelID.WorkBooks.Add; 4) 打开已存在的工作簿： ExcelID.WorkBooks.Open( \'C:\\Excel\\Demo.xls\' ); 5) 设置第2个工作表为活动工作表： ExcelID.WorkSheets[2].Activate; 或 ExcelID.WorkSheets[ \'Sheet2\' ].Activate; 6) 给单元格赋值： ExcelID.Cells[1,4].Value := \'第一行第四列\'; 7) 设置指定列的宽度（单位：字符个数），以第一列为例： ExcelID.ActiveSheet.Columns[1].ColumnsWidth := 5; 8) 设置指定行的高度（单位：磅）（1磅＝0.035厘米），以第二行为例：详细请看 http://zhidao.baidu.com/question/7757737.html

第2个回答 2013-06-07

这样

相似回答

vba中怎么选取二维数组中的某一行或某一列?答：循环方法，固定1行/1列，另外一维循环 for arr1(i,1)1.2 方法2 application.index() 取一维 application.index(arr1,1,0)application.index(arr1,0,1)2 工作表函数的index都默认从1开始 2.1 工作表函数 index 的序号默认都是从1开始，而非从0开始用index取出来的数组，index已经从1开始了...

怎样将excel的数据读入VBA中的数组哦??答：具体实现代码：Public Function readFileToVariable(strFileName)'=== ' 读取文本文件到一个变量 ' @Param strFileName String 文件路径 ' @Retrun String 文本文件的内容 ' @Ver 0.1 ' @Date 2015.9.25 '=== Const ForReading = 1 '文件只读常量 Dim objFso, objFile 'FSO，文件 Dim st...

如何用VB将excel中的数据导入并定义为一维数组答：Private Sub Command1_Click() '测试结果 Dim i As Long For i = 0 To 5 '打印几个就行 Debug.Print A(i)Next End SubPrivate Sub Form_Load()Dim i As Long Dim xlApp As Object Dim xlBook As Object Dim xlSheet As Object Set xlApp = CreateObject("Excel.Application")Set xlBo...

vb如何读取excel数据并存入数组?答：读写EXCEL表： \x0d\x0a1、在工程中引用Microsoft Excel类型库： \x0d\x0a\x0d\x0a从"工程"菜单中选择"引用"栏；选择Microsoft Excel 12.0 Object Library（EXCEL2007），然后选择"确定"。表示在工程中要引用EXCEL类型库。 \x0d\x0a\x0d\x0a2、在通用对象的声明过程中定义EXCEL对象： ...

大家正在搜

怎么提取数据中的部分数据 excel提取需要的数据数据提取 excel提取数据 excel提取部分数据 excel跨文件提取数据 excel按条件提取数据多个excel同一位置提取数据分类汇总数据提取