スキルアップ・問題解決なら、モーグにおまかせ！

お疲れさまです。
 
下記のようなコードを書いたのですが、Cells(7, 12)とCells(7, 13)が空白
でも、日付が入ってしまうのです。
 
何か設定に間違いがあるのでしょうか
 
お忙しいとは思いますが宜しくお願い致します。
 
Cells(7, 12).Value <> "" And Cells(7, 13).Value <> "" Then
    Cells(7, 15).Value = Date

以下を動かした場合どうなりますか？
 

Sub TEST()
    Debug.Print "Cells(7, 12) → " & Cells(7, 12).Value
    Debug.Print "Cells(7, 13) → " & Cells(7, 13).Value
    If Cells(7, 12).Value <> "" And Cells(7, 13).Value <> "" Then
        Cells(7, 15).Value = Date
    Else
        MsgBox "どちらかが空っぽです"
    End If
End Sub

taitaniさん
ご確認頂きまして、ありがとうございました。
 
何故か、翌日に動作しましたら、正しく動作しております。
windowsか、Excel 側の問題だったのでしょうか
 
FIXとさせて頂きます。