No.4ベストアンサー
- 回答日時:
#3 です。
失礼。#3 だと Tab と Enter まで入力できないので、以下に差し替えます。
blnFlag = ((KeyCode >= 48) * (KeyCode <= 57)) _
+ ((KeyCode >= 96) * (KeyCode <= 105)) _
+ (KeyCode = 8) + (KeyCode = 13) + (KeyCode = 9)
> IMEModeを「8-fmIMEModeAlpha」
これだと入力モードの変更が可能なので、3-fmIMEModeDisable にしといた方が
良いかと思います。
No.3
- 回答日時:
こんにちは、KenKen_SP です。
こんな感じで KeyDown イベントを使えば可能だと思います。
Private Sub TextBox1_KeyDown( _
ByVal KeyCode As MSForms.ReturnInteger, _
ByVal Shift As Integer)
Dim blnFlag As Boolean
blnFlag = ((KeyCode >= 48) * (KeyCode <= 57)) _
+ ((KeyCode >= 96) * (KeyCode <= 105)) _
+ (KeyCode = 8)
If Not blnFlag Then
KeyCode = 0
End If
End Sub
半角数字と Back Space しか受け付けません。Excel ユーザーフォーム
なら、この方法で Ctrl + V が抑止できますし、右クリックメニュー
は最初から表示されませんので、コピペは不可能です。
この方法で十分だと思いますが、ユーザーによる手動の入力を抑止して
いるだけで、完全に半角数字以外の入力を抑止しているわけではありま
せん。(プログラムからは入力可能とか)
念を入れるなら、Lost イベント等で入力値のチェックも行います。
No.2
- 回答日時:
お世話になります。
残念ながら KeyPress だけだと、コピペされたときには操作内容によっては
発生しないイベントなので確実とは言いがたいです。
(私もかつて悩んだ経験があります)
なので、確実なのは LostFocus とかになると思うのですが、
入力時に省かせたいというのであれば
Key...系イベント(Down とか Press とか)も LostFocusも
どちらからも呼べるようなメソッドを作成すれば
万全かと思います。
参考URL:http://homepage1.nifty.com/rucio/main/technique/ …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
字面がカッコいい英単語
あなたが思う「字面がカッコいい英単語」を教えてください。
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
InputBoxの入力値を半角数字のみと限定する方法
Excel(エクセル)
-
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
Access フォームのテキストボックスに半角英字のみで入力する設定は
Access(アクセス)
-
-
4
VB.NET2003 テキストボックスに半角英数字以外入力させない
Visual Basic(VBA)
-
5
TextBoxに半角数字のみの入力しかできないようにしたい
Visual Basic(VBA)
-
6
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
7
テキストボックスの番号を使ったFor~Next文について
Visual Basic(VBA)
-
8
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
9
ListViewで複数選択された項目を一度に削除する方法
Visual Basic(VBA)
-
10
テキストボックス(VBA)でEnterを押したときに作動するマクロ
Access(アクセス)
-
11
エクセルVBA テキストボックスに3桁ごとにコンマ
Visual Basic(VBA)
-
12
エクセルVBA テキストボックスへのセットフォーカスについて
Visual Basic(VBA)
-
13
VBA エンターキーでイベントに入りたい。
PowerPoint(パワーポイント)
-
14
数字以外の入力をエラーにするには?
Visual Basic(VBA)
-
15
ExcelVBA EnableプロパティがFalseの時に文字の色を変えたくない
Visual Basic(VBA)
-
16
ExcelVBAでテキストボックスの表示形式を小数点第二位まで表示する方法
Visual Basic(VBA)
-
17
ユーザーフォームのSetFocusが働かない?
その他(プログラミング・Web制作)
-
18
worksheetFunctionクラスのVlookupプロパティを取得できません エラーへの対応
Visual Basic(VBA)
-
19
excelのInputBoxで日本語入力OFFにしたい
Excel(エクセル)
-
20
エクセルVBAのフォームを最前面にする方法を教えてください。
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
テキストボックスの入力制限
-
ハイフンとマイナス
-
ECサイト★2度目以降の情報入力...
-
「FROM 句の構文エラーです」が...
-
ネット内で「事後通販」という...
-
STEAMでゲームを購入したところ...
-
agodaで現地決済にしたのにカー...
-
カードの請求でApple.combillみ...
-
至急です。Yahoo!IDを作りたく...
-
f´(x)の読み方
-
Amazonについてです。 アカウン...
-
通販の誤送で個人情報漏えい?
-
au決済についての質問です 先ほ...
-
MinecraftのJava版の購入方法に...
-
バイクの自賠責をau pay(簡単...
-
ペイペイカードを申請しました...
-
ノートPCの通販価格と量販店価...
-
クレジットカードについて
-
何の請求でしょうか
-
宝永のぎょうざ知ってる方!!
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ハイフンとマイナス
-
VBAのTextBoxに半角数字のみ入...
-
TextBoxに半角数字のみの入力し...
-
VB2005 TextBoxに何も入力しな...
-
scanf( )で日本語を入力する方...
-
テキストボックスの入力制限
-
「FROM 句の構文エラーです」が...
-
VB.net テキストボックスの入力...
-
入力フォーム(電話番号)
-
教えて!全角文字「μ」の半角文...
-
WinAPIで日本語入力モード(倍...
-
コンパイルについて。
-
先日も質問したんですがC言語に...
-
エクセルVBAで住所録の分類...
-
フォーム入力の際、電話番号等...
-
JSPで、日本語入力のON/OFF
-
アクセスのフォーム入力時に文...
-
携帯で文字入力を簡単にしたい
-
VBScriptsについてご教授下さい。
-
自分のホームページアドレスを...
おすすめ情報