• DİKKAT

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

İç içe IF Komutları

  • Konbuyu başlatan Konbuyu başlatan Cafo1
  • Başlangıç tarihi Başlangıç tarihi
Katılım
25 Mayıs 2009
Mesajlar
9
Excel Vers. ve Dili
2007
Merhaba,

Bir sutunum var ve bu sutunda ortalama olarak 3500-5000 arası sayı mevcut.

Bu sayılar 0 ile 3000 arasında sayılar. Ve bu sayıların anlamı görüşme süresi.

Bu sutun üzerinde yapmak istediğim ise şu

0 ile 60 arasındaki sayıların karşılığında 1 yazsın
61-120 arasındaki sayıların karşılığı olarak 2 yazsın
121-180 arasındaki sayıların karşılığı olarak 3 yazsın
...
...
...
...
9960-10020 arasındaki sayıların karşılığı olarak 167 yazsın


Böyle bir formül nasıl yapabiliriz ?

Sanırım iç-içe if kullanıcaz ama ne zamandır böyle bişey yapmamıstım. Çözemedim.

Yardımcı olabilir misiniz ?

Tesekkürler.
 
Merhaba,

Bir sutunum var ve bu sutunda ortalama olarak 3500-5000 arası sayı mevcut.

Bu sayılar 0 ile 3000 arasında sayılar. Ve bu sayıların anlamı görüşme süresi.

Bu sutun üzerinde yapmak istediğim ise şu

0 ile 60 arasındaki sayıların karşılığında 1 yazsın
61-120 arasındaki sayıların karşılığı olarak 2 yazsın
121-180 arasındaki sayıların karşılığı olarak 3 yazsın
...
...
...
...
9960-10020 arasındaki sayıların karşılığı olarak 167 yazsın


Böyle bir formül nasıl yapabiliriz ?

Sanırım iç-içe if kullanıcaz ama ne zamandır böyle bişey yapmamıstım. Çözemedim.

Yardımcı olabilir misiniz ?

Tesekkürler.

Bu haliyle pek çok limite takılacağı görünüyor.

Aşağıdaki linkteki dosyaları inceleyin.

http://www.excel.web.tr/attachment.php?attachmentid=65948&d=1241983664

http://www.excel.web.tr/f60/e-er-if-fonksiyonu-uygulamalar-t17327.html

Problemi VLOOKUP=DÜŞEYARA fonksiyonu ile aşmanız mümkün.

...
 
Tesekkür ederim cevaplarınız icin.

Peki if ve and komutlarını beraber nasıl kullanabilirizi ?

Yani if("a1>60 and a1<121","2","")

şeklinde bişey yapmak mumkun mu ?
 
Tesekkür ederim cevaplarınız icin.

Peki if ve and komutlarını beraber nasıl kullanabilirizi ?

Yani if("a1>60 and a1<121","2","")

şeklinde bişey yapmak mumkun mu ?

Denermisiniz ?

=EĞER(VE(A1>60;A1<121);"2";"")
 
Öğrendik madem burayada yazalım :)

=IF(F3<61,1,"")&IF(AND(F3>60,F3<121),2,"")&IF(AND(F3>120,F3<181),3,"")&IF(AND(F3>180,F3<241),4,"")&IF(AND(F3>240,F3<301),5,"")&IF(AND(F3>300,F3<361),6,"")&IF(AND(F3>360,F3<421),7,"")&IF(AND(F3>420,F3<481),8,"")&IF(AND(F3>480,F3<541),9,"")&IF(AND(F3>540,F3<601),10,"")&IF(AND(F3>600,F3<661),11,"")&IF(AND(F3>660,F3<721),12,"")&IF(AND(F3>720,F3<781),13,"")&IF(AND(F3>780,F3<841),14,"")&IF(AND(F3>840,F3<901),15,"")&IF(AND(F3>900,F3<961),16,"")&IF(AND(F3>960,F3<1021),17,"")&IF(AND(F3>1020,F3<1081),18,"")&IF(AND(F3>1080,F3<1141),19,"")&IF(AND(F3>1140,F3<1201),20,"")&IF(AND(F3>1200,F3<1261),21,"")&IF(AND(F3>1260,F3<1321),22,"")&IF(AND(F3>1320,F3<1381),23,"")&IF(AND(F3>1380,F3<1441),24,"")&IF(AND(F3>1440,F3<1501),25,"")&IF(AND(F3>1500,F3<1561),26,"")&IF(AND(F3>1560,F3<1621),27,"")&IF(AND(F3>1620,F3<1681),28,"")&IF(AND(F3>1680,F3<1741),29,"")&IF(AND(F3>1740,F3<1801),30,"")&IF(AND(F3>1800,F3<1861),31,"")&IF(AND(F3>1860,F3<1921),32,"")&IF(AND(F3>1920,F3<1981),33,"")&IF(AND(F3>1980,F3<2141),34,"")&IF(AND(F3>2140,F3<2200),35,"")&IF(AND(F3>2260,F3<2341),36,"")&IF(AND(F3>2400,F3<2461),37,"")&IF(AND(F3>2460,F3<2521),38,"")&IF(AND(F3>2500,F3<2561),39,"")&IF(AND(F3>2560,F3<2621),40,"")

F3'e göre 40 kontöre kadar hesaplıyor.
 
Selamlar,

Alternatif olarak aşağıdaki kodu kullanarak işleminizi kolaylıkla yapabilirsiniz. Kod A sütunundaki verilere göre karşılıklarını B sütununa tyazarak çalışmaktadır.

Kod:
Option Explicit
 
Sub GÖRÜŞME_SÜRELERİNİ_DÜZENLE()
    Dim X As Long, Y As Long, DEĞER As Integer
    
    For X = 0 To WorksheetFunction.Max([A:A]) Step 61
    
    DEĞER = DEĞER + 1
        
        For Y = 1 To [A65536].End(3).Row
            If Cells(Y, 1) >= X And Cells(Y, 1) <= X + 60 Then
            Cells(Y, 2) = DEĞER
            End If
        Next
    
    Next
    
    MsgBox "İşleminiz tamamlanmıştır.", vbInformation
End Sub
 
Selamlar,

Sn. Cafo1,

Benim önerdiğim makro kodudur. Formül olarak değerlendirmeyin. Aşağıdaki işlemleri yaparak kullanabilirsiniz.

ALT+F11 tuşlarına basın.
INSERT menüsünden "Module" seçeneğini seçip boş modül ekleyin.
Sağ tarafta beyaz bir pencere açılacaktır.
Önerdiğim kodu bu bölüme uygulayın.
Makroyu açık olan penceredeyken çalıştırmak için F5 tuşuna basın.
Makroyu sayfa üzerinde çalıştırmak için ALT+F8 tuşlarına basın. Ekranınıza gelen pencerede makroyu göreceksiniz. Çalıştır seçeneğine tıkladığınızda otomatik olarak çalışacaktır.
 
Merhaba,

Bir alternatifte bende olsun. Data kullanarak fonksiyonlarla çözülmüş dosya ektedir..
 

Ekli dosyalar

VBA editörünü açıp modul yaratıp oraya kopyalayabilir siniz?
İlgilenenlere bir soru : Arkadaşlar IF içinde IF en fazla kaç kere kullanılabilinir acaba ?
 
Geri
Üst