Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9782 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【25577】ファンクションキー 年寄り 05/6/6(月) 13:03 質問[未読]
【25578】訂正 年寄り 05/6/6(月) 13:17 質問[未読]
【25579】Re:ファンクションキー つん 05/6/6(月) 13:17 発言[未読]
【25581】Re:ファンクションキー 小僧 05/6/6(月) 14:44 発言[未読]
【25582】Re:ファンクションキー 年寄り 05/6/6(月) 15:07 お礼[未読]
【25586】Re:ファンクションキー 小僧 05/6/6(月) 16:21 回答[未読]
【25596】Re:ファンクションキー 年寄り 05/6/7(火) 7:07 お礼[未読]
【25577】ファンクションキー
質問  年寄り E-MAIL  - 05/6/6(月) 13:03 -
引用なし
パスワード
   久しぶりに訪れました。今回もよろしく。

使用されていないファンクションキーを活用したいと思っています。Ｆ１キーはヘルプを開いてくれますね。Ｆ２キーは使用されていませんね。そこでＦ２キーを押された時、イベントとして捕らえたい。

例えば、あるフォームで値を入力している場合、前回の値と同じならＦ２キーを押して簡便化を図りたい。

何について調べたらよいか、ちょっとしたヒントをください。
【25578】訂正
質問  年寄り E-MAIL  - 05/6/6(月) 13:17 -
引用なし
パスワード
   Ｆ２キーも関数として使用されているようですね。使用されていないキーはどれですか？
【25579】Re:ファンクションキー
発言  つん E-MAIL  - 05/6/6(月) 13:17 -
引用なし
パスワード
   ▼年寄り さん：
こんにちは＾＾


>使用されていないファンクションキーを活用したいと思っています。Ｆ１キーはヘルプを開いてくれますね。Ｆ２キーは使用されていませんね。そこでＦ２キーを押された時、イベントとして捕らえたい。
>
>例えば、あるフォームで値を入力している場合、前回の値と同じならＦ２キーを押して簡便化を図りたい。

私は、したことがないので詳しくないのですが、

OnKey メソッド

を使えば出来そうな気がします。
ヘルプを見てみてください。
この質問箱にも、OnKeyを使った回答があったように思います。
検索してみてください。

それから、

＞Ｆ２キーは使用されていませんね

Ｆ２は、セルを編集モードにしますね＾＾
【25581】Re:ファンクションキー
発言  小僧  - 05/6/6(月) 14:44 -
引用なし
パスワード
   ▼年寄り さん、つん さん
こんにちは。
回答でなくて申し訳ないです。

>>使用されていないファンクションキーを活用したいと思っています。

http://allabout.co.jp/study/pcbasic/closeup/CU20030214A/index3.htm

こちらのページにエクセルのファンクションキーの説明が記載されていました。
自分も年寄り さんと同じ（？）ように「F1」キーしか使っていないので
知らなかったのですが…。
【25582】Re:ファンクションキー
お礼  年寄り E-MAIL  - 05/6/6(月) 15:07 -
引用なし
パスワード
   皆さん、ありがとうございます。

一つ質問をすると多くを学べますね。だからこのような箱が好きです。

ファンクションキーは全て使われているということなので、今回は日本語入力に比較的に使われていないキー『q』にマクロを割り当てます。
【25586】Re:ファンクションキー
回答  小僧  - 05/6/6(月) 16:21 -
引用なし
パスワード
   ▼年寄り さん：
こんにちは。
邪道…な方法ですが…。

Public ATAI As Variant

Private Sub Worksheet_Change(ByVal Target As Range)
　　If Target.Count > 1 Then Exit Sub
　　ATAI = Target.Value
End Sub

Sub ショートカット()
　　ActiveCell.Value = ATAI
End Sub


上のコードを記述した後、ツールバーの

[ツール] →　[マクロ] → [マクロ] を選択後、

「ショートカット」を選択してオプションをクリック

ショートカットキーのところで Ctrl ＋ □

ここで割り当ててみてはいかがでしょうか？

Ctrl ＋ 任意の１文字で、最後に変更したセルの値が呼び出せると思います。
【25596】Re:ファンクションキー
お礼  年寄り E-MAIL  - 05/6/7(火) 7:07 -
引用なし
パスワード
   どうもありがとう。

そうですね、ショートカットキーに割り当てる方法がスマートですね。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9782 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free