İ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ə sütun hər sətri bölmək necə?

DNX hər bir sıra 1-yə bölünmüşdür

Məsələn, uzun bir veri siyahısı var və indi sütunu aşağıdakı siyahı ekranı kimi hər iki sıra ilə bərabər iki siyahıya bölmək istəyirəm. Excel-də bu vəzifəni həll etmək üçün yaxşı yollar varmı?

Formula ilə hər sətrə bir sütun ayırın

VBA kodu ilə sütun hər bir sıra bölün

Excel üçün Kutools ilə sütun hər bir sıra bölün


Hər birinə və ya n sırasına bir sütun ayırın:

ilə Excel üçün Kutools's Transform Range kommunal, tez bir sıra və ya sütun bir sıra hüceyrələrə və ya əksinə çevirə bilərsiniz.

DNX hər bir sıra 11-yə bölünmüşdür


arrow mavi sağ bubble Formula ilə hər sətrə bir sütun ayırın


Aşağıdakı formullar hər sətirlə sütunu iki sütuna tez bir şəkildə bölməyinizə kömək edə bilər, xahiş edirəm:

1. Bu formülü boş bir hüceyrəyə daxil edin, məsələn C2, =INDEX($A$2:$A$13,ROWS(C$1:C1)*2-1), bax ekran görüntüsü:

DNX hər bir sıra 2-yə bölünmüşdür

2. Sonra xəttlərdə səhvlər görünənə qədər dolama tutamağını sürüşdürün, ekran görünüşünə baxın:

DNX hər bir sıra 3-yə bölünmüşdür

3. Daha sonra D2 hücresine başqa bir formül daxil edin, =INDEX($A$2:$A$13,ROWS(D$1:D1)*2), və səhvlər göründüyü qədər doldurma tutamağını hüceyrələrə sürükləyin və sütun dəyərləri hər sətirdə hər sətirə bölünmüş, ekran görünüşünə baxın:

DNX hər bir sıra 4-yə bölünmüşdür


arrow mavi sağ bubble VBA kodu ilə sütun hər bir sıra bölün

VBA kodu ilə maraqlanırsınızsa, burada bu problemi həll etmək üçün bir kod haqqında danışa bilərsiniz.

1. Basıb saxlayın ALT + F11 Excel açarları və açar Proqramlar üçün Microsoft Visual Basic pəncərə.

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

VBA kodu: Sütunu hər sətirdə iki sütuna bölün

Sub SplitEveryOther()
'Updateby20150813
Dim Rng As Range
Dim InputRng As Range, OutRng As Range
Dim index As Integer
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
Set OutRng = OutRng.Range("A1")
num1 = 1
num2 = 1
For index = 1 To InputRng.Rows.Count
    If index Mod 2 = 1 Then
        OutRng.Cells(num1, 1).Value = InputRng.Cells(index, 1)
        num1 = num1 + 1
    Else
        OutRng.Cells(num2, 2).Value = InputRng.Cells(index, 1)
        num2 = num2 + 1
    End If
Next
End Sub	

3. Sonra basın F5 bu kodu çalıştırmak üçün bir tuşa basın və bir soruş qutusu, bölmək istədiyiniz veri aralığını seçməyi xatırlatmaq üçün açılır, ekran görüntüsünə baxın:

DNX hər bir sıra 5-yə bölünmüşdür

4. və basın OK, nəticə vermək üçün bir hüceyrə seçməyinizə imkan verən başqa bir əmr qutusu atılır, ekran görüntüsünə baxın:

DNX hər bir sıra 6-yə bölünmüşdür

5. Sonra basın OKvə sütun hər iki sıra ilə iki sütuna bölünmüşdür. Ekran görüntüsünə baxın:

DNX hər bir sıra 7-yə bölünmüşdür


arrow mavi sağ bubble Excel üçün Kutools ilə sütun hər bir sıra bölün

Daha yeni şeylər öyrənmək istəyirsinizsə, güclü bir vasitə təklif edə bilərəm -Excel üçün KutoolsOnun ilə Transform Range kommunal, sürətli bir sıra və ya sütun bir sıra hüceyrələrə və əksinə çevirə bilərsiniz.

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 Kutools, xahiş edirəm :( İndi Excel üçün Pulsuz Kutools Download )

1. Hər sətirdə iki sütuna bölmək istədiyiniz sütun məlumatlarını seçin.

2. Sonra basın Kutools > Silsilə > Transform Range, bax ekran görüntüsü:

DNX hər bir sıra 8-yə bölünmüşdür

3. İçində Transform Range informasiya qutusu seçin Vahid sütun üçündür Altında Transform növü, Sonra seçmək Sabit dəyər və daxil edin 2 içərisindəki qutuya daxil edin Yazı başına satırlar bölmədə bax:

DNX hər bir sıra 9-yə bölünmüşdür

4. Sonra basın Ok düyməsini basın və nəticə qutusunu çıxardığınız bir hüceyrəni seçdiyinizi xatırlatmaq üçün bir qovluq çıxacaq, ekran görüntüsünə baxın:

DNX hər bir sıra 10-yə bölünmüşdür

5. Basın OK, siyahıdakı məlumatlar hər iki sütuna ikiyə bölünmüşdür.

Bu Transform Range proqramı haqqında daha çox məlumat üçün tıklayın.

İndi Excel üçün Pulsuz Kutools Download



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.
    Jeff · 2 years ago
    As a workaround, you can do the following:

    Using the above example,

    1. Type "=a2" in c2 and "=a3" in d3.

    2. Now select c2 through d3.

    3. Drag the fill handle parallel to all the data.

    4. Now delete cell a2 and shift cells up.

    5. Now we need to convert the formula results to the calculated values. That's easily done by copying all the data including the blank rows and pasting the values right on top of itself.

    6. Now you can simply sort any of the column alphabetically to bring all the data up.