İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Excel-də başqa sütunla eyni dəyəri varsa hüceyrələri necə birləşdirə bilərəm?

eyni olsa birləşdirin

Sol ekran görünüşü olaraq, ilk sütun dəyərləri eyni olduqda ikinci sütun hüceyrələrini birləşdirmək lazımdır. Bunu necə əldə edə bilərsiniz?

Bu yazıda bunu nail olmaq üçün üç üsul təqdim edəcəyik.

Formulalar və filtrlərlə eyni dəyərdə birləşən hüceyrələr

VBA kodu ilə eyni dəyərdə birləşən hüceyrələr

Excel üçün Kutools ilə eyni dəyərdə olduqda asanlıqla hüceyrələri birləşdirin


Ətraflı Birləşdirən Satırlar: Bir sütunda eyni dəyər varsa, asanlıqla hüceyrələri birləşdirir

ilə Excel üçün Kutools's Ətraflı qablar birləşdirin effektiv olaraq, eyni sətirdə Excel-də başqa sütunlarda çıxarsa, sütundakı hüceyrələri asanlıqla birləşdirə bilərsiniz. Ekran görüntüsünə baxın:

eyni ziddiyyətli

Excel üçün Kutools: 200 gündə heç bir məhdudiyyət olmadan 60-dən çox lazımlı Excel eklentisi ilə pulsuzdur. İndi indir və pulsuz sınaq!


Formulalar və filtrlərlə eyni dəyərdə birləşən hüceyrələr


Aşağıdakı formullarla, başqa bir sütun Excel-də eyni dəyəri varsa, müvafiq hüceyrə məzmununu birləşdirə bilərsiniz.

1. İkinci sütundan başqa boş bir hüceyrə seçin (burada C2 hücresini seçirik), formu daxil edin = IF (A2 <A1, B2, C1 & "," & B2) formul barına daxil edin və sonra basın Daxil edin açar.

2. Daha sonra C2 hücresini seçin və birləşdirmək üçün lazım olan hüceyrələrə Doldurma Tutumu sürükləyin.

