Formül sorunu hakkında.

[Garuramon]

Merhaba Arkadaşlar,

EK' li dosyadaki G20:L20 hücreleri arasındaki ve M7:M19 hücreleri arasındaki toplama işlemini doğru formül ile nasıl yaparım.

 

[relaxim]

Merhabalar,

Hata nerede? Zaten doğru hesaplamışsınız. Olması gereken nedir?

 

[Garuramon]

Merhabalar,

Hata nerede? Zaten doğru hesaplamışsınız. Olması gereken nedir?

Sayın @relaxim

Sorun yeşil dolgu ile gösterdiğim yerlerdeki formülün gerçek değerleri göstermemesi. Örnek H20 hücresindeki değerin 70 saat olması gerekirken 26 saat göstermesi.

 

[relaxim]

Sayın @relaxim

Sorun yeşil dolgu ile gösterdiğim yerlerdeki formülün gerçek değerleri göstermemesi. Örnek H20 hücresindeki değerin 70 saat olması gerekirken 26 saat göstermesi.

Merhaba,

7+3,5 şeklinde veri girerseniz o artık metinsel ifade olduğundan işleme dahil etmez. Onun yerine =7,5+3,5 olarak girerseniz; sonuç 11 görünür ve toplamı alır.

 

[Garuramon]

Konu günceldir.

 

[Mahir64]

Merhaba,

7+3,5 şeklinde veri girerseniz o artık metinsel ifade olduğundan işleme dahil etmez. Onun yerine =7,5+3,5 olarak girerseniz; sonuç 11 görünür ve toplamı alır.

Sayın @relaxim bir öneride bulunmuş olumlu olumsuz dönüş yapabilirdiniz.

Bence de yerinde bir öneri.

 

[Garuramon]

Merhaba,

7+3,5 şeklinde veri girerseniz o artık metinsel ifade olduğundan işleme dahil etmez. Onun yerine =7,5+3,5 olarak girerseniz; sonuç 11 görünür ve toplamı alır.

Sayın @relaxim

Çözüm öneriniz maalesef benim işimi görmüyor. Soruna çözüm internetten araştırıyorum. Belki de eğer formülü ile çözülebilir. Vakit ayırdığınız için teşekkür ederim.

 

[Mahir64]

Deneyiniz. 7,5+3,5 olan kısımları toplayabilirsiniz.

Belki çözüm olmaz ama fikir verebilir. Geliştirilebilir.

=TOPLA.ÇARPIM((SOLDAN(H16:H19;BUL("+";H16:H19;1)-1)+PARÇAAL(H16:H19;BUL("+";H16:H19;1)+1;UZUNLUK(H16:H19))))

 

[Garuramon]

Deneyiniz. 7,5+3,5 olan kısımları toplayabilirsiniz.

Belki çözüm olmaz ama fikir verebilir. Geliştirilebilir.

=TOPLA.ÇARPIM((SOLDAN(H16:H19;BUL("+";H16:H19;1)-1)+PARÇAAL(H16:H19;BUL("+";H16:H19;1)+1;UZUNLUK(H16:H19))))

Sayın @Mahir64

Sizin fikrinizi geliştirebilecek arkadaşlara ihtiyacımız var. Teşekkür ederim.

 

[Mahir64]

Tüm alan için kurgulayamadım. Yazabilirsem paylaşırım.
Gelecek çözüm benim içinde örnek olacak.

 

[Ömer]

Merhaba,

G20: (dizi formülüdür.)

=TOPLA(EĞERHATA(0+PARÇAAL(YERİNEKOY(G7:G19;"+";YİNELE(" ";10));10*({0;1})+1;10);0))

 

[Merhum İdris SERDAR]

.

Dosyanız ekte.

Dosyanızda Macro4 fonksiyonlarından EVALUATE fonksiyonu kullanılmıştır.

Ad tanımlamalarına bakarsanız orada görürsünüz.

Değer taraftan yaptığım bir sütun ve bir satır çalışması kırmızı olarak gösterilmiştir. Onların rengini beyaz yapıp gizleyebilirsiniz.

