Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel 无法更改图表图例的位置而不出错_Excel_Vba - Fatal编程技术网
Fatal编程技术网
  • excel/
  • Excel 无法更改图表图例的位置而不出错

Excel 无法更改图表图例的位置而不出错

excel vba

Excel 无法更改图表图例的位置而不出错,excel,vba,Excel,Vba,我已经搜索了网站，并有几个例子，但都产生错误。是否可以在代码的With cht/End With部分内移动图例 .SetElement (msoElementLegendBottom) 看起来方法是： 最简单的修复方法是使用cht.Chart更改为，并删除前两行中.Chart的实例： With cht.Chart .SetSourceData Source:=Sheets("Sheet1").Range("A1:B13"), PlotBy:=xlColumns .Type =

我已经搜索了网站，并有几个例子，但都产生错误。是否可以在代码的With cht/End With部分内移动图例

.SetElement (msoElementLegendBottom)
看起来方法是：

最简单的修复方法是使用cht.Chart更改为
，并删除前两行中
.Chart
的实例：


With cht.Chart
    .SetSourceData Source:=Sheets("Sheet1").Range("A1:B13"), PlotBy:=xlColumns
    .Type = 3

     .SetElement msoElementLegendBottom
End With 



我一定错过了结尾，错误是“对象不支持此属性或方法”
.Chart.SetElement
如果我读对了文档，可能吧？（如果是这样，您可以使用cht.Chart
执行
，并删除前两行中的
.Chart
的其他实例）。我正在慢慢掌握这东西的窍门。非常感谢。

With cht.Chart
    .SetSourceData Source:=Sheets("Sheet1").Range("A1:B13"), PlotBy:=xlColumns
    .Type = 3

     .SetElement msoElementLegendBottom
End With