![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?5a7ff87)
WindowsXP(home)上でexcel2002を使用しております。
標記のように、ハイパーリンクで別ブックの
グラフシートを参照させたいのですが、やり方が
分かりません。
普通のワークシート上のセルをリンク先に指定する
事はできるのですが、グラフシートにはできなくて
困っております。
1.リンク先に直接グラフシートを指定する。
2.グラフシート上にダミーのオブジェクトを
つくり、これをリンク先に指定することで
グラフを表示させる。
1,2どちらかでも結構ですので、ご存知の方
いらっしゃいましたらお願いいたします。
(最悪、ワークシート上にグラフをはめ込んで
同じシートのセルを参照させることで、
グラフを表示することも考えられますが、
できればこれは避けたいと考えております。)
よろしくお願いします。
No.1ベストアンサー
- 回答日時:
こんにちわ。
無理やりの方法ですが・・・・ ^^;
グラフシートが1枚だけの場合でしたら、通常シートを非表示にしておき、通常の
シートのセルにリンクを張る方法があります。
グラフが2枚以上の場合はマクロで処理するほかないのかも知れません。
一応次のようにします。
<グラフシートのあるブック>
1)通常シートのどこでもよいですので、グラフシート名のリストを作ります。
ここではグラフシートが3枚あって、Sheet1のA1:A3に入力したと仮定します。
2)Sheet1のA1:A3を選択して、Area という名前をつけます。
※Sheet1以外のシート(例:Sheet2)にも別なグラフシートリストを作る場合は
Sheet1のリスト範囲の名前は Sheet1!Area にして、Sheet2のリスト範囲は
Sheet2!Area という名前にします。
3)[Alt]+[F11]で Visual Basic Editor を開き、画面左側のツリーの中にある
ThisWorkbook をダブルクリックして、右画面に下記をコピーします。
'
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
Dim RNG As Range
For Each RNG In Range("Area")
If Target.Address = RNG.Address Then
Sheets(Target.Value).Select
End If
Next
End Sub
ハイパーリンクを張るブックでは、前記(1)のリスト内のセルにジャンプするように設定します。
No.2
- 回答日時:
#1です。
一部追加させてください。
If Target.Address = RNG.Address Then
の行の次に、
Range("G1").Select
という行を追加してください。
上の"G1"は仮のアドレスです。グラフシート名リストの範囲以外の実際のセルに
書き換えてください。
Workbook_SheetSelectionChange のマクロは、選択セルが変更されたときに実行
されますので、ここでポインタを別セルに移動しておかないとセルが選択された
ままですので、続けて同じハイパーリンクをクリックしたときにジャンプしてくれ
ません。
misatoanna様
うまく出来ました!ありがとうございます。
大変助かりました。
マクロでこんなことができるなんて、正直感動いたしました。
これで仕事の効率があがります。
本当にありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excel 散布図グラフ 外れ値 セル番地参照方法 4 2022/04/19 18:56
- Excel(エクセル) エクセルで”入力シート”の文字書式の変更を”出力シート”で同じ文字書式で印刷したいです。VBA希望 4 2023/04/24 11:07
- Excel(エクセル) エクセルの大きなシートでグラフを見つける 4 2022/07/28 10:07
- Excel(エクセル) エクセルのイベントVBAを複数のシートで動かしたい 1 2022/12/07 16:55
- Excel(エクセル) エクセル VBAでBook モジュールのプロシージァ(コード)に除外シートを設定したい 1 2023/01/11 15:53
- Excel(エクセル) シートが違う2枚のエクセルシートにある数値を別シートにコピーしたい(VBA?) 8 2022/03/31 12:24
- Excel(エクセル) EXCELのグラフを画像(JPG形式)で保存、通常実行がうまく行かない。ステップインはうまく行く 3 2022/08/30 12:06
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/03/07 14:05
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 3 2022/06/10 09:24
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/03/02 08:40
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【VBA】PDF出力に任意のファイ...
-
excel串刺し計算で合計値が表示...
-
エクセルのシートごとに連番を...
-
既存ワークシートにピボットテ...
-
社内SEです。機種、ライセンス...
-
エクセルでページごとにヘッダ...
-
エクセルで、ハイパーリンクの...
-
エクセル データベースからの引用
-
クロス表のアンケートをExcel 2...
-
Excel 一覧表から特定の数値を...
-
[EXCEL] あるフィールドをキー...
-
エクセル VBAでシートのコピー...
-
Excel2000 VBAで新規シート名を...
-
Access2010 Excelのエクスポー...
-
ピポットをマクロ登録したのですが
-
PowerPointの表内のカンマ
-
EXCELでタイトル行と一番下の行...
-
Excelのテーブル上のセルの保護...
-
Wordの差し込み印刷で空白行が...
-
エクセルの計算式でコンマを付...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【VBA】PDF出力に任意のファイ...
-
エクセルのシートごとに連番を...
-
エクセルで設定していないのに...
-
エクセルでページごとにヘッダ...
-
excel串刺し計算で合計値が表示...
-
Excelマクロ パスワードを入力...
-
複数のEXCELシートの印刷順の指定
-
既存ワークシートにピボットテ...
-
エクセルで、ハイパーリンクの...
-
社内SEです。機種、ライセンス...
-
エクセルで個人成績グラフをつ...
-
【VBA】#N/Aを無視して串刺し...
-
Access2010 Excelのエクスポー...
-
エクセルのイベントVBAを複数の...
-
この記号、手短(テミジカ)に日本語...
-
[EXCEL] あるフィールドをキー...
-
エクセル VBAでシートのコピー...
-
Excel 一覧表から特定の数値を...
-
excelのシート番号を取得したい...
-
マクロ記録機能を使ってグラフ...
おすすめ情報