Analysis for Excel 2.4-为层次结构节点和数据设置自定义样式

2020-08-20 00:42发布

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

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


尊敬的专家,

我的任务是基于Excel 2.4的分析在工作簿上设置自定义样式。

我需要设置一种格式,该格式适用于除叶子之外的所有层次结构节点的成员和数据,如下图所示:

我希望这种格式是动态的,以便一旦应用后,层次结构中所有当前和将来的节点都将获得这种格式。

预先感谢您,弗朗切斯科

(14.6 kB)

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

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


尊敬的专家,

我的任务是基于Excel 2.4的分析在工作簿上设置自定义样式。

我需要设置一种格式,该格式适用于除叶子之外的所有层次结构节点的成员和数据,如下图所示:

我希望这种格式是动态的,以便一旦应用后,层次结构中所有当前和将来的节点都将获得这种格式。

预先感谢您,弗朗切斯科

(14.6 kB)
付费偷看设置
发送
8条回答
粗暴的香蕉
1楼-- · 2020-08-20 01:31

弗朗切斯科,你知道如何解决这个问题吗? 我有同样的要求。 由于只有一个SAPMemberCell,因此该格式将应用于多个节点。

shere_lin
2楼-- · 2020-08-20 01:25

这是在Sub Callback_AfterRedisplay()上使用少量VBA代码的解决方案

在必须为每种层次结构级别样式(SAPHierarchyCellX)创建关键人物的样式之前

根据命名约定,关键人物的样式命名为" SAPHierarchyCellX KF"

VBA代码:

公共子Callback_AfterRedisplay()

将LastCol屏蔽为长

昏暗的最后一刻

LastCol = Sheets(2).Cells(3,Columns.Count).End(xlToLeft).Column

lastrow = Sheets(2).Cells(Rows.Count,2).End(xlUp).Row

对于I = 3持续

对于J = 3到LastCol

如果Sheets(2).Cells(I,J).Style <>" Empty"和Sheets(2).Cells(I,J).Style <>" Empty2"然后

如果Sheets(2).Cells(I,1).Style =" SAPHierarchyCell1"或Sheets(2).Cells(I,1).Style =" SAPHierarchyCell2"然后

Sheets(2).Cells(I,J).Style = Sheets(2).Cells(I,1).Style&" KF"

如果结束

如果结束

下一个J

接下来我

结束子

一周热门 更多>