| |
...んー。
こちらでサンプルデータを作っても再現できません。（xl2000）
ピボットテーブルを作り直して見るのが手っ取り早いような気がしますが、
>>仮にPivotItemのリストにあったとしても、元データにも在るかどうかも確認してみてください。
>→あります。
ここの再確認の必要があると思います。
・"ﾋﾟﾎﾞｯﾄﾃｰﾌﾞﾙ1"というのが別のピボットテーブルだったとか
・SourceData:="=リスト"範囲に含まれていなかったとか
・半角全角の違いがあったとか
>手作業では問題無く動きます。
との事なので、それをマクロ記録して比較するとか、置き換えてみるとかしてみてください。
Sub Macro2()
'
' Macro2 Macro
' マクロ記録日 : 2008/11/19 ユーザー名 : no name
'
'
With ActiveSheet.PivotTables("ﾋﾟﾎﾞｯﾄﾃｰﾌﾞﾙ1").PivotFields("A")
.PivotItems("１").Visible = False
End With
With ActiveSheet.PivotTables("ﾋﾟﾎﾞｯﾄﾃｰﾌﾞﾙ1").PivotFields("A")
.PivotItems("１").Visible = True
End With
End Sub
|
|
n
- 08/11/19(水) 13:41 -
