计算字段VBA数据透视表中的Div / 0

Question

我正在尝试使用VBA代码删除输出的Excel工作表中的“ Div / 0”错误。

我的计算字段“ AFC_pct”引起了Div / 0错误。我无法使用= IfError函数，因为我不断收到编译错误

.CalculatedFields.Add "ACD_hrs", "=ACDTime/3600"
.CalculatedFields.Add "AuxOut_hrs", "=AuxOut/3600"
.CalculatedFields.Add "Avail_hrs", "=Avail/3600"
.CalculatedFields.Add "Other_hrs", "=Other/3600"
.CalculatedFields.Add "AFC_hrs", "=AFC_Time/3600"
.CalculatedFields.Add "AFC_pct", "=AFC_hrs/ 'Daily_SchdHrsWrk'"
=IfError("AFC_pct",0)

Answer 1

只需隐藏PT属性中的错误即可。

数据透视表选项>布局和格式>显示错误值

选中该框，将值保留为空白，或输入要显示的值。