Hücre içindeki sayıları toplama

[Haluk]

İyi günler. Formüle + yada - yerine Alt+Enter'ı nasıl yerleştirebiliriz?
Yani tek hücrede bulunan alt alta olan sayıları nasıl toplayabiliriz?

1
5
17
65
183 gibi

Şimdiden teşekkürler.

Aşağıdaki linke bakın:

https://www.excel.web.tr/threads/toplama-islemi.181012/

.

 

[mehmetman]

Aşağıdaki linke bakın:

https://www.excel.web.tr/threads/toplama-islemi.181012/

.

Haluk Bey, linkteki son paylaştığınız yöntemi denedim. =ToplamHD(A1:A3) şeklinde birden fazla hücre seçildiğinde işe yarıyor. Ancak örneğin =ToplamHD(A1) gibi tek bir hücre seçildiğinde değer hatası alıyorum. dalgalikur un yönteminde tek hücrede hesaplanabiliyor. Peki sadece formülle hesaplanabilecek bir yöntem var mı?

 

[Haluk]

Aynı linkte 13 No'lu mesaj ekindeki dosyada var.

.

 

[mehmetman]

Aynı linkte 13 No'lu mesaj ekindeki dosyada var.

.

Altın üye olmadığım için açamıyorum ekleri.

 

[ybuse]

merhaba herkese,
hücrelerde, x-1 , x+5 , x-2 gibi değerler yazılı ve bende sadece x in yanındaki rakamları toplamak istiyorum. yani; "-1+5-2=2"
nasıl bir formül uygulayabilirim? yardımcı olursanız çok sevinirim.

 

[badem18]

hücre içindeki rakamların yanlarındaki karakterleri dikkate almadan nasıl toplayabilirim örnek "( kl37tr8,.65=+%&ab )"=29 olarak bulmasını istiyorum yardımcı olaursanız sevinirim

 

[badem18]

hücre içindeki rakamların yanlarındaki karakterleri dikkate almadan nasıl toplayabilirim örnek "( kl37tr8,.65=+%&ab )"=29 olarak bulmasını istiyorum yardımcı olaursanız sevinirim

 

[Haluk]

hücre içindeki rakamların yanlarındaki karakterleri dikkate almadan nasıl toplayabilirim örnek "( kl37tr8,.65=+%&ab )"=29 olarak bulmasını istiyorum yardımcı olaursanız sevinirim

Dosyanız...

 

[Korhan Ayhan]

Alternatif;

DİZİ formüldür.

=SUM(IFERROR(--MID(A1;ROW(INDIRECT("A1:A"&LEN(A1)));1);0))

SUM = TOPLA
IFERROR = EĞERHATA
MID = PARÇAAL
ROW = SATIR
INDIRECT = DOLAYLI
LEN = UZUNLUK

 

[Korhan Ayhan]

Bu da kullanıcı tanımlı fonksiyon (KTF) ile alternatif;

ab+c1d.3e%4f5gh gibi bir ifadeden sadece sayısal karakterlerin toplamını alır.

=KTOPLA(A1)

Option Explicit

Function KTOPLA(Veri As Range)
    Dim Karakterler As Variant, Karakter As Variant
    Application.Volatile True
    With CreateObject("VbScript.RegExp")
        .Global = True
        .Pattern = "\D"
         Karakter = .Replace(Veri.Value, "")
        .Pattern = "."
         Set Karakterler = .Execute(Karakter)
         For Each Karakter In Karakterler
            KTOPLA = KTOPLA + CDbl(Karakter)
         Next
    End With
End Function

 

[badem18]

Korhan Ayhan

Hocam yardımınızdan dolayı çok teşekkür ederim hocam yüzsüzlük olmazsa bir problemim daha var yardımcı olabilirseniz sevinirim

 

[Korhan Ayhan]

N sütunundaki sıralamanın mantığı nedir?

 

[Ömer]

Merhaba,

Benim anladığım:

O3 yazıp alt satırlara kopyalayınız.

=RANK(N3;$N$3:$N$24)+EĞERSAY($N$3:$N$24;N3)-1

 

[badem18]

ÖMER hocam yardımlarınızdan dolayı teşekkür ederim cevapladığınız bir hayli olmuş falat arkadaşlar uyarmasa bulamazdım siteyi uzun zamandır kullanmama rağmen seyrek girdiğimden ne nerdedir bulamıyorum tabiiki sitenin kusuru değil yaşlanıyoruz kafa eskisi gibi basmıyor müteşekkirim bedeninize aklınıza ruhunuza sağlık sonsuz teşekkürler,