İ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ə bir sütun daxilində birdən çox sütunu tez yığmaq necə?

Excel-də sütunların işlədilməsi funksiyası bir hüceyrənin məhdudlaşdırıcıya əsasən bir neçə sütuna bölünə bilər, lakin bir neçə sütunu bir sütuna yığmaq üçün hər hansı bir yol varsa, aşağıdakı ekran görüntüsü kimi göstərilir? Bu yazıda, bu tapşırığı tez bir zamanda həll etmək üçün bir sıra tövsiyələr təqdim edəcəyəm.
doc yığın sütunlarını bir 1-a göndərin

Çox sütunları bir formulla yığın

VBA ilə birdən çox sütun yığın

Transform Range ilə birdən çox sütun yığın yaxşı fikir3


Çox sütunları bir formulla yığın


1. İstif aralığınızı seçin və gedin Ad qutusu bu aralığa bir ad vermək və basın Daxil edin açar. Ekran görüntüsünə baxın:
doc yığın sütunlarını bir 2-a göndərin

2. Sonra nəticələri yerləşdirmək istədiyiniz boş bir hüceyrəni seçin, bu formulu daxil edin =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1)mətbuat ördəkr açarı və sürükləyin. Ekran görüntüsünə baxın:
doc yığın sütunlarını bir 3-a göndərin

Formada MyData, 1 addımında göstərdiyiniz sıra adıdır.

VBA ilə birdən çox sütun yığın

Burada sizə kömək edə biləcək bir VBA kodu var.

1. Basın Alt + F11 düymələri göstərmək üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. klik Taxmaq > Moduleskodu aşağıdan yapışdırıb Modules.

VBA: Sütunları birinə yığın

Sub ConvertRangeToColumn()
'UpdatebyExtendoffice
Dim Range1 As Range, Range2 As Range, Rng As Range
Dim rowIndex As Integer
xTitleId = "KutoolsforExcel"
Set Range1 = Application.Selection
Set Range1 = Application.InputBox("Source Ranges:", xTitleId, Range1.Address, Type:=8)
Set Range2 = Application.InputBox("Convert to (single cell):", xTitleId, Type:=8)
rowIndex = 0
Application.ScreenUpdating = False
For Each Rng In Range1.Rows
    Rng.Copy
    Range2.Offset(rowIndex, 0).PasteSpecial Paste:=xlPasteAll, Transpose:=True
    rowIndex = rowIndex + Rng.Columns.Count
Next
Application.CutCopyMode = False
Application.ScreenUpdating = True
End Sub

doc yığın sütunlarını bir 4-a göndərin

3. Basın F5 kodu açmaq üçün açar, qaynaq məlumatlarını seçmək üçün bir dialoq çıxır və klikləyin OK, nəticəni yerləşdirmək üçün bir hüceyrəni seçmək üçün. Ekran görüntüsünə baxın:
doc yığın sütunlarını bir 5-a göndərin

4. klik OK. İndi sütunlar bir sütunda yığılmışdır.
doc yığın sütunlarını bir 6-a göndərin


Transform Range ilə birdən çox sütun yığın

Tətbiq etmək Excel üçün Kutools'S Transform Range yardım proqramı da bu problemi tez həll etməyə kömək edə bilər.

Excel üçün Kutools, daha çox 300 lazımlı funksiyaları, işinizi daha asanlaşdırır.

Quraşdırıldıqdan sonra Excel üçün Kutools, aşağıdakıları edin:(Excel İndi Pulsuz İndir Kutools!)

Quraşdırıldıqdan sonra Excel üçün Kutools, aşağıdakıları edin :(Excel İndi Pulsuz Kutools İndirin!)

1. Kullandığınız sütun məlumatlarını seçin və vurun Kutools > Silsilə > Transform Range. Ekran görüntüsünə baxın:
doc yığın sütunlarını bir 8-a göndərin

2. İçində Transform Range dialoq yoxlayın Tək sütun üçündür seçim et və basın Oknəticələr yerləşdirmək üçün bir hüceyrəni seçin. Ekran görüntüsünə baxın:
doc yığın sütunlarını bir 9-a göndərin

3. klik OK. İndi sütunlar bir sütuna yığılmışdır.
doc yığın sütunlarını bir 1-a göndərin



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.
    John Smith · 1 years ago
    this is just a clickbait to have you download a paying software
    • To post as a guest, your comment is unpublished.
      Sunny · 8 months ago
      The first download will be free to use in 60 days, after that, you can decide to pay for use or not.
  • To post as a guest, your comment is unpublished.
    Jon · 1 years ago
    you are stacking multiple rows into one column, not multiple columns... not what I was looking for.
    • To post as a guest, your comment is unpublished.
    • To post as a guest, your comment is unpublished.
      Phil · 1 years ago
      To stack columns A-P that are in blocks of 6 rows put this formulae in cell R1 and fill down

      =OFFSET($A$1,MOD(ROW()-ROW($R$1),ROWS($A$1:$A$6)),TRUNC((ROW()-ROW($R$1))/ROWS($A$1:$A$6)),1,1)
      • To post as a guest, your comment is unpublished.
        Miguel · 9 months ago
        Cancel that last one, missed the truncate step.
      • To post as a guest, your comment is unpublished.
        Miguel · 9 months ago
        Dang, now it doesn’t work! Tried on a new tab but it’s now back to stacking column contents in one in stead of originally row content.
      • To post as a guest, your comment is unpublished.
        Miguel · 9 months ago
        Thank you for posting this solution! In case anyone needs a space after/at the end of each block, just add an additional count to the rows, so going by the example above, instead of $A$6, write $A$7. It inputs a zero ‘0’ to the row but you can easily ‘Use selection for Find’ in Sublime to edit them out. If you know the solution which doesn’t add a zero, please post!?
        • To post as a guest, your comment is unpublished.
          Timkil · 5 months ago
          to output a blank cell instead of 0, do an IF function>0, TRUE-->output the original cell content, FALSE-->output ""

          =if(OFFSET($A$1,MOD(ROW()-ROW($R$1),ROWS($A$1:$A$6)),TRUNC((ROW()-ROW($R$1))/ROWS($A$1:$A$6)),1,1)>0,OFFSET($A$1,MOD(ROW()-ROW($R$1),ROWS($A$1:$A$6)),TRUNC((ROW()-ROW($R$1))/ROWS($A$1:$A$6)),1,1),"")
      • To post as a guest, your comment is unpublished.
        Fish · 10 months ago
        This works perfect, thanks