• DİKKAT

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

Düşey ara formülü bir soru

Katılım
11 Ocak 2008
Mesajlar
1,395
Excel Vers. ve Dili
Office 365 (Türkçe)
Kod:
 =DÜŞEYARA(M9;$Q$8:$S$16;2;0)

Kod:
=DÜŞEYARA(N9;$S$8:$T$16;2;0)

Kod:
 =DÜŞEYARA(O9;$Q$8:$U$16;2;0)

Düşey ara formülü üçünüde beceremedim. sonuç hepsinde de 0.00 çıkıyor
 

Ekli dosyalar

Son düzenleme:
Merhaba,

L9=
Kod:
DÜŞEYARA($K$9;$Q$8:$U$16;2;0)
M9=
Kod:
DÜŞEYARA($K$9;$Q$8:$U$16;3;0)
N9=
Kod:
DÜŞEYARA($K$9;$Q$8:$U$16;4;0)
O9=
Kod:
DÜŞEYARA($K$9;$Q$8:$U$16;5;0)
 
Merhaba,

L9=
Kod:
DÜŞEYARA($K$9;$Q$8:$U$16;2;0)
M9=
Kod:
DÜŞEYARA($K$9;$Q$8:$U$16;3;0)
N9=
Kod:
DÜŞEYARA($K$9;$Q$8:$U$16;4;0)
O9=
Kod:
DÜŞEYARA($K$9;$Q$8:$U$16;5;0)

Üstad ekte dosyada paylaştım. orda ufak bir detayı unutmuşum ekteki dosyada belirttim yardımcı olurmusun.
 

Ekli dosyalar

Merhaba,

Yanlış anlamadım ise ;

Örnek ; L10 için ; =EĞER($K$10="";"";DÜŞEYARA($K$10;$Q$10:$U$39;2;0))

C10:I34 aralığını da düzenledim.
 

Ekli dosyalar

Son düzenleme:
m10 İÇİN :
Kod:
=DÜŞEYARA($M$10;$Q$9:$U$17;3;0)

SONUÇ: 0,00 diğerleri de 0 oluyor üstad çözemedim.
 
m10 İÇİN :
Kod:
=DÜŞEYARA($M$10;$Q$9:$U$17;3;0)

SONUÇ: 0,00 diğerleri de 0 oluyor üstad çözemedim.

Sayın CAHAN, dosyanız bende doğru çalışıyor, sizde hatalı mı ?

Düşeyara'da siz M10'u aratıyorsunuz, oysaki K10 aratılacak ki dosyadaki formül doğru,

K sütununa (K10 vb) yazacağınız unvanların alması gereken değerler Q10:U39 arasında aranıyor,

Sanırım siz bir şeyleri gözden kaçırıyorsunuz,

Tekrar gözden geçirmenizi öneririm.
 
Kod:
L10 için ; =EĞER($K$11="";"";DÜŞEYARA($K$10;$Q$10:$U$39;2;0))

Üstadım sizin verdiğiniz formül yukarıdaki ve sorun yok.yanındaki
hücrelerdekini düzenleyemedim, bir türlü.
 
Kod:
L10 için ; =EĞER($K$11="";"";DÜŞEYARA($K$10;$Q$10:$U$39;2;0))

Üstadım sizin verdiğiniz formül yukarıdaki ve sorun yok.yanındaki
hücrelerdekini düzenleyemedim, bir türlü.

Merhaba,

5 no.lu mesaj ekindeki dosya güncellendi,

Formüller L10:O34 arasına uygulandı,

Orj.dosyanıza uyarlayınız.

Kolay gelsin.
 
Üstadım, çok teşekkürler. eline sağlık.
Burda birkaç düzeltme olabilirmi. Sizin gönderdiğiniz dosyada
sizin dosyada unvan silinince;
C10 hücresi:sorun yok, F10 hücresi:#DEĞER hatası, G10 hücresi:sorun yok, H10 hücresi:sorun yok
orjinal dosyaya uygulayınca;
BORDRO ÇIKTI sheetinde unvan silinince C10 hücresi:#DEĞER hatası, F10 hücresi:#DEĞER hatası, G10 hücresi:#DEĞER hatası, H10 hücresi:#DEĞER hatası,
nasıl düzelebilir.
ara düşünce sheete sağ tıklayınca formülleri gizleyebiliyoruz. bu sorun yaratıyor. bunu başka yolla çözebilirmiyiz.
 

