Excel VBA質問箱 IV

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

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


14103 / 76733 ←次へ | 前へ→

【68130】Re:文字の挿入と日付認識
回答  UO3  - 11/2/3(木) 22:07 -

引用なし
パスワード
   ▼ゆき さん:

こんばんは。1行目がタイトル行とします。

Sub Sample1()
  With Worksheets("Sheet1") '<== 実際のシート名に
    With .Range("B2").Resize(.Range("A1").CurrentRegion.Rows.Count - 1)
      .Formula = "=Left(A2,4)&""/""&Mid(A2,5,Len(A2)-4)&""/01"""
      .Value = .Value
      .NumberFormatLocal = "yyyy/m/dd"
    End With
  End With
End Sub

0 hits

【68129】文字の挿入と日付認識 ゆき 11/2/3(木) 21:19 質問
【68130】Re:文字の挿入と日付認識 UO3 11/2/3(木) 22:07 回答
【68132】Re:文字の挿入と日付認識 Jaka 11/2/4(金) 9:35 発言
【68153】Re:文字の挿入と日付認識 kanabun 11/2/7(月) 12:43 発言
【68209】Re:文字の挿入と日付認識 ゆき 11/2/15(火) 6:01 質問
【68214】Re:文字の挿入と日付認識 Jaka 11/2/15(火) 9:28 発言
【68215】Re:文字の挿入と日付認識 UO3 11/2/15(火) 9:40 回答

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