Page 878 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ INDEX ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼テキストボックスの日付入力を正しく反映 EBI 03/3/16(日) 10:51 ┣Re:テキストボックスの日付入力を正しく反映 ichinose 03/3/16(日) 11:42 ┗Re:テキストボックスの日付入力を正しく反映 Hirofumi 03/3/16(日) 11:48 ┗Re:テキストボックスの日付入力を正しく反映 EBI 03/3/16(日) 12:38 ─────────────────────────────────────── ■題名 : テキストボックスの日付入力を正しく反映 ■名前 : EBI <ebi@gctv.ne.jp> ■日付 : 03/3/16(日) 10:51 -------------------------------------------------------------------------
テキストボックスから日付を入力して、該当セルへ自動入力させているのですが正しく反映されていません。 該当セルの書式は、日付で[H15.3.16]というようにしています。 テキストボックスへ03/6/10と入力するとH22.3.6 (2010/3/6) 03/5/25と入力するとH37.3.5 (2025/3/5) 03/5/1と入力するとH13.3.5 (2001/3/5) というふうに入力されてしまいます。 2003/6/10というように入力すると、正しくH15.6.10で入力されます。 どうも、年月日の年を2桁で入力すると「月日年」として認識しているようですが、2桁で正しく反映させる方法を教えてください。 |
▼EBI さん: こんにちは。 >テキストボックスから日付を入力して、該当セルへ自動入力させているのですが正しく反映されていません。 >該当セルの書式は、日付で[H15.3.16]というようにしています。 > >テキストボックスへ03/6/10と入力するとH22.3.6 (2010/3/6) >03/5/25と入力するとH37.3.5 (2025/3/5) >03/5/1と入力するとH13.3.5 (2001/3/5) >というふうに入力されてしまいます。 > >2003/6/10というように入力すると、正しくH15.6.10で入力されます。 >どうも、年月日の年を2桁で入力すると「月日年」として認識しているようですが、2桁で正しく反映させる方法を教えてください。 cells(1,1).value=cdate(textbox1.text) cdate関数を使うと正しく表示されています。 |
ここでは行っていませんが、TextBoxの値が日付かどうかのチェックを するでしょうから、同時に、TextBoxに値を日付に直し、代入し直したら? Private Sub TextBox1_AfterUpdate() With TextBox1 .Text = CDate(.Text) End With End Sub |
いつもお世話になっています。ありがとうございました。 正しく反映させることができました。 |