• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Ihbar süresini otomotik bulma

  • Konbuyu başlatan Konbuyu başlatan sandokan
  • Başlangıç tarihi Başlangıç tarihi
Katılım
22 Kasım 2005
Mesajlar
389
Excel Vers. ve Dili
XP
ıhbar tazmınatı
6 aydan az 2 hafta
6ay-1.5 yıl 4 hafta
1.5 yıl-3 yıl 6 hafta
3 yıl sonra 8 hafta

giriş ve cıkıs tarihlerini baz alarak ihbar süresini otomotik getirmek istiyorum
ekteki dosyada




eğer yukarıda 07.01.2010 cıkıs tarihi ve 01.11.1997 giriş tarihi olduguna göre bu kişi 3 yılı aştıgı için ihbar süresi 8 hafta…

bu kişinin cıkıs tarihi 6 aydan az sürmüsse g20 hücresine 2 6 ay ile 1,5 arasında ise 4 1,5 yıl 3 yıl arası ise 6,3yıl sonrası ise 8 yazmasını istiyorum bu mümkün mü
 

Ekli dosyalar

  • TZ.xls
    TZ.xls
    27.5 KB · Görüntüleme: 32
7,00 1,00 2.010,00
1,00 11,00 1.997,00
sayın leoncio bu veriler işigında ı9 sutununa göre uyarlamak istiyorum
cünkü normal tarih formatındaki 07.01.2010 her zaman yazılı degil ama 7,00 1,00 2.010,00 şeklinde tarihler buna göre yapabilirmkiyiz
 
Siz örnek tabloda tarih formatını doğru girmişsiniz. Bende ona göre cevap yazdım. Formatı tam olarak görebilmem için örnek tablo üzerinde gösterirmisiniz.
 
C2 hücresinde tarih formatı kullanılmış. Formülü buraya linkleyebilirsiniz.
 
Kıdem güne göre ihbar gününü bulan KTF aşağıda bulabilirsiniz.

Kod:
Function IHBARGUN(KidemGün As Range) As Long
If KidemGün = Null Then Exit Function
Select Case KidemGün
Case 1 To 180
veri = 14
Case 181 To 540
veri = 28
Case 541 To 1080
veri = 42
Case 1081 To 99999
veri = 56
End Select
IHBARGUN = veri
End Function
 
BU fomulu vba ekledım ama olmadı bşey.
ihbar gününün yerine herhangibir forml koymalyimmi..
cukü bu dosya alta dogru 69 kişinin bulundugu bir tabloya uyarlanıcak
 
Kıdem güne göre ihbar gününü bulan KTF aşağıda bulabilirsiniz.


Kod:
Function IHBARGUN(KidemGün As Range) As Long
If KidemGün = Null Then Exit Function
Select Case KidemGün
Case 1 To 180
veri = 14
Case 181 To 540
veri = 28
Case 541 To 1080
veri = 42
Case 1081 To 99999
veri = 56
End Select
IHBARGUN = veri
End Function


sayın recep ipek fonksiyon olarak bir şey eklmemem gerekirmi
 
Örnek dosyayı ekte bulabilirsiniz.
 

Ekli dosyalar

Geri
Üst