通过VBA删除透视图标签
我全新的Excel-VBA，我在这里要求你的帮助！ 我在Excel 2003中有一个工作簿，在工作表“数据透视表”中有一个数据透视表，我已经使用这个代码在工作表“ChartSheet”中创build了一个embedded的数据透视表：
Sub CreateChartForPivot() Charts.Add ActiveChart.ChartType = xlColumnStacked ActiveChart.SetSourceData Source:=Sheets("PivotTableSheet").Range("B5:B8"), PlotBy:=xlColumns ActiveChart.Location Where:=xlLocationAsObject, Name:="ChartSheet" ActiveChart.Legend.Delete End Sub 结果工作得很好，但我想删除标签“在这里丢弃页面字段”和“在这里放下系列字段”在图表的右上angular。 他们只是可怕的;-)
任何人都可以帮助我在VBA中做到这一点？
非常感谢！！！
删除标签的唯一方法是执行下面的操作，但是也会隐藏其余的button。
在选定数据透视表的情况下，在数据透视图工具栏上，select“数据透视图”>“隐藏数据透视图”字段button。
如果你想要一个VBA代码，你可以logging一个macros:)
你可以试试
Sheets("PivotTableSheet").ShowDrillIndicators = False
要么
Sheets("PivotTableSheet").DisplayFieldCaptions = False