Dear experts,
I have a problem with a code to insert a formula in a Pivot Table.
The name of the items in the formula is not fixed, it depends on which
workbook I choose to run the macro, so I entered a public variable to
indicate this.
Here is the code:

ActiveSheet.PivotTables("PivotTable1").AddDataFiel d
ActiveSheet.PivotTables( _
"PivotTable1").PivotFields(" Volume (MT)" & " " & Data_TimeFrame), _
"Sum of Volume (MT)" & " " & Data_TimeFrame, xlSum

Range("B7").Select
ActiveSheet.PivotTables("PivotTable1").CalculatedF ields.Add "Weighted
Average PM Deviation (by Volume)", _
"='Deviation * Volume' /'"Volume (MT)" & " " & Data_TimeFrame'", True
ActiveSheet.PivotTables("PivotTable1").PivotFields ("Weighted Average PM
Deviation (by Volume)").Orientation = _
xlDataField

The second part of the code does not work!!!!! I get a syntax error.
The code " Volume (MT)" & " " & Data_TimeFrame (where Data_TiemFrame is my
public variable works well to define the Pivot Field, but not the formula!

Coudl you please help me?
Many thanks in advance,
best regards,
--
Valeria