İ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ə dəyişən dəyərləri olan iki sütunu necə birləşdirmək olar?

İşdə bir işdə iki sütun var: iş bu sütunları bir sütuna birləşdirmək üçün göstərilən ekran görünüşündəki alternativlər ilə alternativləri birləşdirməkdir. Necə təkrarlayaraq işi tez bir şəkildə düzəldə bilərsiniz?
doc, iki sütunu 1 dəyişən dəyəri ilə birinə birləşdirin

VBA kodu ilə dəyişən dəyərlərlə iki sütunu birinə birləşdirin

Excel üçün Kutools tərəfindən alternativ dəyərləri olan iki sütun birinə birləşdirinyaxşı fikir3


VBA kodu ilə dəyişən dəyərlərlə iki sütunu birinə birləşdirin

İki sütunun alternativ dəyərlərlə birləşməsi üçün Excel-də VBA kodundan başqa heç bir funksiya yoxdur.

1. Basın Alt + F11 düymələri aktivləşdirmək Proqramlar üçün Microsoft Visual Basic pəncərə. Basın Taxmaq > Modules yeni bir boş modul yaratmaq.

2. Kodun moduluna köçürün və yapışdırın.

VBA: iki sütunu bir dəyər alternativi ilə birləşdirin

Sub MergeColumns()
'UpdatebyExtendoffice20180815
Dim xSRg, xDRg As Range
Dim xDWS As Worksheet
Dim xIntDR, xIntDC, xI As Long
Dim xFNum As Long
On Error GoTo Err1
Set xSRg = Application.InputBox("Select two columns:", "Kutools for Excel", xTxt, , , , , 8)
If xSRg Is Nothing Then
Err1:
    Application.ScreenUpdating = True
    Exit Sub
End If
Set xDRg = Application.InputBox("Select a cell to place result:", "Kutools for Excel", xTxt, , , , , 8)
If xDRg Is Nothing Then
    Exit Sub
End If
Application.ScreenUpdating = False
Set xDWS = xDRg.Worksheet
xIntDR = xDRg.Row
xIntDC = xDRg.Column
xI = 0
    For xFNum = 1 To xSRg.Count
        Set xDRg = xDWS.Cells(xIntDR + xI, xIntDC)
        xDRg.Value = xSRg.Item(xFNum).Value
        xI = xI + 1
    Next xFNum
Application.ScreenUpdating = True
End Sub

3. Basın F5 düyməsini basın və açma dialoquna birləşdirmək istədiyiniz iki sütunu seçin.
doc, iki sütunu 2 dəyişən dəyəri ilə birinə birləşdirin

4. klik OK, ikinci informasiya qutusunda, nəticə yerləşdirmək üçün bir hüceyrə seçin.
doc, iki sütunu 3 dəyişən dəyəri ilə birinə birləşdirin

5. klik OK. İndi seçilmiş iki sütun bir-birinə və dəyərlərə alternativ birləşdi.


Excel üçün Kutools tərəfindən alternativ dəyərləri olan iki sütun birinə birləşdirin

Əgər Excel üçün Kutools Excel-də quraşdırılmışdır Transform Range bu işi yalnız 3 asan addımlarla həll edə bilər.

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

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

1. Birləşdirmək istədiyiniz sütunları (iki və ya daha çox) seçin, klikləyin Kutools > Transform Range.
doc, iki sütunu 4 dəyişən dəyəri ilə birinə birləşdirin

2. İçində Transform Range dialoq yoxlayın Range to single column seçim et və basın Ok.
doc, iki sütunu 5 dəyişən dəyəri ilə birinə birləşdirin

3. Nəticəni açılış dialoquna yerləşdirmək üçün bir hüceyrə seçin. Basın OK.
doc, iki sütunu 6 dəyişən dəyəri ilə birinə birləşdirin

İndi sütunlar birinə birləşdirilib və dəyərlər alternativ şəkildədir.
doc, iki sütunu 7 dəyişən dəyəri ilə birinə birləşdirin


Sekmeli tarama ve birden çox Excel iş kitabını / Word sənədlərini Firefox, Chrome, İnternet olaraq redaktə edin 10 araşdırın!

Firefox / Chrome / IE-də birdən çox veb səhifəni keçirmək üçün tanış ola bilərsiniz və asanlıqla müvafiq sekmeleri asanlıqla tıklayaraq onların arasında keçid edə bilərsiniz. Office Tab, bir Excel iş kitabını və ya Word sənədlərini bir Excel pəncərəsində və ya Word pencerəsində gözdən keçirmək və onların sekmelerini tıklayarak asanlıqla keçmək üçün imkan verən oxşar emal dəstəkləyir. Office Tab-ın 45-gün sınaq üçün basın!

ot excel


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.

Be the first to comment.