Ana içeriğe atla

Satırları bir sütun değerine göre hızlı bir şekilde nasıl birleştirebilirim, ardından Excel'de bazı hesaplamalar yapabilirim?

Örneğin, bir veri aralığınız var ve bir sütunda yinelenenler var, şimdi satırları A sütununa göre birleştirmek (yinelemeleri var), ardından gösterilen ekran görüntüsü gibi birleştirilmiş satırlara dayanarak başka bir sütuna bazı hesaplamalar yapmak istiyorsunuz:

Excel'de, satırları bir sütun değerine göre birleştirmenin hızlı bir yöntemi yoktur, ancak burada
yinelenen satırları birleştirmenize ve ardından başka bir sütunda toplam veya başka hesaplamalar yapmanıza yardımcı olabilecek püf noktaları.


ok mavi sağ balon Satırları bir sütuna göre birleştirin ve ardından değerleri VBA ile toplayın

Bir VBA kodu var, yinelenen satırları birleştirmenize ve ardından başka bir sütun değerlerini toplamanıza yardımcı olabilir.

Birden çok Excel çalışma kitabını / Word belgesini Firefox, Chrome, Internet olarak sekmeli taramak ve düzenlemek Keşfet 10!

Firefox / Chrome / IE'de birden çok web sayfasını görüntülemeye ve ilgili sekmelere kolayca tıklayarak aralarında geçiş yapmaya aşina olabilirsiniz. Burada Office Tab, tek bir Excel penceresinde veya Word penceresinde birden çok Excel çalışma kitabına veya Word belgesine göz atmanıza ve sekmelerine tıklayarak aralarında kolayca geçiş yapmanıza olanak tanıyan benzer işlemleri destekler. Ücretsiz tıklayın 30Office Tab'ın günlük deneme sürümü!

mükemmel

1. Basın F11 + Alt etkinleştirmek için anahtarlar Uygulamalar için Microsoft Visual Basic pencere, ardından tıklayın Ekle > modül ve VBA kodunu kopyalayıp yenisine yapıştırın modül pencere.

VBA: Satırları bir sütun değerine göre birleştirin

Sub MG30Nov12()
'Updateby20150519
Dim Rng As Range
Dim InputRng As Range
Dim nRng As Range
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set InputRng = InputRng.Parent.Range(InputRng.Columns(1).Address)
With CreateObject("scripting.dictionary")
.CompareMode = vbTextCompare
For Each Rng In InputRng
    If Not .Exists(Rng.Value) Then
        .Add Rng.Value, Rng.Offset(, 1)
    Else
        .Item(Rng.Value).Value = .Item(Rng.Value).Value + Rng.Offset(, 1)
            If nRng Is Nothing Then
                Set nRng = Rng
            Else
                Set nRng = Union(nRng, Rng)
            End If
    End If
Next
If Not nRng Is Nothing Then
    nRng.EntireRow.Delete
End If
End With
End Sub

2. Basın F5 veya tıklayın koşmak düğmesi VBA'yı çalıştırır ve çalışmak üzere bir veri aralığı seçmek için bir iletişim kutusu açılır. ekran görüntüsüne bakın:

doc, sütunları bir sütuna göre birleştirme 3

3. Bir çalışma aralığı seçtikten sonra, tıklayın OK. Şimdi veriler ilk sütuna göre birleştirildi ve ikinci sütundaki değerleri topladı.

doc, sütunları bir sütuna göre birleştirme 4

not: Bu VBA kodu, ilk sütuna ve ikinci sütundaki toplam değerlere göre birleştirirken doğru şekilde çalışabilir.


ok mavi sağ balon Satırları bir sütuna göre birleştirin ve ardından Advanced Combine Rows ile değerleri toplayın

VBA kodunu bilmiyorsanız, Gelişmiş Kombine Satırları üçüncü bölüm eklenti aracının özelliği - Kutools for Excel yinelenen satırları kolayca ve hızlı bir şekilde birleştirmek ve ardından başka bir sütundaki değerleri toplamak için.

Sonra ücretsiz kurulum Kutools for Excel, lütfen aşağıdaki işlemleri yapın:

1. Kullanmak istediğiniz verileri seçin ve tıklayın Kutools > Birleştir ve Böl > Gelişmiş Kombine Satırları. Ekran görüntüsüne bakın:

doc gelişmiş 1. satırı birleştir

2. Ardından, açılır iletişim kutusunda, diğer sütunları temel alarak birleştireceğiniz sütunu seçin ve ardından Birincil Anahtar ve başka bir sütunu tıklayın ve tıklayın Hesaplanmış Sonra seçin Toplam.

Bahşiş: Seçtiğiniz aralığın başlıkları varsa kontrol edin Verilerimin başlıkları varve kontrol et Biçimlendirilmiş değerleri kullanın biçimlendirmeyi birleştirdikten sonra koruyacak.

doc, sütunları bir sütuna göre birleştirme 6

3. Sonra tıklayın Ok. Şimdi veriler birincil sütuna göre birleştirildi ve bir diğeri de toplandı. Ekran görüntüsüne bakın:

