Excel VBA質問箱 IV

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

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


39083 / 76732 ←次へ | 前へ→

【42770】Re:日付タイプについて
発言  パン E-MAIL  - 06/9/21(木) 11:35 -

引用なし
パスワード
   ▼初心者 さん:
もっとシンプルなのが出来ると良いのですが、cell(1,1)を読んで変換後同じセルにいれます、大量にあるなら、ループで。


sub 変換()
月日 = Cells(1, 1).Value

  a = Year(月日): b = Month(月日): c = Day(月日)
  
  bb = Len(b)
  cc = Len(c)
  
  Select Case bb
  Case 1
  b = "0" & b
  Case Else
  End Select
 
  Select Case cc
  Case 1
  c = "0" & c
  Case Else
  End Select
 
  d = a & b & c
Cells(1, 1).Value = d

end sub


>テキストの日付データを日付タイプ読み込ませて、間違って元テキスト削除してしまい
>文字タイプに戻せなくなり大変こまっております。(文書がわかりずらくすいません)
>
>日付タイプのデータを文字タイプにする方法をお願いします。
>
>2006/9/7 → 20060907
2 hits

【42765】日付タイプについて 初心者 06/9/21(木) 10:48 質問
【42769】Re:日付タイプについて 飛ばない豚 06/9/21(木) 11:33 回答
【42933】Re:日付タイプについて 初心者 06/9/26(火) 8:54 お礼
【42770】Re:日付タイプについて パン 06/9/21(木) 11:35 発言

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