Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

23167 / 76732

←次へ　｜　前へ→


	【58935】Re:「PivotItemクラスのVisibleプロパティを設定できません。」の解決法

n - 08/11/19(水) 0:26 -


	引用なし

	パスワード

・エラーが出る状況で、同じ動作を手作業で行った場合はどうなりますか？・また、こちらでも再現できる状況を最低限のデータで提示する事は可能ですか？例えば　　　A列　B列　C列　１　A　　B　　C 　２　1　　1　　1 　３　1　　2　　1 　４　1　　3　　1 　５　2　　1　　1 　６　2　　2　　1 　７　2　　3　　1 　８　3　　1　　1 　９　3　　2　　1 １０　3　　3　　1 上記データレイアウトで、 Sub Macro1() 　　With ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, _ 　　　　　　　　　　　　　　　　　　　　SourceData:="Sheet1!A1:C10") _ 　　　　　　　　　　　　　　　　　　　　.CreatePivotTable(TableDestination:=Range("E1")) 　　　　.AddFields RowFields:=Array("A", "B") 　　　　.PivotFields("C").Orientation = xlDataField 　　End With End Sub こんなピボットテーブルを作成した場合で、 Sub　ピボット() 　　With ActiveSheet.PivotTables("ﾋﾟﾎﾞｯﾄﾃｰﾌﾞﾙ1").PivotFields("A") 　　　　.PivotItems("1").Visible = True 　　　　.PivotItems("2").Visible = True 　　　　.PivotItems("3").Visible = False 　　End With End Sub このマクロのどの行でエラーになる、とか。・また、Excelのバージョンは何でしょう？