doc, sütunları bir sütuna göre birleştirme 7


ok mavi sağ balon Satırları bir sütuna göre birleştirin ve ardından Advanced Combine Rows ile diğer sütunlarda farklı işlemler yapın.

Gelişmiş Kombine Satırları güçlüdür, çünkü yalnızca bir sütundaki yinelenen satırları birleştirip sonra başka bir sütunu toplayabilir, aynı zamanda bir sütundaki yinelenen satırları birleştirip diğer sütunlarda farklı işlemler yapabilir.

Aşağıda gösterilen ekran görüntüsü gibi bir veri aralığım olduğunu varsayalım ve hem Sütun B'deki değerleri birleştirmek hem de Sütun C'deki değerleri Sütun A'ya göre toplamak istiyorum.
doc, sütunları bir sütuna göre birleştirme 8

Sonra ücretsiz kurulum Kutools for Excel, lütfen aşağıdaki işlemleri yapın:

1. Veri aralığını seçin ve tıklayın Kutools > Birleştir ve Böl > Gelişmiş Kombine Satırları. Ekran görüntüsüne bakın:

doc gelişmiş 1. satırı birleştir

2. içinde Sütuna Göre Satırları Birleştirme diyalog, şunları yapın:

(1) Temel olarak birleştirmek istediğiniz sütuna tıklayın ve Birincil anahtar;

doc, sütunları bir sütuna göre birleştirme 10

(2) Verileri birleştirmek istediğiniz sütuna tıklayın ve Birleştirmek, ardından listeden ihtiyacınız olan bir ayırıcı seçin;

doc, sütunları bir sütuna göre birleştirme 11

(3) Değerleri toplamak istediğiniz sütuna tıklayın ve HesaplanmışSeçin ve Toplam.

doc, sütunları bir sütuna göre birleştirme 12

3. tık Ok. Şimdi sonucu aşağıdaki gibi görebilirsiniz:

doc, sütunları bir sütuna göre birleştirme 13

İle Gelişmiş Kombine Satırları özelliği, ayrıca bir sütuna göre satırları birleştirebilir ve ardından diğer sütunlarda 1. veya son verileri sayabilir, ortalayabilir, tutabilirsiniz. 

En İyi Ofis Üretkenlik Araçları

🤖 Kutools AI Yardımcısı: Aşağıdakilere dayalı olarak veri analizinde devrim yaratın: Akıllı Yürütme   |  Kodunu oluşturun  |  Özel Formüller Oluşturun  |  Verileri Analiz Edin ve Grafikler Oluşturun  |  Kutools İşlevlerini Çağır...
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya Tanımla   |  Boş Satırları Sil   |  Veri Kaybı Olmadan Sütunları veya Hücreleri Birleştirin   |   Formülsüz Tur ...
Süper Arama: Çoklu Ölçütlü VLookup    Çoklu Değer VLookup  |   Birden Çok Sayfada VLookup   |   Bulanık Arama ....
Gelişmiş Açılır Liste: Hızla Açılır Liste Oluşturun   |  Bağımlı Açılır Liste   |  Çoklu Seçim Açılır Liste ....
Sütun Yöneticisi: Belirli Sayıda Sütun Ekleme  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  |  Aralıkları ve Sütunları Karşılaştırın ...
Öne Çıkan Özellikler: Izgara Odağı   |  Tasarım görünümü   |   Büyük Formül Çubuğu    Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynak Kütüphanesi (Otomatik metin)   |  Tarih Seçici   |  Çalışma Sayfalarını Birleştirin   |  Hücreleri Şifrele/Şifresini Çöz    E-postaları Listeye Göre Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtre...) ...
En İyi 15 Araç Seti12 Metin Tools (Metin ekle, Karakterleri Kaldır, ...)   |   50+ Grafik Türleri (Gantt şeması, ...)   |   40+ Pratik Formüller (Yaşı doğum gününe göre hesapla, ...)   |   19 sokma Tools (QR Kodunu Girin, Yoldan Resim Ekle, ...)   |   12 Dönüştürme Tools (Sayılardan Kelimelere, Para Birimi Dönüştürme, ...)   |   7 Birleştir ve Böl Tools (Gelişmiş Kombine Satırları, Bölünmüş hücreler, ...)   |   ... ve dahası

Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar.  En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...

Açıklama


Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir

  • Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
  • Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
  • Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
I have the same/similar question. I am trying to sum all of the columns to the right of the reference cell but it only sums the one. How do I get it to sum all those to the right individually?
This comment was minimized by the moderator on the site
Hey, your module used to work for big tables as well (eg. you want to sum up according to Year but you have Sales 1, Sales 2, Sales 3....etc). But now it only gets the first column right (Sales 1) and all others are not summed correctly. Did you change anything?
Thanks!
This comment was minimized by the moderator on the site
Hi, IK, maybe you can use the sumproduct function SUMPRODUCT((A2:A10=”Pen”)*(B2:E10)) to calculate them one by one. A2:A10 is the range contain the lookup value, pen is the criterion, B2:E10 is range that you want to sum based on criterion.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations