Excel VBA質問箱 IV

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

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


62284 / 76732 ←次へ | 前へ→

【19055】数字列の一括変換
質問  山プ〜  - 04/10/20(水) 11:35 -

引用なし
パスワード
   Excel2000を使用しています。
8桁の数字が入っている列を日付のように変更する処理を作成しています。

  max_gyo = Workbooks(base_book).Sheets(st).Range("F65536").End(xlUp).Row
   
  With Range("F5:F" & max_gyo) '日付編集 yyyymmdd -> yyyy/mm/dd
    .Offset(, 0).Value = Application.Text(.Value, "0000""/""00""/""00")
  End With

上記の処理で8桁の数字項目が日付に変換されるのですが、件数が多いと
「.Offset(, 0).Value = Application.Text(.Value, "0000""/""00""/""00")」
の行で「型が一致しません」とエラーになってしまいます。5400件ぐらいまでは
変換可能なのですが、制限があるのでしょうか?

制限があるとして、解消法はあるのでしょうか?

とりあえず、1レコードづつ、間に「/」を入れる処理を全件に行うようにFor文を
使用して対応しようと思ってますが、簡潔な対応法がありましたら、教えていただきたいと思います。

よろしくお願いします。

1 hits

【19055】数字列の一括変換 山プ〜 04/10/20(水) 11:35 質問
【19058】Re:数字列の一括変換 ichinose 04/10/20(水) 13:10 回答
【19062】Re:数字列の一括変換 山プ〜 04/10/20(水) 13:45 お礼
【19125】こういう方法もあると思いますよ ぬぅ 04/10/22(金) 15:31 発言
【19127】Re:こういう方法もあると思いますよ 山プ〜 04/10/22(金) 16:11 お礼

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