Excel VBA質問箱 IV

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

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


68484 / 76734 ←次へ | 前へ→

【12787】Re:keyのイベントプロシージャーは?
質問  三四郎 E-MAIL  - 04/4/14(水) 21:00 -

引用なし
パスワード
   ▼IROC さん:
>いまいち使用目的が分からないので、妙なコードですが・・
>
>
>Sub test()
>  Application.OnKey "{k}", "sample1"
>End Sub
>
>Sub sample1()
>Dim x As String  
>  If ActiveCell.Address(False, False) = "A1" Then
>    x = "k"
>    MsgBox x
>  End If  
>End Sub


具体的には以下のイベントプロシジャーのDoループの中で、例えばキー[k]を押す
とアクテブにしたセル(例えばC5)に[k]が表示されるのです。
MS-DS上のBasic(VBは調べてありません)ではinkey$ステートメントで解決しますがExcelVBAにはinkey$がありません、inkey$に変わる方法が無いものかと苦労しています、お手数をおかけしますが何か良い方法がありましたら、ご教授ください。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  Dim actRw As Integer, actCl As Integer
  actRw = ActiveCell.Row
  actCl = ActiveCell.Column
  Do
    Cells(actRw, actCl) = inkey$
  Loop While Cells(actRw, actCl) <> ""
End Sub

3 hits

【12723】keyのイベントプロシージャーは? 三四郎 04/4/13(火) 13:37 質問
【12725】Re:keyのイベントプロシージャーは? IROC 04/4/13(火) 13:51 回答
【12746】Re:keyのイベントプロシージャーは? 三四郎 04/4/13(火) 21:51 質問
【12751】Re:keyのイベントプロシージャーは? IROC 04/4/14(水) 9:00 回答
【12787】Re:keyのイベントプロシージャーは? 三四郎 04/4/14(水) 21:00 質問
【12792】Re:keyのイベントプロシージャーは? よろずや 04/4/14(水) 23:23 発言
【12794】Re:keyのイベントプロシージャーは? ichinose 04/4/15(木) 0:27 発言

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