Not: Mümkünse boş yerlere 0 kullanınız ki; formülün hata verme olasılığını ortadan kaldırabiliriz. 0'ları da gizlemek mümkün.

.

 

[AdemCan]

Makro ile yapılmak istenirse H sütunu için örnek,
Hücreye yazdıkça toplama işlemi yapar.

Private Sub Worksheet_Change(ByVal Target As Range)
h20 = Range("H20").Value
If Target.Column <> 8 Or Target.Row < 7 Or Target.Row > 19 Then Exit Sub
    say = WorksheetFunction.CountIf(Range("H" & Target.Row & ":H" & Target.Row), "*" & "+" & "*")
        If say > 0 Then
            x = Left(Target.Value, WorksheetFunction.Find("+", Target.Value) - 1) * 1
            y = Right(Target.Value, WorksheetFunction.Find("+", Target.Value) - 1) * 1
            t = x + y
        Else
            Z = Target.Value
        End If
    Range("H20").Value = t + Z + h20
End Sub

 

[Garuramon]

Merhaba,

G20: (dizi formülüdür.)

=TOPLA(EĞERHATA(0+PARÇAAL(YERİNEKOY(G7:G19;"+";YİNELE(" ";10));10*({0;1})+1;10);0))

Sayın @Ömer

Çözüm öneriniz yatay olan G:20 ile L:20 hücrelerinde doğru sonucu veriyor. M:7 ile M19 arası dikey hücreler içinde formül paylaşır mısınız.

 

[Garuramon]

.

Dosyanız ekte.

Dosyanızda Macro4 fonksiyonlarından EVALUATE fonksiyonu kullanılmıştır.

Ad tanımlamalarına bakarsanız orada görürsünüz.

Değer taraftan yaptığım bir sütun ve bir satır çalışması kırmızı olarak gösterilmiştir. Onların rengini beyaz yapıp gizleyebilirsiniz.

Not: Mümkünse boş yerlere 0 kullanınız ki; formülün hata verme olasılığını ortadan kaldırabiliriz. 0'ları da gizlemek mümkün.

.

Sayın @İdris SERDAR

Çözüm öneriniz çok başarılı. Bir ara ad tanımlamalarına çalışmalıyım. Zaman ayırdığınız için çok teşekkür ederim.

 

[Garuramon]

Makro ile yapılmak istenirse H sütunu için örnek,
Hücreye yazdıkça toplama işlemi yapar.

Private Sub Worksheet_Change(ByVal Target As Range)
h20 = Range("H20").Value
If Target.Column <> 8 Or Target.Row < 7 Or Target.Row > 19 Then Exit Sub
    say = WorksheetFunction.CountIf(Range("H" & Target.Row & ":H" & Target.Row), "*" & "+" & "*")
        If say > 0 Then
            x = Left(Target.Value, WorksheetFunction.Find("+", Target.Value) - 1) * 1
            y = Right(Target.Value, WorksheetFunction.Find("+", Target.Value) - 1) * 1
            t = x + y
        Else
            Z = Target.Value
        End If
    Range("H20").Value = t + Z + h20
End Sub

Sayın @faye_efsane

Makro hakkında çok fazla bir bilgim olmaması nedeniyle dosyada çalıştıramadım. Zaman ayırdığınız için çok teşekkür ederim.

 

[Ömer]

Sayın @Ömer

Çözüm öneriniz yatay olan G:20 ile L:20 hücrelerinde doğru sonucu veriyor. M:7 ile M19 arası dikey hücreler içinde formül paylaşır mısınız.

Yatayda kullanırken;

{0;1}

Diziyi yukarıdaki yazım yerine aşağıdaki gibi yazmanız yeterli olacaktır.

{0\1}

 

[Garuramon]

Yatayda kullanırken;

{0;1}

Diziyi yukarıdaki yazım yerine aşağıdaki gibi yazmanız yeterli olacaktır.

{0\1}

Sayın @Ömer

Yardımlarınız için çok teşekkür ederim.