Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
4246 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【57717】textboxに入力した数値を日付表示に変換する方法 kog 08/9/10(水) 14:16 質問[未読]
【57719】Re:textboxに入力した数値を日付表示に変換... かみちゃん 08/9/10(水) 14:25 発言[未読]
【57724】Re:textboxに入力した数値を日付表示に変換... kog 08/9/10(水) 15:31 お礼[未読]
【57720】Re:textboxに入力した数値を日付表示に変換... kanabun 08/9/10(水) 14:35 発言[未読]
【57723】Re:textboxに入力した数値を日付表示に変換... kog 08/9/10(水) 15:29 お礼[未読]
【57717】textboxに入力した数値を日付表示に変換...
質問  kog  - 08/9/10(水) 14:16 -
引用なし
パスワード
   textboxに20080910と入力した時に
そのtextboxに2008/09/10と表示するにはどうしたらいいのでしょうか？
入力時の文字数制限等は限定してもかまいません。
教えてください。
【57719】Re:textboxに入力した数値を日付表示に変...
発言  かみちゃん  - 08/9/10(水) 14:25 -
引用なし
パスワード
   こんにちは。かみちゃん　です。

>textboxに20080910と入力した時に
>そのtextboxに2008/09/10と表示するにはどうしたらいいのでしょうか？

以下のような感じで変換できます。
DateValue(Format("20080910", "0000/00/00"))
【57720】Re:textboxに入力した数値を日付表示に変...
発言  kanabun  - 08/9/10(水) 14:35 -
引用なし
パスワード
   ▼kog さん：
>textboxに20080910と入力した時に
>そのtextboxに2008/09/10と表示するにはどうしたらいいのでしょうか？

'----------------------------------------------------
　　Dim ss As String
　　ss = TextBox1.Text
　　If ss Like "########" Then
　　　　If IsDate(Format$(ss, "0000-00-00")) Then
　　　　　　TextBox1.Text = Format$(ss, "0000\/00\/00")
　　　　Else
　　　　　　MsgBox "8桁の数字だけれど、日付ではない"
　　　　End If
　　End If
'----------------------------------------------------
こんな感じでしょうか？
ただ、このコードをどのイベントプロシージャにおくか、が
問題ですね？
【57723】Re:textboxに入力した数値を日付表示に変...
お礼  kog  - 08/9/10(水) 15:29 -
引用なし
パスワード
   ▼kanabun さん：
>▼kog さん：
>>textboxに20080910と入力した時に
>>そのtextboxに2008/09/10と表示するにはどうしたらいいのでしょうか？
>
>'----------------------------------------------------
>　　Dim ss As String
>　　ss = TextBox1.Text
>　　If ss Like "########" Then
>　　　　If IsDate(Format$(ss, "0000-00-00")) Then
>　　　　　　TextBox1.Text = Format$(ss, "0000\/00\/00")
>　　　　Else
>　　　　　　MsgBox "8桁の数字だけれど、日付ではない"
>　　　　End If
>　　End If
>'----------------------------------------------------
>こんな感じでしょうか？
>ただ、このコードをどのイベントプロシージャにおくか、が
>問題ですね？

解決することができました。
ありがとうございます。
また解からないことがあった時は質問をするので
よろしくお願いします。
【57724】Re:textboxに入力した数値を日付表示に変...
お礼  kog  - 08/9/10(水) 15:31 -
引用なし
パスワード
   ▼かみちゃん さん：
>こんにちは。かみちゃん　です。
>
>>textboxに20080910と入力した時に
>>そのtextboxに2008/09/10と表示するにはどうしたらいいのでしょうか？
>
>以下のような感じで変換できます。
>DateValue(Format("20080910", "0000/00/00"))


解決することができました。
ありがとうございます。
また解からないことがあった時は質問をするので
よろしくお願いします。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
4246 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free