日付チェック (ID:121413)

名前

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

本文 「例えば」としか書いていないので、コレだけでは作れない予感が(orz もっとフォーマットを決めましょう。 まぁ、イジワルをすれば、 Function x(ByVal s As String) As String If s = "20050503" Then x = "2005/05/03" If s = "2005/05/03" Then x = "2005/05/03" If s = "200505" Then x = "2005/05" End Function と言うのが出来るわけですが(ぇ