『壹』 java如何读取整个excel文件的内容
在Java中读取Excel文件的内容
在这里，我使用的是一个叫Java Excel API的东西，类似的还有jakarta的POI，不过感觉那个
太复杂了点儿。而且jxl对中文的支持相当的好，至少我在用的过程中一点问题没出。
一、下载地址
http://www.andykhan.com/jexcelapi/
二、特性
可以读取Excel 95, 97, 2000文件
可以读或写Excel 97及其以后版本的的公式（不过我发现好像有bug）
生成Excel 97格式的电子表格
支持字体、数字和日期格式化
支持单元格的颜色和阴影
可以编辑现有的文件
三、读文件
//声明一下，记得后面要关闭哦。。
Workbook workbook = null;
try {
workbook = Workbook.getWorkbook(new File("d:\temp\TestRead.xls"));
} catch (Exception e) {
throw new Exception("file to import not found!");
}
Sheet sheet = workbook.getSheet(0);
Cell cell = null;
int columnCount=3;
int rowCount=sheet.getRows();
for (int i = 0; i<rowcount; p="" {
for (int j = 0; j<columncount; p="" {
//注意，这里的两个参数，第一个是表示列的，第二才表示行
cell=sheet.getCell(j, i);
//要根据单元格的类型分别做处理，否则格式化过的内容可能会不正确
if(cell.getType()==CellType.NUMBER){
System.out.print(((NumberCell)cell).getValue());
}
else if(cell.getType()==CellType.DATE){
System.out.print(((DateCell)cell).getDate());
}
else{
System.out.print(cell.getContents());
}
//System.out.print(cell.getContents());
System.out.print("");
}
System.out.print("");
}
//关闭它，否则会有内存泄露
workbook.close();
『贰』 python如何读取excel文件
1.首先说明我是使用的python3.5，我的office版本是2010，首先打开dos命令窗，安装必须的两个库，命令是：pip3 install xlrdPip3 install xlwt2.准备好excel，例如我的一个工作文件，我放在D盘/网络经验/11.xlsx，只有一个页签A，内容是一些销售数据3.打开pycharm，新建一个excel.py的文件，首先导入支持库import xlrdimport xlwt4.针对刚入门的新手，先介绍三个知识，第一个:获取excel的sheet名称，第二：获取excel行数与列数，第三：获取第几行第几列的具体值，这是最常用的三个知识点5.贴出代码，具体分析：(1)要操作excel，首先得打开excel，使用open_workbook(‘路径’)(2)要获取行与列，使用nrows(行)，ncols(列)(3)获取具体的值，使用cell(row,col).valueworkbook=xlrd.open_workbook(r'E:11.xlsx')print (workbook.sheet_names()) sheet2=workbook.sheet_by_name('A') nrows=sheet2.nrows ncols=sheet2.ncols print(nrows,ncols) cell_A=sheet2.cell(1,1).value print(cell_A)6.要在excel里写入值，就要使用write属性,重点说明写入是用到xlwt这个支援库，思路是先新建excel，然后新建页签B，然后将一组数据写入到B，最后保存为excel.xls，这里建议保存为2003的格式，大部分电脑都能打开，特别注意保存的excel的路径是在python工作文件的目录下面，贴出代码：stus = [['年', '月'], ['2018', '10'], ['2017', '9'], ['2016', '8']]Excel = xlwt.Workbook() # 新建excelsheet = Excel.add_sheet('B') #新建页签Brow = 0for stu in stus: col = 0 for s in stu: sheet.write(row, col, s) #开始写入 col = col + 1 row = row + 1Excel.save('Excel.xls') #保存关于python如何读取excel文件，青藤小编就和您分享到这里了。如果您对python编程有浓厚的兴趣，希望这篇文章可以为您提供帮助。如果您还想了解更多关于python编程的技巧及素材等内容，可以点击本站的其他文章进行学习。
『叁』 C#如何高效读取EXCEL文件
List<Employee> employeeList = new List<Employee>(); DataTable ExcelTable; string sExcelFile = @"E:\documents\data.xls"; ExcelData excelData = new ExcelData(); string tableName = "num$";//schemaTable.Rows[2][2].ToString().Trim(); ;//获取 Excel 的表名，默认值是sheet1 ExcelTable = excelData.GetExcelData(sExcelFile, tableName); int i = 0; int comp = 0; foreach (DataRow dr in ExcelTable.Rows) { if (i == 0)//第一行为标题 {int count=dr.ItemArray.Count(); for (int j = 0; j < count; j++) { if ("CompName".Equals(dr[j].ToString())) { comp = j; break; } } i++; continue; } if (dr.Table.Rows.Count < 1) { break; } Employee e = new Employee(); if (!string.IsNullOrEmpty(dr[comp].ToString())) { e.EmployeeTel = dr[comp].ToString(); }employeeList .Add(e);
『肆』 java中怎么读取excel文件
package com.jqgj.test;import java.io.File;import java.io.FileInputStream;import java.io.IOException;import java.io.InputStream;import java.text.DecimalFormat;import java.util.ArrayList;import java.util.List;import org.apache.commons.io.FilenameUtils;import org.apache.poi.hssf.usermodel.HSSFWorkbook;import org.apache.poi.ss.usermodel.Cell;import org.apache.poi.ss.usermodel.CellValue;import org.apache.poi.ss.usermodel.DateUtil;import org.apache.poi.ss.usermodel.FormulaEvaluator;import org.apache.poi.ss.usermodel.Row;import org.apache.poi.ss.usermodel.Sheet;import org.apache.poi.ss.usermodel.Workbook;import org.apache.poi.xssf.usermodel.XSSFWorkbook;public class ImportNameTest {/*** Excel 2003*/private final static String XLS = "xls";/*** Excel 2007*/private final static String XLSX = "xlsx";/*** 分隔符*/private final static String SEPARATOR = "|";/*** 由Excel文件的Sheet导出至List* * @param file* @param sheetNum* @return*/public static List<String> exportListFromExcel(File file, int sheetNum)throws IOException {return exportListFromExcel(new FileInputStream(file),FilenameUtils.getExtension(file.getName()), sheetNum);}/*** 由Excel流的Sheet导出至List* * @param is* @param extensionName* @param sheetNum* @return* @throws IOException*/public static List<String> exportListFromExcel(InputStream is,String extensionName, int sheetNum) throws IOException {Workbook workbook = null;if (extensionName.toLowerCase().equals(XLS)) {workbook = new HSSFWorkbook(is);} else if (extensionName.toLowerCase().equals(XLSX)) {workbook = new XSSFWorkbook(is);}return exportListFromExcel(workbook, sheetNum);}/*** 由指定的Sheet导出至List* * @param workbook* @param sheetNum* @return* @throws IOException*/private static List<String> exportListFromExcel(Workbook workbook,int sheetNum) {Sheet sheet = workbook.getSheetAt(sheetNum);// 解析公式结果FormulaEvaluator evaluator = workbook.getCreationHelper().createFormulaEvaluator();List<String> list = new ArrayList<String>();int minRowIx = sheet.getFirstRowNum();int maxRowIx = sheet.getLastRowNum();for (int rowIx = minRowIx; rowIx <= maxRowIx; rowIx++) {Row row = sheet.getRow(rowIx);StringBuilder sb = new StringBuilder();short minColIx = row.getFirstCellNum();short maxColIx = row.getLastCellNum();for (short colIx = minColIx; colIx <= maxColIx; colIx++) {Cell cell = row.getCell(new Integer(colIx));CellValue cellValue = evaluator.evaluate(cell);if (cellValue == null) {continue;}// 经过公式解析，最后只存在Boolean、Numeric和String三种数据类型，此外就是Error了// 其余数据类型，根据官方文档，完全可以忽略http://poi.apache.org/spreadsheet/eval.htmlswitch (cellValue.getCellType()) {case Cell.CELL_TYPE_BOOLEAN:sb.append(SEPARATOR + cellValue.getBooleanValue());break;case Cell.CELL_TYPE_NUMERIC:// 这里的日期类型会被转换为数字类型，需要判别后区分处理if (DateUtil.isCellDateFormatted(cell)) {sb.append(SEPARATOR + cell.getDateCellValue());} else {//把手机号码转换为字符串DecimalFormat df = new DecimalFormat("#");sb.append(SEPARATOR + df.format(cellValue.getNumberValue()));}break;case Cell.CELL_TYPE_STRING:sb.append(SEPARATOR + cellValue.getStringValue());break;case Cell.CELL_TYPE_FORMULA:break;case Cell.CELL_TYPE_BLANK:break;case Cell.CELL_TYPE_ERROR:break;default:break;}}list.add(sb.toString());}return list;}/*** @param args*/public static void main(String[] args) {String path = "f:\\telName.xlsx";try {List<String> listS= exportListFromExcel(new File(path),0);for(int i=0;i<listS.size();i++){System.out.println(listS.get(i));}} catch (IOException e) {// TODO Auto-generated catch blocke.printStackTrace();}}}
『伍』 Poi如何去读取excel文件
直接全部在action里面写的，这个就不多说了，直接上代码：public String executeExcel() throws Exception{ String realPath = ServletActionContext.getServletContext().getRealPath("/fileupload"); System.out.println(fileFileName); String filePath = ""; if(this.file!=null){ File saveFile = new File(new File(realPath),this.fileFileName); filePath = realPath+"\\"+this.fileFileName; System.out.println(filePath); if(!saveFile.getParentFile().exists()){ saveFile.getParentFile().mkdirs(); } FileUtils.File(file, saveFile); } this.exlToDB(filePath); ActionContext.getContext().put("message","导入成功"); return "success"; } //读取excel2007，并把数据插入数据库 public void exlToDB(String filePath){ boolean flag = true; AllKpi akpi = new AllKpi(); try { // 文件流指向excel文件 FileInputStream fin=new FileInputStream(filePath); XSSFWorkbook workbook = new XSSFWorkbook(fin);// 创建工作薄 XSSFSheet sheet = workbook.getSheetAt(0);// 得到工作表 XSSFRow row = null;// 对应excel的行 XSSFCell cell = null;// 对应excel的列 int totalRow = sheet.getLastRowNum();// 得到excel的总记录条数 System.out.println(totalRow); // 以下的字段一一对应数据库表的字段 float idd = 0.0f; String id = ""; String Name = ""; String DEPT_NAME = ""; String Weight = ""; <span></span>String ALGORITHM = ""; String text = " "; //String sql = "insert into DSP_TJ_KPI values(DSP_TJ_KPI_SEQ.nextval,?,?,?,'无',?)"; for (int i = 1; i <= totalRow; i++) { row = sheet.getRow(i); //System.out.println(row.getCell(0).toString()); if(row.getCell(0) != null && !"".equals(row.getCell(0)) && row.getCell(1) != null && !"".equals(row.getCell(1)) && row.getCell(2) != null && !"".equals(row.getCell(2)) && row.getCell(3) != null && !"".equals(row.getCell(3))){ cell = row.getCell((short) 0); Name = cell.toString(); System.out.println(Name); cell = row.getCell((short) 1); Weight = cell.toString(); System.out.println(Weight); cell = row.getCell((short) 2); DEPT_NAME = cell.toString(); System.out.println(DEPT_NAME); cell = row.getCell((short) 3); ALGORITHM = cell.toString(); System.out.println(ALGORITHM); akpi.setAllkpiName(Name); akpi.setAllkpiDeptName(DEPT_NAME); akpi.setAllkpiWeight(Weight); akpi.setAlgorithm(ALGORITHM); akpi.setText(text); allKpiService.addAllKpi(akpi); //以下注释代码为连接jdbc测试代码块 /*pst = con.prepareStatement(sql); //pst.setString(1, student_id); pst.setString(1, DEPT_NAME); pst.setString(2, Name); pst.setString(3, Weight); <span></span>pst.setString(4, ALGORITHM); pst.execute();*/ System.out.println("preparestatement successful"); } } /*pst.close(); con.close();*/ fin.close(); } catch (FileNotFoundException e) { flag = false; e.printStackTrace(); } catch (IOException ex) { flag = false; ex.printStackTrace(); }
『陆』 如何在excel表格中读取txt文件
点击最上方一行的“数据”——导入外部数据——导入数据,,,然后选择你要导入的txt文件，根据提示设置你要显示的格式与行列，都可以选择设置
『柒』 如何才能拿R读取Excel文件
R语言读取文件文件其实有很多的包可以做到，最常用的就是xlsx和readxl, 首先，安装并载入读取excel文件所用的包：install.packages("xlsx") library(xlsx)或者，install.packages("readxl") library(readxl)两个包的基本介绍xlsx是用R把excel文件中的工作表以data.frame的格式读入R语言，他有两个常用函数，其中read.xlsx2通常会比read.xlsx读取的速度更快一些，因为它的好多工作是利用Java完成的，所以速度有所提升，但是在读取子数据集的时候没有read.xlsx稳定性好。read.xlsx(file, sheetIndex, sheetName=NULL, rowIndex=NULL, startRow=NULL, endRow=NULL, colIndex=NULL, as.data.frame=TRUE, header=TRUE, colClasses=NA, keepFormulas=FALSE, encoding="unknown", …)read.xlsx2(file, sheetIndex, sheetName=NULL, startRow=1, colIndex=NULL, endRow=NULL, as.data.frame=TRUE, header=TRUE, colClasses="character", …)注：sheetIndex:工作表单号rowIndex:行号，就是你想读取那些行header:表头，就是有没有列名。比如姓名，年龄，学号等startRow:比如你想从第五行开始读取，就设置startRow = 5readxl包可以用来读取xls和xlsx格式的文件read_excel(path, sheet = 1, col_names = TRUE, col_types = NULL, na = "", skip = 0)注：sheet：读取的工作表col_names: 如果是FALSE的话，就表示第一行不是列名，R会自动给你取成x1,x2…colt_types: blank,numeric,date,textna: 缺失值，默认空着的单元是缺失值，你也可以自己指定，比如认为999是缺失值
『捌』 怎样读取Excel文件中的数据
VLOOKUP是一个查找函数，给定一个查找的目标，它就能从指定的查找区域中查找返回想要查找到的值。它的基本语法为： VLOOKUP（查找目标，查找范围，返回值的列数，精确OR模糊查找)下面以一个实例来介绍一下这四个参数的使用 例1：如下图所示，要求根据表二中的姓名，查找姓名所对应的年龄。 公式：B13 =VLOOKUP(A13,$B$2:$D$8,3,0) 参数说明：1 查找目标：就是你指定的查找的内容或单元格引用。本例中表二A列的姓名就是查找目标。我们要根据表二的“姓名”在表一中A列进行查找。 公式：B13 =VLOOKUP(A13,$B$2:$D$8,3,0) 2 查找范围（VLOOKUP(A13,$B$2:$D$8,3,0) ）：指定了查找目标，如果没有说从哪里查找，EXCEL肯定会很为难。所以下一步我们就要指定从哪个范围中进行查找。VLOOKUP的这第二个参数可以从一个单元格区域中查找，也可以从一个常量数组或内存数组中查找。本例中要从表一中进行查找，那么范围我们要怎么指定呢？这里也是极易出错的地方。大家一定要注意，给定的第二个参数查找范围要符合以下条件才不会出错： A 查找目标一定要在该区域的第一列。本例中查找表二的姓名，那么姓名所对应的表一的姓名列，那么表一的姓名列（列）一定要是查找区域的第一列。象本例中，给定的区域要从第二列开始，即$B$2:$D$8，而不能是$A$2:$D$8。因为查找的“姓名”不在$A$2:$D$8区域的第一列。 B 该区域中一定要包含要返回值所在的列，本例中要返回的值是年龄。年龄列（表一的D列）一定要包括在这个范围内，即：$B$2:$D$8，如果写成$B$2:$C$8就是错的。3 返回值的列数（B13 =VLOOKUP(A13,$B$2:$D$8,3,0)）。这是VLOOKUP第3个参数。它是一个整数值。它怎么得来的呢。它是“返回值”在第二个参数给定的区域中的列数。本例中我们要返回的是“年龄”，它是第二个参数查找范围$B$2:$D$8的第3列。这里一定要注意，列数不是在工作表中的列数（不是第4列），而是在查找范围区域的第几列。如果本例中要是查找姓名所对应的性别，第3个参数的值应该设置为多少呢。答案是2。因为性别在$B$2:$D$8的第2列中。
『玖』 如何读取excel文件 php
主要有两个选择，第一个是PHPExcelReader，另外一个是PHPExcel。
PHPExcelReader比较轻量级，仅支持Excel的读取，实际上就是一个Reader。但是可惜的是不能够支持Excel 2007的格式（.xlsx）。
PHPExcel比较强大，能够将内存中的数据输出成Excel文件，同时还能够对Excel做各种操作，下面主要介绍下如何使用PHPExcel进行Excel 2007格式（.xlsx）文件的读取。
下载PHPExcel后保存到自己的类文件目录中，然后使用以下代码可以打开Excel 2007（xlsx）格式的文件：
require_once'/libs/PHPExcel-1.8.0/Classes/PHPExcel.php';//修改为自己的目录echo'<p>TESTPHPExcel1.8.0:readxlsxfile</p>';$objReader=PHPExcel_IOFactory::createReaderForFile($filename);$objPHPExcel=$objReader->load($filename);$objPHPExcel->setActiveSheetIndex(1);$date=$objPHPExcel->getActiveSheet()->getCell('A16')->getValue();
输出$date变量就能够看到文件中的内容了。PHPExcel使用PHPExcel_IOFactory这个类来自动匹配所上传的文件类型，当然我们也可以自己制定要解析的文件类型。之后通过load方法，将PHP文件加载到objPHPExcel对象中。如果Excel文件有多个Sheet，可以通过setActiveSheetIndex来设置当前活动的Sheet。
需要注意的是，对于Excel中的日期格式，PHPExcel读出来的是不是日期类型，需要我们使用以下方法来进行日期类型转换。
echodate("Y-m-dH:i:s",PHPExcel_Shared_Date::ExcelToPHP($date));
下面的代码显示了如何遍历显示Excel的内容：
<tableid="table_id"><?php$objWorksheet=$objPHPExcel->getActiveSheet();$i=0;foreach($objWorksheet->getRowIterator()as$row){?><tr><?php$cellIterator=$row->getCellIterator();$cellIterator->setIterateOnlyExistingCells(false);if($i==0){echo'<thead>';}foreach($cellIteratoras$cell){echo'<td>'.$cell->getValue().'</td>';}if($i==0){echo'</thead>';}$i++;?></tr><?php}?></table>
『拾』 vb中怎么读取excel文件
1、调用Excel对象打开EXCEL文件后，读取文件内容***************************************在VB中要想调用Excel，需要打开VB编程环境“工程”菜单中的“引用”项目，并选取项目中的“MicrosoftExcel 11.0 object library”项。由于你的Excel版本不同，所以这个选项的版本号也是不同的。 因为EXCEL是以层次结构组织对象的，其对象模型中含有许多不同的对象元素。第一层：Application对象，即Excel本身；第二层：workbooks对象集，指Excel的工作簿文件第三层：worksheets对象集，表示的是Excel的一个工作表；第四层：Cells和Range对象，指向Excel工作表中的单元格。新建立一个VB的工程，先放一个button，名称为Excel_Out。先定义好各层：Dim xlapp As Excel.Application 'Excel对象Dim xlbook As Excel.Workbook '工作簿Dim xlsheet As Excel.Worksheet '工作表我们打算做的是：打开/新建一个excel，在其中对某工作表的一些单元格修改其值，然后另存为test.xls文件。Private Sub Excel_Out_Click() Dimi, j As Integer Setxlapp = CreateObject("Excel.Application") '创建EXCEL对象 'Set xlbook = xlapp.Workbooks.Open(App.Path& "\test.xls")'打开已经存在的test.xls工件簿文件 Setxlbook = xlapp.Workbooks.Add '新建EXCEL工件簿文件 'xlbook.RunAutoMacros (xlAutoOpen) '运行EXCEL启动宏 'xlbook.RunAutoMacros (xlAutoClose) '运行EXCEL关闭宏xlapp.Visible = True '设置EXCEL对象可见（或不可见） Setxlsheet = xlbook.Worksheets(1) '设置活动工作表'' ''~~~当前工作簿的第一页,这里也可以换成“表名” '下面就是简单的在一些单元格内写入数字 Fori = 7 To 15 For j = 1 To 10xlsheet.Cells(i, j) = j '当前工作簿第一页的第I行第J列 Next j Nexti Withxlsheet '设置边框为是实线 .Range(.Cells(7, 1), .Cells(28, 29)).Borders.LineStyle = xlContinuous EndWith '引用当前工作簿的第二页 Setxlsheet = xlapp.Application.Worksheets(2)xlsheet.Cells(7, 2) = 2008 '在第二页的第7行第2列写入2008xlsheet.SaveAsApp.Path&"\test.xls" '按指定文件名存盘 'Setxlbook = xlapp.Application.Workbooks.Add '新建一空白工作簿xlapp.Quit '结束EXCEL对象'xlapp.Workbooks.Close Setxlapp = Nothing '释放xlApp对象End Sub这样，我们就可以简单的对excel文件进行操作了。下面再放一些我从网上查到的资料吧，还挺有用的： 1．创建Excel对象eole=CREATEOBJECT(′Excel.application′) 2．添加新工作簿eole.Workbooks.add 3．设置第3个工作表为激活工作表eole.Worksheets(〃sheet3〃).Activate 4．打开指定工作簿eole.Workbooks.Open(〃c:\temp\ll.xls〃) 5．显示Excel窗口eole.visible=.t. 6．更改Excel标题栏eole.Caption=〃VB应用程序调用Microsoft Excel〃 7．给单元格赋值eole.cells(1,4).value=XM(XM为数据库字段名) 8．设置指定列的宽度(单位：字符个数) eole.ActiveSheet.Columns(1).ColumnWidth=5 9．设置指定行的高度(单位：磅) eole.ActiveSheet.Rows(1).RowHeight=1/0.035 (设定行高为1厘米，1磅=0.035厘米) 10．在第18行之前插入分页符eole.Worksheets(〃Sheet1〃).Rows(18).PageBreak=1 11．在第4列之前删除分页符eole.ActiveSheet.Columns(4).PageBreak=0 12．指定边框线宽度(Borders参数如下) ole.ActiveSheet.Range(〃b3:d3〃).Borders(2).Weight=3 13．设置四个边框线条的类型eole.ActiveSheet.Range(〃b3:d3〃).Borders(2).LineStyle=1 (其中Borders参数：1－左、2－右、3－顶、4－底、5－斜、6－斜/；LineStyle值：1与7－细实、2－细虚、4－点虚、9－双细实线) 14．设置页眉eole.ActiveSheet.PageSetup.CenterHeader=〃报表1〃 15．设置页脚eole.ActiveSheet.PageSetup.CenterFooter=〃第＆P页〃 16．设置页眉到顶端边距为2厘米eole.ActiveSheet.PageSetup.HeaderMargin=2/0.035 17．设置页脚到底边距为3厘米eole.ActiveSheet.PageSetup.FooterMargin=3/0.035 18．设置顶边距为2厘米eole.ActiveSheet.PageSetup.TopMargin=2/0.035 19．设置底边距为4厘米eole.ActiveSheet.PageSetup.BottomMargin=4/0.035 20．设置左边距为2厘米veole.ActiveSheet.PageSetup.LeftMargin=2/0.035 21．设置右边距为2厘米eole.ActiveSheet.PageSetup.RightMargin=2/0.035 22．设置页面水平居中eole.ActiveSheet.PageSetup.CenterHorizontally=.t. 23．设置页面垂直居中eole.ActiveSheet.PageSetup.CenterVertically=.t. 24．设置页面纸张大小(1－窄行8511 39－宽行1411) eole.ActiveSheet.PageSetup.PaperSize=1 25．打印单元格网线eole.ActiveSheet.PageSetup.PrintGridlines=.t. 26．拷贝整个工作表eole.ActiveSheet.UsedRange.Copy 27．拷贝指定区域eole.ActiveSheet.Range(〃A1:E2〃).Copy 28．粘贴eole.WorkSheet(〃Sheet2〃).Range(〃A1〃).PasteSpecial 29．在第2行之前插入一行eole.ActiveSheet.Rows(2).Insert 30．在第2列之前插入一列eole.ActiveSheet.Columns(2).Insert 31．设置字体eole.ActiveSheet.Cells(2,1).Font.Name=〃黑体〃 32．设置字体大小eole.ActiveSheet.Cells(1,1).Font.Size=25 33．设置字体为斜体eole.ActiveSheet.Cells(1,1).Font.Italic=.t. 34．设置整列字体为粗体eole.ActiveSheet.Columns(1).Font.Bold=.t. 35．清除单元格公式eole.ActiveSheet.Cells(1,4).ClearContents 36．打印预览工作表eole.ActiveSheet.PrintPreview 37．打印输出工作表eole.ActiveSheet.PrintOut 38．工作表另存为eole.ActiveWorkbook.SaveAs(〃c:\temp\22.xls〃) 39．放弃存盘eole.ActiveWorkbook.saved=.t. 40．关闭工作簿eole.Workbooks.close 41．退出Excel eole.quit***************************************2、调用ADO对象以数据库方式打开EXECL文件后，以SQL语句方式读取文件*************************************** Dim rs As ADODB.Recordset Set rs = New ADODB.Recordset Dim conn As ADODB.Connection Set conn = New ADODB.Connection conn.Open "DRIVER={Microsoft Text Driver (*.txt; *.csv)};" DBQ=" & App.Path & ";", "", "" rs.Open "select * from [test$]", conn, adOpenStatic, adLockReadOnly, adCmdText Set Read_Text_File = rs Set rs = Nothing Set conn = Nothing***************************************
未经允许不得转载：山九号 » 如何读取excel文件|如何才能拿R读取Excel文件
