请问有直接把内表写入本地EXCEL文件的函数吗?

cutepollux

确实是可以的，我之前看到一个

ryq0000

原帖由 justforregister 于 2008-7-16 20:00 发表

那你告诉他啊

CALL FUNCTION 'GUI_DOWNLOAD'
这个就行啊, 人家都说了啊.

deble88

CALL FUNCTION 'GUI_DOWNLOAD'
只能写新文件 不能更改已有的文件!

cutepollux

1. INCLUDE ole2incl. " FOR OLE
   
2. DATA: excel TYPE ole2_object,
   
3. books TYPE ole2_object,
   
4. sheet TYPE ole2_object,
   
5. cell TYPE ole2_object.
   
6. 
   
7. 
   
8. 
   
9.   CREATE OBJECT excel 'EXCEL.APPLICATION'.
   
10.   CALL METHOD OF excel 'WORKBOOKS' = books.
    
11.   CALL METHOD OF books 'OPEN'
    
12.     EXPORTING #1 = p_fname . "'C:CASH.XLS'.
    
13.   CALL METHOD OF excel 'WORKSHEETS' = sheet EXPORTING #1 = 1.
    
14.   CALL METHOD OF sheet 'ACTIVATE'.
    
15.   CALL METHOD OF excel 'CELLS' = cell EXPORTING #1 = 1 #2 = 1.
    
16. 
    
17.   PERFORM fill_cell USING 5 3 d01.
    
18. 
    
19. 
    
20. 
    
21. FORM fill_cell USING p_i
    
22. p_j
    
23. p_val.
    
24.   CALL METHOD OF excel 'CELLS' = cell EXPORTING #1 = p_i #2 = p_j.
    
25.   SET PROPERTY OF cell 'VALUE' = p_val.
    
26. 
    
27. ENDFORM. " FILL_CELL

复制代码

这个代码，参考一下

robinho_lu

lz用的效果如何?

weddingmax

用１４楼的．使用ole

坏牧羊人

hehe

replace

deble88

原帖由 cutepollux 于 2008-7-18 14:41 发表
INCLUDE ole2incl. " FOR OLE
DATA: excel TYPE ole2_object,
books TYPE ole2_object,
sheet TYPE ole2_object,
cell TYPE ole2_object.



  CREATE OBJECT excel 'EXCEL.APPLICATION'.
  CALL METHOD OF excel 'WORKBOOKS' = books.
  CALL METHOD OF books 'OPEN'
    EXPORTING #1 = p_fname . "'C:CASH.XLS'.
  CALL METHOD OF excel 'WORKSHEETS' = sheet EXPORTING #1 = 1.
  CALL METHOD OF sheet 'ACTIVATE'.
  CALL METHOD OF excel 'CELLS' = cell EXPORTING #1 = 1 #2 = 1.

  PERFORM fill_cell USING 5 3 d01.



FORM fill_cell USING p_i
p_j
p_val.
  CALL METHOD OF excel 'CELLS' = cell EXPORTING #1 = p_i #2 = p_j.
  SET PROPERTY OF cell 'VALUE' = p_val.

ENDFORM. " FILL_CELL

这个代码，参考一下

谢谢这位大侠! 这段代码能实现我想要的结果!