Excelでスクロールする際にチャートを常に表示に保つにはどうすればよいですか？

シート内に挿入されたチャートがある場合、データを見るためにシートを下にスクロールすると、以下のようにチャートが同時に表示されなくなります。これは不便です。この記事では、シートを上下にスクロールしてもチャートを常に表示に保つためのVBAコードを紹介します。

チャートを常に表示に保つ

チャートを常に表示に保つ

シートをスクロールしながらチャートを表示に保つには、以下のVBAコードを使用して解決できます。

1. チャートを表示に保ちたいシートタブを右クリックし、「表示コード」を選択します。 表示コード コンテキストメニューから選択してください。スクリーンショットをご覧ください：

2. 表示されるMicrosoft Visual Basic for Applicationsウィンドウで、以下のコードを空白のスクリプトに貼り付けます。

VBA: チャートを常に表示に保つ

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice20161111
    Dim CPos As Double
    Application.ScreenUpdating = False
    CPos = ActiveWindow.ScrollRow * ActiveCell.RowHeight
    ActiveSheet.ChartObjects("Chart 2").Activate
    ActiveSheet.Shapes("Chart 2").Top = CPos
    ActiveWindow.Visible = False
    Application.ScreenUpdating = True
End Sub

3. ダイアログを保存して閉じると、任意のセルをクリックしたときにチャートが上下に移動します。

注意：

(1) VBAコード内の「Chart 2」は、表示に保ちたいチャート名です。必要に応じて変更できます。

(2) このVBAでは、複数のチャートをグループとして常に表示に保つことはできません。

Kutools AIでExcelの魔法を解き放つ

• スマート実行: セル操作、データ分析、グラフ作成を簡単なコマンドで行います。
• カスタム数式: ワークフローを合理化するための独自の数式を生成します。
• VBAコーディング: 簡単にVBAコードを作成し実装します。
• 数式の解釈: 複雑な数式を簡単に理解できます。
• テキスト翻訳: スプレッドシート内の言語障壁を取り除きます。

AI搭載ツールでExcelの機能を強化しましょう。今すぐダウンロードして、かつてないほどの効率を体験してください！