Excel VBA質問箱 IV

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

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


58484 / 76732 ←次へ | 前へ→

【22975】KeyPress イベントについて
質問  hisao E-MAIL  - 05/3/9(水) 10:52 -

引用なし
パスワード
   お世話になります。お教え下さい。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveCell.Column = 3 Then
UserForm1.Show
End If
で ListBox付 userformを表示させ

Private Sub ListBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)
ActiveCell() = ListBox1.Text
Unload UserForm1
ActiveCell.Offset(0, 1).Activate
End Sub

keypress iventでセルに値を入れ次のセルに移るのですが
この様な単純な構文では問題ないのですが
ちょっと複雑になると
次のセルに移った途端にフリーズしてエラーになります。
エラー表示はアップデートを勧告されるのですが
アップデートすると他のファイルに問題が起こり
余りさわりたくありません

同じマクロを BeforeDoubleClick で書くと問題なく操作出来るので
操作上はKeyPressが使いよいのですが、KeyPress イベントには何か問題があるのでしょうか?
ヒントだけでもお教え下さい
excelは2000,windowsはXPです
1 hits

【22975】KeyPress イベントについて hisao 05/3/9(水) 10:52 質問

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