3. Formula daxil edin = IF (A2 <A3, CONCATENATE (A2, "," ", C2," "" ")," ") D2 hücresinə daxil edin və qalan hüceyrələri doldurun.

4. D1 hücresini seçin və vurun Tarix > Süzgəc. Ekran görüntüsünə baxın:

5. D1 hücresindəki açılırdan yuxarı oxu basın, üzərindən silin (Blanks) qutusuna basın və sonra basın OK düyməsini basın.

İlk sütun dəyərləri eyni olduqda hüceyrələrin birləşdiyi görürsən.

QeydYuxarıdakı formulları uğurla istifadə etmək üçün A sütununda eyni dəyərlər davamlı olmalıdır.


VBA kodu ilə eyni dəyərdə birləşən hüceyrələr

Formuldan başqa, bu bölmədə eyni dəyərdə hüceyrələri birləşdirmək üçün VBA kodunun necə istifadə edəcəyini göstərəcəyik.

1. Basın Dayandırmaq + F11 düymələri açmaq üçün Microsoft Visual Basic Applications pəncərə.

2. İçində Microsoft Visual Basic Applications pəncərə basın Taxmaq > Modules. Sonra kodu aşağıda kopyalayın və yapışdırın Modules pəncərə.

VBA kodu: eyni dəyərlər varsa hüceyrələri birləşdirin

Sub ConcatenateCellsIfSameValues()
	Dim xCol As New Collection
	Dim xSrc As Variant
	Dim xRes() As Variant
	Dim I As Long
	Dim J As Long
	Dim xRg As Range
	xSrc    = Range("A1", Cells(Rows.Count, "A").End(xlUp)).Resize(, 2)
	Set xRg = Range("D1")
	On Error Resume Next
	For I = 2 To UBound(xSrc)
		xCol.Add xSrc(I, 1), TypeName(xSrc(I, 1)) & CStr(xSrc(I, 1))
	Next I
	On Error GoTo 0
	ReDim xRes(1 To xCol.Count + 1, 1 To 2)
	xRes(1, 1) = "No"
	xRes(1, 2) = "Combined Color"
	For I = 1 To xCol.Count
		xRes(I + 1, 1) = xCol(I)
		For J = 2 To UBound(xSrc)
			If xSrc(J, 1) = xRes(I + 1, 1) Then
				xRes(I + 1, 2) = xRes(I + 1, 2) & ", " & xSrc(J, 2)
			End If
		Next J
		xRes(I + 1, 2) = Mid(xRes(I + 1, 2), 2)
	Next I
	Set xRg = xRg.Resize(UBound(xRes, 1), UBound(xRes, 2))
	xRg.NumberFormat = "@"
	xRg = xRes
	xRg.EntireColumn.AutoFit
End Sub

Qeydlər:

1. D1 uyğun Set xRg = Range ("D1") nəticə D1 hücresinə yerləşdiriləcək.

2. Xeyr və Birləşdirilmiş rəng uyğun xRes (1, 1) = "Xeyr" və xRes (1, 2) = "Birləşdirilmiş rəng" birləşdirilmiş sütunların başlıqlarıdır. Sizə lazım olanları dəyişə bilərsiniz.

3. Basın F5 kodu açmaq üçün düyməni basın, sonra müəyyən bir sıra birləşən nəticələri əldə edəcəksiniz.


Excel üçün Kutools ilə eyni dəyərdə (bir neçə klik) asanlıqla hüceyrələri birləşdirin

Əgər yuxarıda göstərilən iki üsul sizin üçün mürəkkəb olsa, burada sizə göstərəcəyik Ətraflı qablar birləşdirin faydası Excel üçün Kutools. Bir sütunda eyni dəyərlər mövcud olduqda, hüceyrələri virgülle, nöqtəli vergilərlə və s. Ilə asanlıqla birləşdirə bilərsiniz.

Excel üçün Kutools : 300-dən çox lazımlı Excel eklentisi ilə, 60 gün ərzində heç bir məhdudiyyət olmadan cəhd edin.

1. Birləşmək üçün lazım olan hüceyrələri olan aralığı seçin və sonra basın Kutools > məzmun > Ətraflı qablar birləşdirin. Ekran görüntüsünə baxın:

2. İçində Sütun əsasında satırları birləşdirin informasiya qutusunu aşağıdakı kimi etməlisiniz.

A. hüceyrələri uyğunlaşdırmaq istədiyiniz eyni dəyəri olan sütunu seçin və sonra basın İbtidai Key düyməsini basın.

B. Birləşmək istədiyiniz sütunu seçin, basın Birləşdirmək düyməsini basın və kontekst menyusundan bir ayırıcı seçin (burada seçirik vergül).

C. basın OK düyməsini basın. Ekran görüntüsünə baxın:

İndi hüceyrələr birincil əsas sütuna görə birləşir.


Bir çox hüceyrə dəyərini birləşdirin və sözlər arasında boşluq və ya digər məhdudlaşdırıcıları əlavə edin:

ilə Excel üçün Kutools's Birləşdirmək kommunal, tez bir sıra, sütun və ya hüceyrələri bir sütun, satır və ya Excel-də lazım olan xüsusi bir ayırıcı olan bir hüceyrəyə birləşdirə bilərsiniz. Ekran görüntüsünə baxın:

eyni ziddiyyətli

Excel üçün Kutools: 200 gündə heç bir məhdudiyyət olmadan 60-dən çox lazımlı Excel eklentisi ilə pulsuzdur. İndi indir və pulsuz sınaq!


Excel üçün Kutools ilə eyni dəyərdə olduqda asanlıqla hüceyrələri birləşdirin

Excel üçün Kutools 300-dən çox lazımlı Excel alətləri daxildir. 60 gün ərzində heç bir məhdudiyyətsiz cəhd edin. İndi pulsuz sınaq yükləyin!



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    James · 6 months ago
    I use this VBA for lots of my spreadsheets and its great. But the spreadsheets have become very large 50k+ rows and it doesnt seem to be working any more. If I use it on 1000 rows it works fine but large sets of data it cant seem to cope with. No errors just no results. Any help would be appreciated.
    • To post as a guest, your comment is unpublished.
      crystal · 5 months ago
      Hi James,
      I tested the code as you mentioned, but it still works well in my case even I set the rows to 1000+.
  • To post as a guest, your comment is unpublished.
    Matt Carrington · 7 months ago
    Using the VBA macro and getting great results, I have tried tweaking it slightly for my needs but cant get it to work so I hope you can help.

    Which bit do I change to make it concat a specific column, not the one directly to the right of the xSrc = Range?

    Thanks for your great work!
    • To post as a guest, your comment is unpublished.
      Matt Carrington · 7 months ago
      Or as a better option, if you had 3 columns instead of 2 and found duplicates in column A (like your example) can you concat column B into a cell and column C into a seperate cell? So if you had columns of Number, Colour, Age, could you concat colour and age into different columns upon finding duplicates in Number? Hope that makes sense!
  • To post as a guest, your comment is unpublished.
    Ram · 9 months ago
    This is exactly what I needed...thank you
  • To post as a guest, your comment is unpublished.
    RS · 1 years ago
    I am so thankful to you for these formulas. Fantastic work!
  • To post as a guest, your comment is unpublished.
    Marissa W · 1 years ago
    The concatenate feature does not work. Combines all the rows into one cell despite different keys.
    • To post as a guest, your comment is unpublished.
      crystal · 1 years ago
      Dear Marissa,
      Sorry I am not sure I got your question. There are three methods in the article, which concatenate feature do you mean?