Excel VBA質問箱 IV

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

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


52241 / 76732 ←次へ | 前へ→

【29332】Re:TextBoxの入力値制限
発言  ichinose  - 05/10/1(土) 10:52 -

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

>TextBox1の入力値を日付に限定したい。日付は以下の3通りを許可したい。他の入力がされたらエラーメッセージを出す。
>04/10/1
>2004/10/1
>平成16年10月1日
厳密にやれば出来そうですけど・・・、面倒なので、
日付に変換できるか否かを調べて出来るデータのみを
ある形式で表示するに仕様を変更されたら如何ですか?
例は、日付として認識できるデータは、YYYY/M/D形式で表示する例です。

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
  With TextBox1
   If IsDate(.Text) Then
     .Text = Format(.Text, "yyyy/m/d")
   Else
     MsgBox "no good"
     .SelStart = 0
     .SelLength = Len(.Text)
     Cancel = True
     End If
   End With
End Sub

とっかかりとして、参考にして下さい。

それと・・・、
Exitイベントは、便利にみえますが、仕様によっては、問題も多々あります。
色々試してから、お使いください。

0 hits

【29331】TextBoxの入力値制限 年寄り 05/10/1(土) 9:58 質問
【29332】Re:TextBoxの入力値制限 ichinose 05/10/1(土) 10:52 発言
【29333】Re:TextBoxの入力値制限 年寄り 05/10/1(土) 11:13 発言
【29339】Re:TextBoxの入力値制限 ichinose 05/10/1(土) 19:39 発言
【29340】Re:TextBoxの入力値制限 ichinose 05/10/1(土) 20:34 発言
【29392】Re:TextBoxの入力値制限 年寄り 05/10/4(火) 12:04 お礼

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