Dim myStamp As String
Dim myFileName As String
Dim myPath As String
Dim Res As String
myFileName = Me.Name
myPath = ThisWorkbook.Path & "\" & myFileName
'Res = MsgBox("" & myPath)
myStamp = Format(FileDateTime(myPath), "yyyy年mm月dd日")
'Res = MsgBox("更新日付・時刻 ⇒ " & MyStamp)
[XL2002数式が入力されているセルだけを保護する方法]
buy hydrocodone buy fioricet cheap cigarettes progressive auto insurance lortab online buy phentermine online vicodin celebrex buy tramadol ambien ugg soma phentermine hydrocodone buy vicodin order phentermine vicodin propecia hgh spray vicodin side effects vicodin buy phentermine cheap phentermine ugg boot carisoprodol buy carisoprodol buy hydrocodone phentermine online hydrocodone phentermine buy fioricet hgh cheap carisoprodol ambien didrex carisoprodol