Excel VBA質問箱 IV

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

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


67022 / 76734 ←次へ | 前へ→

【14271】Re:入力をアルファベットのみにしたい
回答  ichinose  - 04/5/25(火) 10:23 -

引用なし
パスワード
   ▼まり さん:
おはようございます。

>いつもお世話になっております。
>
>色々と検索して調べたのですがわからなかったので質問させてください。
>セルの入力をアルファベット(大文字、小文字)の1文字のみのチェックを
>したいのですがアルファベットかどうかの関数ってあるのでしょうか?
>
>どうぞよろしくお願いいたします。
>======================================
>Private Function Init_Set() As Boolean
>
>  If Range(A1) <> "" Then       ' 空白チェック
>    If Len(Range(A1)) <> 1 Then   ' 桁数チェック 1のみOK
>     MsgBox ("登録記号の開始列が指定されていません")
>     Init_Set False
>    End If
>  
>  Else
>    MsgBox ("エラー")
>    Init_Set False
>  End If
>  
>End Function
Like演算子を試してみて下さい。

Sub test()
  If Range("a1").Value Like "[A-Z,a-z]" Then
   MsgBox "ok"
  Else
   MsgBox "ng"
   End If
End Sub
1 hits

【14268】入力をアルファベットのみにしたい まり 04/5/25(火) 10:05 質問
【14271】Re:入力をアルファベットのみにしたい ichinose 04/5/25(火) 10:23 回答
【14272】Re:入力をアルファベットのみにしたい つん 04/5/25(火) 10:23 回答
【14274】Re:入力をアルファベットのみにしたい まり 04/5/25(火) 11:04 お礼

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