- VBAなんでも質問スレ
700 :デフォルトの名無しさん[sage]:2014/05/08(木) 16:40:16.01 ID:UhAEWxzw - スマートなやり方ってのがどんなのをご希望か知らんが
moto = "05/07/14" Debug.Print "moto= " & moto saki = DateSerial(Mid(moto, 7, 2), Mid(moto, 1, 2), Mid(moto, 4, 2)) Debug.Print Format(saki, "yyyy/mm/dd") まあこんな感じか
|