Excel VBA将ShapeEffect应用于图表系列

我有写的VBA代码，它创建了一个Excel列集群图表，并且我的所有代码都可以工作，但是我对图表的外观不满意，因此我试图穿上它一些。该图表是自动报告的一部分，所以我只想要能够安排我的宏运行，而不必手动更改数据系列。由于Excel 2007将图表的属性和方法设置为只读，因此它们在录制宏时不会填充。Excel VBA将ShapeEffect应用于图表系列

所以我试图做类似的东西为以下后 How to apply ShapeStyle to a specific Series of a Chart in Excel using VBA?

但是我想套用形的影响，以图表系列。手动获取形状效果我希望您必须在图表中选择系列，然后选择图表工具>格式>形状效果>预设>预设2.这使数据系列在没有3D图表的麻烦的情况下显示为3D。此外，我无法使用3D图表，因为我有第二个访问的第四个数据系列，您无法使用3D列集群图表执行此操作。

任何帮助将不胜感激。

UPDATE

我回去，我看着这个在2010年是否有任何改变了。您仍然无法直接将预设应用于图表，但录制宏确实会尝试录制某些内容。

如果您选择一个系列并应用预设，那么请查看3-D选项，您可以查看设置的值。从那里只需要在VBA中设置这些内容。

下面是对3-d选项

Selection.Format.Line 
Selection.Format.Fill 
Selection.Format.Shadow 
Selection.Format.Glow 
Selection.Format.ThreeD

有很多的属性，所以我就不一一列举了所有的课程。我确实发现，如果您录制一个宏并设置一个属性，它会被记录下来，这样可以帮助您更贴近地应用所需的效果。

来源

2012-09-23 AxGryndr

你可以尝试以下attemps之一：

Chart.ApplyLayout(1)

使用您先前定义的Diagrammlayoutpreset。

或者使用：

with Chart.SeriesCollection(1).Format.ThreeD 
    .visible = true 
    .depth = 50 
end with

寻找在Excel的帮助ThreeDFormat-对象来获取所有可能的设置。这不是3D-Style-Chart，而是3D-Style系列;）要获得与preset2相同的结果，只需查找preset2系列格式化对话框中的格式变化即可。

来源

2012-09-25 16:04:28 Jook

我有很多事情要做，但我会尝试你的建议，让你知道我找到了什么。我不知道他们为什么没有制作像纹理这样的预设风格。 – AxGryndr

那么我终于有机会重温这个了。你的代码确实有用，但并不完全符合我的需求。看来VBA类不包含这个功能。 – AxGryndr

Excel VBA将ShapeEffect应用于图表系列

回答

相关问题