Ekli dosyalar

Son düzenleme:
Merhaba Sayın istanbulcahan,

Orijinal dosyanızı düzenledim, E10:H34 arasındaki formülleriniz K10:K34 aralığına göre çalışır, örneğin ; K10'da veri varsa hesaplama yapar, K10 boş ise hesaplamaz.

Formülleri incelerseniz, daha rahat anlaşıla bilir.

sheete sağ tıklayınca formülleri gizleyebiliyoruz. bu sorun yaratıyor. bunu başka yolla çözebilirmiyiz
sorunuzu anlayamadım,

-Formüller bozulmasın diye mi gizleniyor,

-Gizlenince yarattığı sorun ne,

Açıklarsanız yardımcı olmaya çalışayım,

Kolay gelsin.
 

Ekli dosyalar

İl genelinde bütün ilçelere gönderilecek dosya, bazen karıştırıyorlar formülleri sonra sıkıntı oluyor.
Formülleri karıştırmasınlar sadece sheette girecek yerlere girsinler.
 
İl genelinde bütün ilçelere gönderilecek dosya, bazen karıştırıyorlar formülleri sonra sıkıntı oluyor.
Formülleri karıştırmasınlar sadece sheette girecek yerlere girsinler.

Merhaba sayın istanbulcahan,

Hangi sayfada hangi hücrelere girecekler, yani nereler serbest olacak ?

Örneğin, aşağıdaki kod, kendi sayfasında çalıştığında,

Sayfada ; N1,O23:W46,K5:K7,M5:M7,B12:M18 hücrelerini korumaktadır.

Kod:
Sub FormulKoru()

ActiveSheet.Unprotect "CAHAN"
Range("N1,O23:W46,K5:K7,M5:M7,B12:M18").Locked = False
Range("N1,O23:W46,K5:K7,M5:M7,B12:M18").SpecialCells(xlCellTypeFormulas, 23).Locked = True
Range("N1,O23:W46,K5:K7,M5:M7,B12:M18").SpecialCells(xlCellTypeFormulas, 23).FormulaHidden = True
ActiveSheet.Protect "CAHAN", DrawingObjects:=True, Contents:=True, Scenarios:=True
MsgBox "Bitti"
End Sub
 
Formüllü alan
C10-C25 arası
E10-E25 arası
F10-F25arası
G10-G25 arası
H10-H25 arası
N10-N24 arası
M10-24 arası
sadece ücret çizelgesi
Q10-Q30 arası
R10-R30 arası
S10-S30 arası
T10-T30 arası
U10-U30 arası
yukarıdakiler silinmesi engellenmeli ya da formüller gizlenmeli.
Yukarıdakilerin dışındakiler serbest olacak.
Dosyada ektedir.
 

Ekli dosyalar

Son düzenleme:
Merhaba,

"BORDRO ÇIKTI" sayfası için ; sayfayı seçin , Hücre Biçimlendirme-->Koruma'dan (varsa) Kilitli ve Gizli kutucuklarından tik'i kaldırın.



Sonra ; "BORDRO ÇIKTI" sayfasının kod'una ;

Kod:
Sub FormulKoru()

ActiveSheet.Unprotect "[COLOR="red"]CAHAN[/COLOR]"
Range("C10:H34,L10:O34,R10:U39").Locked = False
Range("C10:H34,L10:O34,R10:U39").SpecialCells(xlCellTypeFormulas, 23).Locked = True
Range("C10:H34,L10:O34,R10:U39").SpecialCells(xlCellTypeFormulas, 23).FormulaHidden = True
ActiveSheet.Protect "[COLOR="Red"]CAHAN[/COLOR]", DrawingObjects:=True, Contents:=True, Scenarios:=True
MsgBox "Bitti"

