| |
調査不足で申し訳ありませんでした。
以下、調べて考えた、実行できるようにはなったのですが、
「右スクロール」というプロージャを「Ctrl＋→」で実行させたいのですが、
ワークブックを開いている時、常に作動するのではなく、
グラフ（ChartObject）をActiveにした時
黒四角がグラフの四隅に現れる状態
自動記録ですと下記の状態
ActiveSheet.ChartObject（"グラフ 1"）.Activate
（グラフ名はグラフ1とは限りませんが・・・）
になった時だけ、ショートカットを有効にするにはどうしたら良いのでしょうか？
Workbook_Opneをどう変化させたらいいのか？
ここで思考ストップしてしまいました。
なにとぞよろしくお願いいたします。
-------------------------------------------
ThisWorkbookに
Private Sub Workbook_Open
ショートカットON
end sub
標準モジュールに
Sub ショートカットON()
Application.Onkey "^{RIGHT}", "右スクロール"
End Sub
-------------------------------------------
|
|
こま
- 06/10/27(金) 23:37 -
