如何从VBA中的单元格自动应用文件路径?

时间:2017-08-02 09:45:37

标签: excel vba excel-vba

现在我使用此代码在条形图上运行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将自动跟随?谢谢!

2 个答案:

答案 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)