2020-09-10 13:45发布
点击此处---> 群内免费提供SAP练习系统（在群公告中）加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）你好， 我希望能够使用VBA从... 显示全部
加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）
你好，
我希望能够使用VBA从构建的EPM报告中按维度提取活动成员。
具体来说，我正在尝试复制当我右键单击报表中的单元格转到EPM =>属性时发生的情况。 但是，我想做的是遍历工作簿中的每个维度，并为每个值显示一行。
我看到了几篇类似的文章，也许我遗漏了一些东西，但是没有一个看起来可以做我想做的事情。 实际上，我什至不确定是否可行。
您缺少明确的需求描述...
如何显示值？
通常，请看以下示例代码：
显式选项 昏暗的epm作为新的FPMXLClient.EPMAddInAutomation 公开子ListMembers（） Dim strMem（）作为字符串 昏暗的strConn作为字符串 调光温度只要 Dim strProperty作为字符串 昏暗的strPropVal作为字符串 strConn = epm.GetActiveConnection（ThisWorkbook.Worksheets（" Sheet1"）） strMem = epm.GetRowAxisMembers（ThisWorkbook.Worksheets（" Sheet1"），" 000"） strProperty =" ACCTYPE" 对于lngTemp = 0到UBound（strMem） strPropVal = epm.GetPropertyValue（strConn，strMem（lngTemp），strProperty） Debug.Print strMem（lngTemp）＆""和strPropVal 下一个lngTemp 结束Sub
它将获得行轴上的所有成员，并为每个成员打印属性值。
结果：
[帐户]。[PARENTH1]。[PL010] INC [ACCOUNT]。[PARENTH1]。[PL020] INC [ACCOUNT]。[PARENTH1]。[PL100] INC [ACCOUNT]。[PARENTH1]。[PL110] EXP [ACCOUNT]。[PARENTH1]。[PL120] EXP [ACCOUNT]。[PARENTH1]。[PL200] EXP [ACCOUNT]。[PARENTH1]。[PL300] INC [ACCOUNT]。[PARENTH1]。[PL310] EXP [ACCOUNT]。[PARENTH1]。[PL320] EXP [ACCOUNT]。[PARENTH1]。[PL330] EXP [ACCOUNT]。[PARENTH1]。[PL400] EXP [ACCOUNT]。[PARENTH1]。[PL500] INC [ACCOUNT]。[PARENTH1]。[PL510] INC [ACCOUNT]。[PARENTH1]。[PL999] INC [ACCOUNT]。[PARENTH1]。[PL600] INC
最多设置5个标签!
{var%20f='http://v.t.sina.com.cn/share/share.php?appkey=1515056452',u=z||d.location,p=['&url=',e(u),'&title=',e(t||d.title),'&source=',e(r),'&sourceUrl=',e(l),'&content=',c||'gb2312','&pic=',e(p||'')].join('');function%20a(){if(!window.open([f,p].join(''),'mb',['toolbar=0,status=0,resizable=1,width=440,height=430,left=',(s.width-440)/2,',top=',(s.height-430)/2].join('')))u.href=[f,p].join('');};if(/Firefox/.test(navigator.userAgent))setTimeout(a,0);else%20a();})(screen,document,encodeURIComponent,'','','http://www.easysap.com/data/attach/logo/logo.png', '推荐 路亽曱_Ryan 的问题《通过Dimension VBA获取会员ID》','https://www.easysap.com/answer/69912/195298.html','页面编码gb2312|utf-8默认gb2312'));){kind=link}
您缺少明确的需求描述...
如何显示值？
通常，请看以下示例代码：
显式选项 昏暗的epm作为新的FPMXLClient.EPMAddInAutomation 公开子ListMembers（） Dim strMem（）作为字符串 昏暗的strConn作为字符串 调光温度只要 Dim strProperty作为字符串 昏暗的strPropVal作为字符串 strConn = epm.GetActiveConnection（ThisWorkbook.Worksheets（" Sheet1"）） strMem = epm.GetRowAxisMembers（ThisWorkbook.Worksheets（" Sheet1"），" 000"） strProperty =" ACCTYPE" 对于lngTemp = 0到UBound（strMem） strPropVal = epm.GetPropertyValue（strConn，strMem（lngTemp），strProperty） Debug.Print strMem（lngTemp）＆""和strPropVal 下一个lngTemp 结束Sub它将获得行轴上的所有成员，并为每个成员打印属性值。
结果：
一周热门 更多>