ABAP-OLE复制行和复制SHEET

复制代码
 1 DATA lc_range TYPE ole2_object.
 2 DATA lv_sheet TYPE ole2_object.
 3 DO 2 TIMES.
 4   CALL METHOD OF lv_sheet 'Rows' = lc_range
 5     EXPORTING #1 = 7.
 6   CALL METHOD OF lc_range 'Copy'.  "COPY第6行插入一个新行
 7   CALL METHOD OF lv_sheet 'Rows' = lc_range
 8     EXPORTING #1 = 7 .
 9   CALL METHOD OF lc_range 'Insert'.
10   CALL METHOD OF lc_range 'ClearContents'. "是否需要清空Cell
11 
12 ENDDO .
13 
14 CALL METHOD OF lv_sheet 'copy'
15   EXPORTING
16     #1 = lv_sheet.
17 
18 SET PROPERTY OF lv_sheet 'name' = 'hhh'.
19 CALL METHOD OF lv_sheet 'ACTIVATE'.
复制代码
posted @   TigerMan  阅读(462)  评论(0编辑  收藏  举报
相关博文:
阅读排行:
· 阿里最新开源QwQ-32B,效果媲美deepseek-r1满血版,部署成本又又又降低了!
· AI编程工具终极对决:字节Trae VS Cursor,谁才是开发者新宠?
· 开源Multi-agent AI智能体框架aevatar.ai,欢迎大家贡献代码
· Manus重磅发布:全球首款通用AI代理技术深度解析与实战指南
· 被坑几百块钱后,我竟然真的恢复了删除的微信聊天记录!
点击右上角即可分享
微信分享提示