特定の日付へ変更するには？ (ID:108938)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 こんな感じかな。 Private Function aaa(ByVal S As String) As String aaa = Format(Replace(S, "/", ""), "0000/00/00") End Function