本文旨在说明操纵Excel, 使用VB要远比Java容易。
1,使用VB取得c:\Book1.xlsx第一个单元格的值
Sub Macro1()
'
' Macro1 Macro
'
Dim xlsApp As Excel.Application
Dim xlsBook As Excel.Workbook
Dim xlsSheet As Excel.Worksheet
'
Set xlsApp = CreateObject("Excel.Application") '创建EXCEL对象
Set xlsBook = xlsApp.Workbooks.Open("c:\Book1.xlsx") '打开已经存在的EXCEL工件簿文件
Set xlsSheet = xlsBook.Worksheets("Sheet1")
MsgBox xlsSheet.Cells(1, 1)
xlsBook.Close (True)
xlsApp.Quit '结束EXCEL对象
Set xlsApp = Nothing
End Sub
2,使用VBScript取得c:\Book1.xlsx第一个单元格的值
Set xlsApp = CreateObject("Excel.Application") '创建EXCEL对象
Set xlsBook = xlsApp.Workbooks.Open("c:\Book1.xlsx") '打开已经存在的EXCEL工件簿文件
Set xlsSheet = xlsBook.Worksheets("Sheet1")
MsgBox xlsSheet.Cells(1, 1)
xlsBook.Close (True)
xlsApp.Quit '结束EXCEL对象
Set xlsApp = Nothing
3,Jakarta的POI项目提供了一组操纵Windows文档的Java API,如下几个类提供了操作Excel文件的方便的途径:HSSFWorkbook、HSSFSheet、HSSFRow、HSSFCell,分别代表了Excel电子表格中的Book、Sheet、行和单元格。
你可以在下面地址下载到最新的POI工具包:
使用Java取得c:\Book1.xls第一个单元格的值
package c1;
import org.apache.poi.hssf.usermodel.*;
import java.io.*;
public class Test {
/**
* @param args
*/
public static void main(String[] args) {
// TODO Auto-generated method stub
FileInputStream fos = null;
HSSFWorkbook wb = null;
try {
fos=new FileInputStream("c:/Book1.xls");
wb = new HSSFWorkbook(fos);
HSSFSheet sheet = wb.getSheet("Sheet1");
HSSFRow row = sheet.getRow(0);
HSSFCell cell = row.getCell(0);
System.out.println( cell.toString());
fos.close();
} catch (IOException e) {
e.printStackTrace();
}
}
}
阅读(1761) | 评论(0) | 转发(0) |