Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


6091 / 13645 ツリー ←次へ | 前へ→

【47254】ピボットテーブルのプルダウンで表示される値について nanashi 07/3/6(火) 14:19 質問[未読]
【47256】Re:ピボットテーブルのプルダウンで表示さ... take 07/3/6(火) 16:09 回答[未読]
【47259】Re:ピボットテーブルのプルダウンで表示さ... nanashi 07/3/6(火) 18:06 質問[未読]
【47267】Re:ピボットテーブルのプルダウンで表示さ... Ned 07/3/6(火) 23:17 発言[未読]

【47254】ピボットテーブルのプルダウンで表示され...
質問  nanashi  - 07/3/6(火) 14:19 -

引用なし
パスワード
   ピボットテーブルを使用しているのですが、プルダウンで表示される値の中に、"空白"と選択ボックスがあるが何も値が表示されていない項目があります。
元データには、データが無いので”空白”になると思っているのですが、この何も表示されない値を表示させたくない(対象が外)にする方法をマクロを使用する方法を教えていただけませんでしょうか?

【47256】Re:ピボットテーブルのプルダウンで表示...
回答  take  - 07/3/6(火) 16:09 -

引用なし
パスワード
   >元データには、データが無いので”空白”になると思っているのですが、この何も表示されない値を表示させたくない(対象が外)にする方法をマクロを使用する方法を教えていただけませんでしょうか?

ご質問の意味は、空白を非表示にさせたいという意味でしょうか?
それとも、そもそも空白自体をカウントしないようにしたいとういう意味でしょうか?
後者だとしたら、力不足でちょっと分からないのですが、前者なら、以下のロジックで行けると思います。
もし違うようでしたら、すいません。
もっとできる方がいらっしゃると思いますので、他の方に聞いてみてくださいね。

With .PivotFields("シート名")
  On Error Resume Next
  .PivotItems("(空白)").Visible = False
  On Error GoTo 0
End With

【47259】Re:ピボットテーブルのプルダウンで表示...
質問  nanashi  - 07/3/6(火) 18:06 -

引用なし
パスワード
   take さん、回答有難うございます。

分かりにくい内容で申し訳けありません。

ピボットテーブルの項目をプルダウンさせると、
□(すべて表示)
□(空白)

□デパート
□スーパ
□コンビニ
が表示されます。

この中で、上から3つめを表示させたくないと考えています。
本来は、(空白)になるはずだと思っていたのですが、(空白)とは別に3行目の
ようなものができてしまいます。

【47267】Re:ピボットテーブルのプルダウンで表示...
発言  Ned  - 07/3/6(火) 23:17 -

引用なし
パスワード
   ▼nanashi さん:
こんにちは。
>ピボットテーブルの項目をプルダウンさせると、
これは、そのプルダウンボックスにしか存在しませんか?
実際のピボットのフィールドにブランクの行がある場合は、その行を選択して
Sub test()
  With ActiveCell
    If Len(.Value) > 0 Then MsgBox Asc(.Value)
  End With
End Sub
...などで、念の為、文字コードを調べてみるというのもひとつの手かも。

プルダウンボックスだけの問題なら、下記が参考になるかもしれません。

[ピボットテーブル フィールド] ダイアログ ボックスに無効なフィールド名が表示される
ttp://support.microsoft.com/kb/202232/ja

6091 / 13645 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free