İ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

Sütundakı boş bir hüceyrəni tapana qədər hüceyrə dəyərlərini necə birləşdirmək olar?

boş 1 qədər doc bağlayın

Məsələn, bəzi boş hüceyrələri ehtiva edən dəyərlər siyahısı var və indi, boşluqlar arasında hər bir məlumat setini bir hüceyrəyə birləşdirmək və göstərilən ekran görüntüsü kimi bir sütundakı birləşdirilmiş dəyərləri sıralamaq istəyirəm. Sütundakı boş bir hüceyrəni tapana qədər hüceyrələri necə birləşdirə bilərəm?

VBA kodu olan sütunda boş bir hüceyrə tapana qədər hücum dəyərlərini birləşdirin

Kutools for Excel ile bir sütunda boş bir hücre bulana kadar hücre değerlerini birleştirin


Bir sütun / satırı boş hüceyrələrə bir aralığa çevirmək:

Excel üçün Kutools's Transform Range kommunal bir sıra və ya sütunu bir sıra hüceyrələrə və əksinə çevirməyə kömək edə bilər.

boş 9 qədər doc bağlayın

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!


arrow mavi sağ bubble VBA kodu olan sütunda boş bir hüceyrə tapana qədər hücum dəyərlərini birləşdirin


Boşluqlar arasında bir sıra hüceyrələri birləşdirmək üçün birbaşa yol yoxdur, lakin bununla məşğul olmaq üçün aşağıdakı VBA kodunu tətbiq edə bilərsiniz. Xahiş edirəm:

1. Basıb saxlayın ALT + F11 düymələri açmaq üçün Proqramlar üçün Microsoft Visual Basic.

2. Basın Taxmaq > Modules, və aşağıdakı kodu yapışdırın Modul Pəncərəsi.

VBA kodu: boş bir hüceyrə tapana qədər hüceyrə dəyərlərini birləşdirin

Sub Concatenatecells()
'updateby Extendoffice 20160513
    Dim xRg As Range
    Dim xSaveToRg As Range
    Dim xTxt As String
    Dim xCell As Range
    Dim xTStr As String
    On Error Resume Next
    xTxt = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please selecte the data range:", "Kutools for Excel", xTxt, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    If xRg.Columns.Count > 1 Then
        MsgBox "the selected range is more than one column", vbInformation, "Kutools for Ecel"
        Exit Sub
    End If
    Set xSaveToRg = Application.InputBox("Please selecte output cell:", "Kutools for Excel", , , , , , 8)
    If xSaveToRg Is Nothing Then Exit Sub
    Set xSaveToRg = xSaveToRg.Cells(1)
    Application.ScreenUpdating = False
    For Each xCell In xRg
        If xCell <> "" Then
            xTStr = xTStr & xCell & " "
        Else
            xSaveToRg.Value = xTStr
            Set xSaveToRg = xSaveToRg.Offset(1)
            xTStr = ""
        End If
    Next
    If xTStr <> "" Then xSaveToRg.Value = Left(xTStr, Len(xTStr) - 1)
    Application.ScreenUpdating = True
End Sub

3. Sonra basın F5 bu kodu çalıştırmak üçün düyməsini basın və birləşdirmək istədiyiniz məlumatların aralığını seçməyi xatırlatmaq üçün sorğu qutusu açılır, ekran görüntüsünə baxın:

boş 10 qədər doc bağlayın

4. Sonra basın OK, və başqa bir əmr qutusu çıxdıqda, birləşdirilmiş nəticəni çıxmaq üçün bir hüceyrə seçin, ekran görüntüsünə baxın:

boş 11 qədər doc bağlayın

5. Və sonra basın OK düyməsini basın və sütun siyahısı məlumatları boşluqlar arasında birləşir, ekran görünüşünə baxın:

boş 1 qədər doc bağlayın


arrow mavi sağ bubble Kutools for Excel ile bir sütunda boş bir hücre bulana kadar hücre değerlerini birleştirin

Əgər Excel üçün Kutools, onun birləşməsi Transform RangeBirləşdirmək xüsusiyyətləri ilə də bu işi ən qısa müddətdə bitirə bilərsiniz. Məqalələr Transform Range kommunal bir sütunun bir aralığa çevrilməsinə kömək edə bilər Birləşdirmək xüsusiyyət, dəyişən aralığın bir sütuna birləşməsinə kömək edə bilər.

Excel üçün Kutools : 300-dən daha çox 60-dən istifadə etməklə, Excel-in əlavələri, XNUMX gündə heç bir məhdudiyyət yox idi.

Quraşdırıldıqdan sonra Excel üçün Kutoolsxahiş edirəm:

1. Birləşdirmək istədiyiniz hüceyrələri seçin və vurun Kutools > Silsilə > Transform Range, bax ekran görüntüsü:

boş 2 qədər doc bağlayın

2. İçində Transform Range informasiya qutusunu yoxlayın Vahid sütun üçündür altında seçimi Transform növü, Və sonra seçin Boş hüceyrə qeydləri məhdudlaşdırır Altında Yazı başına satırlar, bax ekran görüntüsü:

boş 3 qədər doc bağlayın

3. Sonra basın Okvə nəticə qutusunu seçmək üçün bir seçim qutusunu xatırlatmaq üçün bir istenen qutu çıxacaq, ekran görüntüsüne baxın:

boş 4 qədər doc bağlayın

4. Basın OK, vahid sütun məlumatları boş xanaya görə bir neçə satır və sütuna çevrilmişdir, ekran görüntüsünə baxın:

boş 5 qədər doc bağlayın

5. Dönüştürülmüş məlumatlar birdən çox sütundadır, buna görə onları bir sütunla birləşdirməlisiniz, məlumat aralığını seçin və vurun Kutools > Birləşdirmək, bax ekran görüntüsü:

boş 6 qədər doc bağlayın

6. İçində Sütunları və ya Satırları birləşdirin dialoq qutusu, aşağıdakı variantları edin:

(1.) Seçin Sütunları birləşdirin seçimdən Seçilən hüceyrələri aşağıdakı variantlara uyğun birləşdirmək;

(2.) Sonra birləşdirilmiş dəyərləri ayırmaq istədiyiniz bir ayırıcı seçin;

(3.) Birləşdirilmiş hüceyrələrlə necə məşğul olmağınızı seçin. Orijinal məlumatları saxlaya və ya silə bilərsiniz və birləşdirilmiş hüceyrələri birləşdirə bilərsiniz. Ekran görüntüsünə baxın:

boş 7 qədər doc bağlayın

7. Ayarları bitirdikdən sonra basın Ok or tətbiq etmək düyməsinə, hüceyrələr xüsusi bir ayırıcı ilə bir sütuna birləşdi, ekran görünüşünə baxın:

boş 8 qədər doc bağlayın

Excel İndi Download və pulsuz sınaq Kutools!



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.
    Crystal · 2 years ago
    How would you do it if you want to base it off another column? I have similar data, but column B is a number then notes(like your fruit) in column I, I want to combine all notes in column I until there is another cell in Column B that has only number. Sometimes there are letter under B or the cells are blank which is why it needs to combine until a number.

    Then finally can it output back to where it started the combine? IE all notes for first number are in column j, but if the next number is 5 rows below that is fine, it just goes in column j but same row number as the number is found?