Excel VBA質問箱 IV

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

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


74473 / 76732 ←次へ | 前へ→

【6723】Re:日付けの処理
質問  ヤマトダマシイ  - 03/7/28(月) 19:00 -

引用なし
パスワード
   ▼Hirofumi さん:
返信ありがとうございます。

>横から失礼します
>現実にはどうなっているのですか
>データベースて、Excelのシートに作られているの?

EXCELのシートに作られてます

>日付の形は

>「平成15年11月12日」←これです。


>場合によっては、マクロか関数作って、シリアル値に変換する事は出来ないのですか?

すいません。シリアル値がわかりません・・・後で調べときます・・・

>例えば、「11月12日」や「11月12日」だとすると平成15年で善いのですか?

「平成15年11月23日」と「平成15年11月30日」のデータを比較したいです。

具体的に言うこれら2つデータは値が違うのである処理をしたい・・・です
>
>例として、以下の様なユーザー定義関数を作ります
>現在の日付の隣りに列を挿入します
>其処に作成した関数でシリアル値に変換します

シリアル値の意味がなんとなくわかりました。
こう思ってください日付のデータであって日付のデータでない・・・
ほかのデータベースから機械的にエクセルに変換したので日付を日付として認識していないようです。
つまり「1日目」とか「1回」とか数字に文字が入ってるもの同士で比較できたら解決すると思うのですが・・・

「1回目」と「2回目」というデータは比較でいないですかね?

これにもシリアル値があれば解決しそうですが・・・

すいません初歩的な質問で・・・本に載ってないもので・・・いい本ないですかね・・・

>其れを、形式を選択して張り付けで、値に直し、セルの書式を日付にします
>現在の日付と比較してOKなら現在の日付列を削除します
>なんて事で出来ないの?
>
>Public Function DateConversion(vntValue As Variant) As Variant
>
>  Dim strTmp As String
>  
>  DateConversion = vntValue
>  If IsDate(StrConv(vntValue, vbNarrow)) Then
>    strTmp = StrConv(vntValue, vbNarrow)
>  Else
>    strTmp = "平成15年" & StrConv(vntValue, vbNarrow)
>  End If
>  If IsDate(strTmp) Then
>    DateConversion = DateValue(strTmp)
>  End If
>  
>End Function

1 hits

【6688】日付けの処理 ヤマトダマシイ 03/7/23(水) 22:36 質問
【6689】Re:日付けの処理 ぴかる 03/7/24(木) 8:55 回答
【6709】Re:日付けの処理 ヤマトダマシイ 03/7/27(日) 12:18 質問
【6710】Re:日付けの処理 Hirofumi 03/7/27(日) 17:41 発言
【6723】Re:日付けの処理 ヤマトダマシイ 03/7/28(月) 19:00 質問
【6724】Re:日付けの処理 Hirofumi 03/7/28(月) 20:59 発言
【6725】Re:日付けの処理 Hirofumi 03/7/28(月) 21:07 発言
【6780】Re:日付けの処理 ヤマトダマシイ 03/8/3(日) 18:35 質問
【6781】Re:日付けの処理 ヤマトダマシイ 03/8/3(日) 18:37 質問
【6782】Re:日付けの処理 Hirofumi 03/8/3(日) 19:54 回答
【6784】Re:日付けの処理 Hirofumi 03/8/3(日) 20:15 回答
【6786】Re:日付けの処理 ヤマトダマシイ 03/8/3(日) 22:41 お礼

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