Makro ile Saat Farkı

[şehiriçi]

Merhaba Arkadaşlar ,
Ekte sunduğum dosyada makrolu bir şekilde saat farkı almaya çalıştım ama alamıyorum
Dosyayı açınca Rapor butonuna basın H sütununa yazması gerekn saatlerin yazıldığını ancak
I ve J sütunlarına da çıkarma işlemi yapması gerek .ama yapmıyor bir hatam var ama nerede bulamadım
Her zaman olduğu gibi siz dostların yardımına ihtiyacım var , saygılar.

 

[şehiriçi]

Arkadaşlar soru net anlaşılsın diye biraz daha sadeleştirdim .
Ekli dosyayı inceler misiniz

 

[şehiriçi]

Arkadaşlar desteğinizi bekliyorum

 

[Korhan Ayhan]

Deneyiniz.

Private Sub CommandButton1_Click()
    If CDate(Range("B2")) = "00:07:30" Then Range("C2") = Range("B2") - Range("A2")
End Sub

 

[şehiriçi]

Korhan Bey yine imdadıma yetiştiniz çok teşekkürler .