Sub test() MsgBox DateFormat2("20110630") End Sub
Copyright © 2010 Office Tanabe. All Rights Reserved.