寫資料到本地EXCEL的模板中去
*&---------------------------------------------------------------------*
*& Report Z_TEST_2
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT Z_TEST_2.
*---------------------------OLE----------------------------------*
include ole2incl.
data: excel type ole2_object, " Excel object
workbook type ole2_object, " Workbook object
sheet type ole2_object, " Worksheet object
range type ole2_object, " Range object
cell type ole2_object. " Cell object
data: sheet_name(20) value 'BS'. "Excel檔案裡的sheet name
data local_file like rcgfiletr-ftfront."下載檔案型別
local_file = 'c:DO_TEST_OLE.xls'.
START-OF-SELECTION.
data: c1 type i,
c2 type i,
c3 type i,
c4 type i.
create object excel 'EXCEL.APPLICATION'. " CREATE EXCEL OBJECT
if sy-subrc ne 0.
write: / 'Excel init failed, return code is ', sy-subrc.
exit.
endif.
set property of excel 'Visible' = 1.
call method of excel 'Workbooks' = workbook.
data h type i.
call method of workbook 'Open' exporting #1 = local_file.
call method of excel 'Sheets' = sheet exporting #1 = sheet_name.
call method of sheet 'SELECT' .
*填充抬頭
perform fill_range using 1 1 'F_TEST1'.
perform fill_range using 1 2 'F_TEST2'.
free object excel.
free object workbook.
free object sheet.
free object range.
free object cell.
*---------------------------------------------------------------------*
* FORM fill_range *
*---------------------------------------------------------------------*
* ........ *
*---------------------------------------------------------------------*
* --> VALUE(F_ROW) *
* --> VALUE(F_COL) *
* --> VALUE(F_VALUE) *
*---------------------------------------------------------------------*
form fill_range using value(f_row)
value(f_col)
value(f_value).
call method of excel 'CELLS' = cell
exporting
#1 = f_row
#2 = f_col.
set property of cell 'VALUE' = f_value.
endform. "FILL_RANGE
來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/7941665/viewspace-975470/,如需轉載,請註明出處,否則將追究法律責任。
相關文章
- excel導資料到PostgresqlExcelSQL
- android快取資料到本地Android快取
- 下載內表資料到excelExcel
- PHP匯出大量資料到excel表格PHPExcel
- 從EXCEL匯入資料到SQL SERVERExcelSQLServer
- [pb]從excel匯入資料到datawindowExcel
- Vue匯出資料到Excel電子表格VueExcel
- Python批量匯入Excel資料到MySQLPythonExcelMySql
- 【Mysql】匯出資料到excel檔案中MySqlExcel
- excel模板資料填充 :tablefillExcel
- C#快速匯出百萬級資料到Excel方法C#Excel
- 利用Excel匯入資料到SAP C4CExcel
- SQL通過bcp匯出資料到excel檔案SQLExcel
- 用Perl從oracle匯出百萬級資料到excelOracleExcel
- 用 ABAP 新建本地 Excel 檔案並寫入資料試讀版Excel
- 引用Excel模板Excel
- 資料泵在本地匯出資料到遠端資料庫中資料庫
- asp.net中利用NPOI匯出資料到excel中ASP.NETExcel
- 使用Excel匯入資料到SAP Cloud for Customer系統ExcelCloud
- Java 匯入資料到Excel並提供檔案下載介面JavaExcel
- SSIS中匯入Excel資料到資料庫的一個常見小問題Excel資料庫
- 【帶資訊的Excel模板下載】Excel
- Golang初學:高併發時寫入資料到不同的mapGolang
- Java 下載 Excel模板JavaExcel
- Mac和Linux之間傳輸資料,並匯出mysql資料到本地MacLinuxMySql
- 【python】python初學 讀取map檔案資料到excel中PythonExcel
- ORACLE expdp匯出遠端庫指定使用者資料到本地資料庫Oracle資料庫
- Python匯出資料到Excel表格-NotImplementedError: formatting_info=True not yet implementedPythonExcelErrorORM
- 如何從網頁中匯入外部資料到Excel2003網頁Excel
- vb用陣列方式快速匯出MSFlexGrid表格資料到Excel表格中陣列FlexExcel
- 模板匯出word和 EXcelExcel
- 儲存資料到MySql資料庫——我用scrapy寫爬蟲(二)MySql資料庫爬蟲
- 如何將 EXCEL 資料寫入資料庫Excel資料庫
- 使用DevExpress匯出GridControl控制元件資料到excel檔案devExpress控制元件Excel
- 資料到hadoop的遷移Hadoop
- excel生成單元格帶下拉選項的模板 + 資料匯入Excel
- Matlab之儲存/寫矩陣資料到文字(fprintf, save, dlmwrite)Matlab矩陣
- jxls根據模板匯出excelExcel