Excel VBA質問箱 IV

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

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


1309 / 13644 ツリー ←次へ | 前へ→

【75157】特定の系列を一時的に非表示にさせる Excel2013新機能 take 13/12/22(日) 12:30 質問[未読]
【75158】Re:特定の系列を一時的に非表示にさせる ... マナ 13/12/22(日) 22:47 発言[未読]
【75160】Re:特定の系列を一時的に非表示にさせる ... take 13/12/23(月) 0:36 お礼[未読]

【75157】特定の系列を一時的に非表示にさせる E...
質問  take  - 13/12/22(日) 12:30 -

引用なし
パスワード
   Excel2013でグラフのマクロを作っています。グラフ中には8本の散布図が表示されており、その中で特定の系列を非表示にしたいと思います。機能としてはExcel2013から対応されているもので、データの選択 → データソースの選択窓で、凡例項目にチェックボックスとして追加された機能をVBAで動作させたいと思います。このチェックボックスをOFFにすることで特定の系列が非表示になり、思うとおりの動作になるのですが、マクロの自動記録では、コードが出力されませんでした。方法を教えていただけませんか?

【75158】Re:特定の系列を一時的に非表示にさせる...
発言  マナ  - 13/12/22(日) 22:47 -

引用なし
パスワード
   こんな感じのことですか

Sub test()
  With ActiveChart.FullSeriesCollection(1)
    .IsFiltered = Not .IsFiltered
  End With
End Sub

【75160】Re:特定の系列を一時的に非表示にさせる...
お礼  take  - 13/12/23(月) 0:36 -

引用なし
パスワード
   回答ありがとうございました。ずばりの内容でした。大変ありがとうございます。

やりたかったことは、ActiveChart.GetChartElement x, y, ElemID, Arg1, Arg2
を使用し、要素を抽出していたのですが、グラフ上には抽出の不要な系列があるためうまく抽出できていませんでした。(色なしグラフ系列にしたのですが、カーソルを目的の要素付近に近づけると、やはり不要系列を抽出してしまい、困っていました。)そのため、抽出時に一時非表示と考えていました。もう少し勉強してみます。

For i = 5 To 8

ActiveSheet.ChartObjects(Chartname).Select

With ActiveChart.FullSeriesCollection(i)

 .IsFiltered = False ”表示時にはTrueとしています。
 
End With

Next i

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