- Katılım
- 3 Aralık 2007
- Mesajlar
- 188
- Excel Vers. ve Dili
- ofice2010 Türkçe
- Altın Üyelik Bitiş Tarihi
- 04-07-2025
Üstad kusura bakma şöyle birşey aklıma geldi görüntüyü attım size
Ekli dosyalar
-
122.4 KB Görüntüleme: 6
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Üstad Çok şık olmuş ellerine sağlıkDosyayı güncelledim. Veri girişi sayfasında carileri de görebileceksiniz. inceleyiniz.
Üstad gerçek minnettarım olağan üstü oldu sağolasın emeğine sağlıkDosyayı güncelledim. Veri girişi sayfasında carileri de görebileceksiniz. inceleyiniz.
İşin Rast Gelsin ÜstadEkli dosyayı inceleyin. Rapor sayfasında K1 ve K2 hücrelerine girilen tarihlere göre raporlama yaptırabilirsiniz. Ayrıca Takvim formuna değer değiştirici ekledim, ay ve yılı değiştirebilirsiniz.
Minnettarım üstadEkli dosyayı inceleyin. Rapor sayfasında K1 ve K2 hücrelerine girilen tarihlere göre raporlama yaptırabilirsiniz. Ayrıca Takvim formuna değer değiştirici ekledim, ay ve yılı değiştirebilirsiniz.
Üstadım ufak bir sorun oluştuEkli dosyayı inceleyin. Rapor sayfasında K1 ve K2 hücrelerine girilen tarihlere göre raporlama yaptırabilirsiniz. Ayrıca Takvim formuna değer değiştirici ekledim, ay ve yılı değiştirebilirsiniz.
Üstad teşekkür ederim.Kodlarda sıraya dizme özelliği yok. Veri girişini yaptığınız sıraya göre rapor oluşuyor. Muhtemelen o veriyi geçmişe dönük girdiğiniz için böyle olmuştur.
Uygun bir zamanda raporda sıralama işlemi de yapmaya çalışırım.
Günaydın ÜstadKodlarda sıraya dizme özelliği yok. Veri girişini yaptığınız sıraya göre rapor oluşuyor. Muhtemelen o veriyi geçmişe dönük girdiğiniz için böyle olmuştur.
Uygun bir zamanda raporda sıralama işlemi de yapmaya çalışırım.
=EĞER(VE(G2="";H2="");"";ETOPLA($B$1:B2;[@[Firma Kod]];$G$1:G2)-ETOPLA($B$1:B2;[@[Firma Kod]];$H$1:H2))Üstad dediklerinizi aynen yaptım yukarıdaki bozuk olanlar da sorun yok hepsi düzeldi ama yeni kayıt girişte bir üsttekininin formülünü bozuyorGünaydın bendeki dosyanın son halinde formül normal görünüyor. Muhtemelen dosyada manuel değişiklik yapmaya çalışmışsınızdır.
Düzeltmek için O sütunda (veritabanı sayfası Bakiye sütunu) formülün düzgün olduğu bir hücreyi aşağı doğru kopyalayın. Öyle bir hücre yoksa İkinci satırdaki formülü düzeltip aşağı kopyalayın. I2 hücresindeki formül şöyle olmalı:
=EĞER(VE(G2="";H2="");"";ETOPLA($B$1:B2;[@[Firma Kod]];$G$1:G2)-ETOPLA($B$1:B2;[@[Firma Kod]];$H$1:H2))
s1.Cells(TextBox18.Text + 0, "I").FormulaR1C1 = _
"=IF(AND(RC[-2]="""",RC[-1]=""""),"""",SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C7:RC[-2])-SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C8:RC[-1]))"
s1.Cells(TextBox18.Text + 1, "I").FormulaR1C1 = _
"=IF(AND(RC[-2]="""",RC[-1]=""""),"""",SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C7:RC[-2])-SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C8:RC[-1]))"
Sağolasın üstad teşekkür ederimNedenini çözemedim ama aşağıdaki kodu Veri girişi formundaki Kaydet/Kapat düğmesinde Unload Me satırından önce ekleyince formülleri düzeltiyor:
PHP:s1.Cells(TextBox18.Text + 0, "I").FormulaR1C1 = _ "=IF(AND(RC[-2]="""",RC[-1]=""""),"""",SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C7:RC[-2])-SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C8:RC[-1]))" s1.Cells(TextBox18.Text + 1, "I").FormulaR1C1 = _ "=IF(AND(RC[-2]="""",RC[-1]=""""),"""",SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C7:RC[-2])-SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C8:RC[-1]))"
Üstad Merhaba ;Nedenini çözemedim ama aşağıdaki kodu Veri girişi formundaki Kaydet/Kapat düğmesinde Unload Me satırından önce ekleyince formülleri düzeltiyor:
PHP:s1.Cells(TextBox18.Text + 0, "I").FormulaR1C1 = _ "=IF(AND(RC[-2]="""",RC[-1]=""""),"""",SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C7:RC[-2])-SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C8:RC[-1]))" s1.Cells(TextBox18.Text + 1, "I").FormulaR1C1 = _ "=IF(AND(RC[-2]="""",RC[-1]=""""),"""",SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C7:RC[-2])-SUMIF(R1C2:RC[-7],[@[Firma Kod]],R1C8:RC[-1]))"