excel - 在 Excel 中以编程方式访问 SmartArt 上的 "Right to Left"

Question

我正在使用 VSTO 开发 Excel 加载项，该工具生成的报告之一具有 SmartArt 作为输出。现在的输出是:



我希望输出是:



我知道 Excel 有这个命令，它确实做到了:



但我无法使用 VBA 或 C# 访问它。

在此先感谢您的帮助!

Answer 1

我相信你需要有 Office 2010 或 2013 才能做到这一点。

我使用代码从以下位置获取图表的名称(在我的情况下为“图表 1”):

http://www.ozgrid.com/VBA/shapes.htm (虽然我想你可以找到更好的方法)

然后稍微修改了以下代码:

http://social.msdn.microsoft.com/Forums/office/en-US/b6af1478-045b-40b1-b05c-2cb95aa2127e/excel-2007-smart-art-manipulate-text-using-vba?forum=exceldev

Sub test()
    Dim sh As Shape
    Dim sa As SmartArt
    Set sh = ActiveWorkbook.ActiveSheet.Shapes("Diagram 1")
    With sh
        .Select
        Set sa = .SmartArt
        sa.Reverse = msoTrue
    End With
End Sub

也就是说，“从左到右”是“反向”属性。看:

http://msdn.microsoft.com/en-us/library/office/microsoft.office.core.smartart.reverse%28v=office.15%29.aspx