条件式VBAを使用したピボットテーブルの計算フィールド

Question

この問題は解決できません。テーブルからデータを取得するピボットテーブルを構築するExcelマクロを作成しています。 テーブル内のフィールドが0の場合、計算フィールドの計算を実行せず、ピボットテーブルに空のセルを表示したくありません。

私の条件式はこの1つである：

私は「フィールドを使用してExcelで同じ数式を入れたときに

pt.CalculatedFields.Add Name:="ptfieldname", Formula:="=IF((field1=0),"",(field1/field2))" 

は、空のピボットテーブルを表示し、次のようにVBAには、この式を置く

=IF((field1=0),"",(field1/field2)) 

、アイテム&セット "ピボットテーブルのオプション]タブのボタンがうまく行く... 私は式が正しいと思うので、私はそれもVBAマクロ内のpermorfを得るために何をしなければならないのですか？

ありがとうございます。

Answer 1

ようこそ。私はここでかなり新しくなっていますが、最近は非常に役立つと感じました。

とにかく、あなたの答えです。ピボットテーブルに計算フィールドを作成するときに、マクロレコーダーを使用して正確な構文を確認することで見つけました。うまくいけば、私の答えを見つける方法は、あなたが将来あなた自身でもっと答えを見つけるのに役立ちます。

VBAで式を参照する方法に問題がありました。 VBAは、引用符の内側の実際の引用符を持っている必要があり、そう

pt.CalculatedFields.Add Name:="ptfieldname", Formula:="=IF((field1=0),"",(field1/field2))" 

で

=IF((field1=0),"",(field1/field2)) 

は

=If(field1=0,"""",(field1/field2)) 

にする必要があります