tarih farkı

[omyuga]

merhabalar. yıllık izinlerde başlangıç ve bitiş tarihleri arasındaki farkı hesaplatıyorum. ama verilen tarih aralığı içinde pazar günü geciyorsa bunu cıkarmasını sağlayabilirmiyim???

 

[Korhan Ayhan]

Selamlar,

Örnek bir dosya ekleyebilirmisiniz.

 

[omyuga]

SLM

DOSYAYI ekledim..

 

[mehmett]

Aklıma gelen bir yöntemi dosyanıza yazdım Sn omyuga.

 

[tunacanhan]

MErhaba
doğum yılımı yıl ay ve gün olarak nasıl heasplayabilirim.
:hey:

 

[AS3434]

Aşağıdaki linki inceleyin.
http://www.excel.web.tr/viewtopic.php?t=9281

 

[omyuga]

çok teşekkürler sayın mehmettt

 

[atöz]

selamlar,
İki tarih arasındaki farkı MAKRO ile pazar hariç olarak nasıl hesaplatabiliriz?

Teşekkürler.

 

[Leoncio]

Sn.Atöz
Merhaba;
Cumartesi dahilmi olacak?

 

[atöz]

evet ctesi dahil pazar hariç

 

[algil]

MErhaba
doğum yılımı yıl ay ve gün olarak nasıl heasplayabilirim.
:hey:

Merhaba

Sitemizden edindiğim kodlarlarla yapmış olduğum çalışmayı inceleyiniz.

 

[Leoncio]

Sayın Atöz;

Aşağıdaki fonksiyonu inceleyiniz.

Function Isgunu(Bas_Trh As Date, Son_Trh As Date)
Dim Say As Integer
For mars = Son_Trh To Bas_Trh Step -1
If Weekday(mars, vbMonday) = 6 Then Say = Say + 1
If Weekday(mars, vbMonday) = 7 Then Say = Say + 1
Next mars
Isgunu = (Son_Trh - Bas_Trh) + 1 - Say
End Function

 

[atöz]

İlginize çok teşekkür ederim.Ben de bu arada yine sitede bulduğum aşağıdaki kodlar ile işimi gördüm gibi. Kullanılan makroya uyarlandığında güzel çalışıyor."say" değeri iki tarik arasındaki pazar sayısı oluyor.

sub tarihfark()
dim bas As Date
dim son As Date
say = 0
For i = bas To son
If i Mod 7 = 1 Then
say = say + 1
End If
Next
tarihfark = son-bas-say
End

 

[algil]

selamlar,
İki tarih arasındaki farkı MAKRO ile pazar hariç olarak nasıl hesaplatabiliriz?

Teşekkürler.

Aşağıdaki eki inceleyebilir misiniz?

 

[Leoncio]

O zaman problem yok. Fakat verdiğim fonksiyonu .xla olarak kaydederseniz diğer çalışmalarda da kullanma avantajı olur.