现在我使用此代码在条形图上运行Excel图表模板:
Apply Saved Chart Template
ActiveChart.ApplyChartTemplate ( _
"C:\Users\Bosco\AppData\Roaming\Microsoft\Templates\Charts\Bar Chart.crtx" _
)
由于此链接将动态决定,如果我将C:\Users\Bosco\AppData\Roaming\Microsoft\Templates\Charts\Bar Chart.crtx
保存到单元格A1中,如何在VBA中自动应用A1的路径,以便一旦我更改A1中的路径,VBA将自动跟随?谢谢!
答案 0 :(得分:2)
Apply Saved Chart Template
ActiveChart.ApplyChartTemplate (Worksheets("Name").Range("A1"))
我认为这样的事情应该有效。
答案 1 :(得分:0)
您可以将单元格A1的值设置为参数,然后将此参数用于代码
Dim sPath As String
sPath = Cells(1, 1).Value
ActiveChart.ApplyChartTemplate (sPath)