如何消除ole abap中的空行?

2020-08-26 07:55发布

点击此处---> 群内免费提供SAP练习系统(在群公告中)加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)您好,我想知道如何从OLE AB...

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


您好,我想知道如何从OLE ABAP中删除Excel文档中的空行,但不从VBA中删除MACROS。

我已经使用Excel MACRO做到了,它可以工作,但是我想使用ABAP代码来完成,这是我使用的代码:

finrgo = Range(" B65536")。End(xlUp).Row

范围(" B9")。选择

而ActiveCell.Row <= finrgo

如果ActiveCell.Value =""然后

ActiveCell.EntireRow.Delete

finrgo = finrgo-1

其他

ActiveCell.Offset(1,0)。选择

如果结束

参加

感谢您的帮助!

5条回答
d56caomao
2020-08-26 08:28

我不明白您的问题。 ABAP中的WHILE和IF非常简单:

获取excel'ActiveCell'的属性= ActiveCell。
 获得ActiveCell'行'的属性= ActiveCell_Row。
 当ActiveCell_Row <= finrgo时。
 获得ActiveCell'值'的属性= ActiveCell_Value。
 如果ActiveCell_Value =''。
 获得ActiveCell'EntireRow'的属性= ActiveCell_EntireRow。
 ActiveCell_EntireRow"删除"的调用方法。
 finrgo = finrgo-1。
 其他。
 获取ActiveCell'Offset'的属性= ActiveCell_Offset_1_0导出#1 = 1#2 = 0。
 ActiveCell_Offset_1_0的调用方法"选择"。
 万一。
 获得ActiveCell'行'的属性= ActiveCell_Row。
 结束。
 

一周热门 更多>