End Sub

kopyalayın, "BORDRO ÇIKTI" sayfasına bir düğme (buton) koyun, düğmeye de makroyu atayın, çalıştırın.

Sayfa koruma kodu CAHAN, siz isterseniz değiştirebilirsiniz.

Kolay gelsin.
 
Üstadım, 5 no lu mesajda paylaştığınız dosyada F10 hücresinde #DEGER! hatası veriyor. O nasıl düzelir.
Diğer verdiğiniz makro üzerine çalışıyorum. İnşallah yaparım.
 
Üstadım, 5 no lu mesajda paylaştığınız dosyada F10 hücresinde #DEGER! hatası veriyor. O nasıl düzelir.
Diğer verdiğiniz makro üzerine çalışıyorum. İnşallah yaparım.

Merhaba,

F10 hücresine , =EĞER(K10="";"";D10*M10) yazınız,

Formül F10 için şöyle diyor ; K10 hücresi boş olduğunda hiç bir şey yapma (yazma), K10 dolu ise D10 ile M10'u çarp.

Formül şöyle de olabilir ; =EĞER(K10<>"";D10*M10;"")

yani K10 boş değilse D10 ile M10'u çarp, boş ise bir şey yapma.

Kolay gelsin.
 
Merhaba,

F10 hücresine , =EĞER(K10="";"";D10*M10) yazınız,

Formül F10 için şöyle diyor ; K10 hücresi boş olduğunda hiç bir şey yapma (yazma), K10 dolu ise D10 ile M10'u çarp.

Formül şöyle de olabilir ; =EĞER(K10<>"";D10*M10;"")

yani K10 boş değilse D10 ile M10'u çarp, boş ise bir şey yapma.

Kolay gelsin.
Kod:
=EĞER(K10<>"";D10*M10;"")
formülü oldu, emeğine sağlık.
 
Ekteki dosyada (personel sheetinde)
K,L,M,N,O sutunlarını devre dışı bıraktım.
E10 daki formül
Kod:
=EĞER($C10="";"";DÜŞEYARA($C10;$Q$10:$U$39;2;0))
F10 daki formül :
Kod:
=EĞER($C10="";"";DÜŞEYARA($C10;$Q$10:$U$39;3;0))
G10 daki formül :
Kod:
=EĞER($C10="";"";DÜŞEYARA($C10;$Q$10:$U$39;4;0))
H10 daki formül:
Kod:
=EĞER($C10="";"";DÜŞEYARA($C10;$Q$10:$U$39;5;0))

Devre dışı bıraktığım K,L,M,N,O sutunlarınndaki kodlar da K10 a ünvan girilince L10,M10,N10,O10 ücretleri yazıyordu ve seans a da değer yazılınca otomatik çarpıyordu. unvan silinincede ücretleri siliyordu.
L10 da
Kod:
=EĞER($K10="";"";DÜŞEYARA($K10;$Q$10:$U$39;2;0))
M10 daki formül :
Kod:
=EĞER($K10="";"";DÜŞEYARA($K10;$Q$10:$U$39;3;0))
N10 daki formül:
Kod:
=EĞER($K10="";"";DÜŞEYARA($K10;$Q$10:$U$39;4;0))
O10 daki formül:
Kod:
=EĞER($K10="";"";DÜŞEYARA($K10;$Q$10:$U$39;5;0))

Ancak yukarıdaki E10,F10,G10 ve H10 daki formüllerde unvan yazılınca ücretleri yazıyor, silinice siliyor problem çarpma işlemi olmuyor hatayı nasıl düzeltebilirim.
 
Son düzenleme:
Merhaba,

Boş gelmesini istemediğiniz hücredeki formülün önündeki =EĞER(hücre;"";""; ibaresini kaldırın,

Örneğin ; =EĞER($C10="";"";DÜŞEYARA($C10;$Q$10:$U$39;5;0)) formülü, işlemi yapınca =DÜŞEYARA($C10;$Q$10:$U$39;5;0) şeklini alır,

Kolay gelsin.
 
Geri
Üst