Ana içeriğe atla
 

Sütunları ve satırları tek sütuna nasıl aktarabilirim / dönüştürebilirim?

Yazar: Xiaoyang Son Değiştirilme Tarihi: 2024-08-21

Excel çalışma sayfasını kullandığınızda, bazen şu problemle karşılaşırsınız: bir veri aralığını tek bir sütuna nasıl dönüştürebilir veya dönüştürebilirsiniz? (Aşağıdaki ekran görüntülerine bakın :) Şimdi, bu sorunu çözmeniz için size üç hızlı numara sunacağım.

Orjinal veri sağ ok aralığı tek sütuna dönüştür

Sütunları ve satırları formülle tek sütuna dönüştürme / dönüştürme

Kutools for Excel ile sütunları ve satırları tek sütuna dönüştürün / dönüştürüniyi fikir3

Sütunları ve satırları VBA kodu ile tek sütuna dönüştürün / dönüştürün


Sütunları ve satırları formülle tek sütuna dönüştürme / dönüştürme

Aşağıdaki uzun formül, bir dizi veriyi bir sütuna hızlı bir şekilde aktarmanıza yardımcı olabilir, lütfen şu şekilde yapın:

1. İlk olarak, veri aralığınız için bir aralık adı tanımlayın, dönüştürmek istediğiniz aralık verilerini seçin, sağ tıklayın ve seçin Adı Tanımla bağlam menüsünü oluşturur. İçinde Yeni isim iletişim kutusuna istediğiniz aralık adını girin. Sonra tıklayın OK. Ekran görüntüsüne bakın:

veri aralığı için bir aralık adı tanımlayın

2. Aralık adını belirledikten sonra boş bir hücreye tıklayın, bu örnekte E1 hücresine tıklayıp şu formülü gireceğim: =INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1).

not: Benim verim seçili verinin aralık adıdır, ihtiyaç duyduğunuzda değiştirebilirsiniz.

3. Ardından, hata bilgileri görüntülenene kadar formülü hücreye sürükleyin. Aralıktaki tüm veriler tek bir sütuna aktarılmıştır. Ekran görüntüsüne bakın:

sonucu almak için bir formül girin


Kutools for Excel ile sütunları ve satırları tek sütuna dönüştürün / dönüştürün

Belki formül hatırlamak için çok uzun ve VBA kodunun sizin için bazı sınırlamaları var, bu durumda lütfen endişelenmeyin, burada size daha kolay ve daha çok işlevli bir araç tanıtacağım.Kutools for Excel, Onun ile Transform Range yardımcı program ve bu sorunu hızlı ve kolay bir şekilde çözebilirsiniz.

Kutools for Excel Karmaşık görevleri kolaylaştırmak, yaratıcılığı ve verimliliği artırmak için 300'den fazla gelişmiş özellik sunar. Yapay zeka yetenekleriyle geliştirildiKutools, görevleri hassas bir şekilde otomatikleştirerek veri yönetimini zahmetsiz hale getirir. Kutools for Excel hakkında detaylı bilgi...         Ücretsiz deneme...

Sonra ücretsiz kurulum Kutools for Excel, lütfen aşağıdaki işlemleri yapın:

1. Sırasını değiştirmek istediğiniz aralığı seçin.

2. tık Kutools > Transform Range, ekran görüntüsüne bakın:

kutools'un Dönüştürme Aralığı özelliğini tıklayın

3. içinde Transform Range iletişim kutusunu seçin Range to single column seçenek, ekran görüntüsüne bakın:

Tek sütuna kadar aralık seçeneğini seçin

4. Sonra tıklayın OKve sonucu açılır kutudan koymak için bir hücre belirtin.

sonucu koymak için bir hücre belirtin

5. tık OKve birden çok sütun ve satır verileri tek bir sütuna aktarılmıştır.
aralık verileri tek bir sütuna dönüştürüldü

Bir sütunu sabit satırlara sahip bir aralığa dönüştürmek istiyorsanız, ayrıca Transform Range hızlı bir şekilde işlemek için işlev.
kutools ile bir sütunu aralığa dönüştürün


Sütunları ve satırları VBA kodu ile tek sütuna dönüştürün / dönüştürün

Aşağıdaki VBA kodu ile birden çok sütunu ve satırı tek bir sütunda da birleştirebilirsiniz.

1. Tuşunu basılı tutun. ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.

2. tık Ekle > modülve aşağıdaki kodu modül pencere.

Sub ConvertRangeToColumn()
'Updateby20131126
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

3. Basın F5 kodu çalıştırmak için tuşuna basın ve dönüştürülecek aralığı seçmeniz için bir iletişim kutusu görüntülenir. Ekran görüntüsüne bakın:

veri aralığını seçmek için vba kodu

4. Sonra tıklayın Okve sonucu ortaya koymak için tek bir hücre seçmek için başka bir iletişim kutusu görüntülenir, ekran görüntüsüne bakın:

sonucu koymak için bir hücre seçmek için vba kodu

5. Ve tıklayın Ok, ardından aralığın hücre içerikleri bir sütun listesine dönüştürülür, ekran görüntüsüne bakın:

sonucu almak için vba kodu


İlgili Makaleler:

Excel'de satırı sütuna nasıl değiştirebilirim?

Tek bir sütunu Excel'deki birden çok sütuna nasıl aktarabilirim / dönüştürebilirim?

Sütunları ve satırları tek satıra nasıl aktarabilirim / dönüştürebilirim?

En İyi Ofis Üretkenlik Araçları

🤖 Kutools AI Yardımcısı: Aşağıdakilere dayalı olarak veri analizinde devrim yaratın: Akıllı Yürütme   |  Kodunu oluşturun  |  Özel Formüller Oluşturun  |  Verileri Analiz Edin ve Grafikler Oluşturun  |  Kutools İşlevlerini Çağır...
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya Tanımla   |  Boş Satırları Sil   |  Veri Kaybı Olmadan Sütunları veya Hücreleri Birleştirin   |   Formülsüz Tur ...
Süper Arama: Çoklu Ölçütlü VLookup    Çoklu Değer VLookup  |   Birden Çok Sayfada VLookup   |   Bulanık Arama ....
Gelişmiş Açılır Liste: Hızla Açılır Liste Oluşturun   |  Bağımlı Açılır Liste   |  Çoklu Seçim Açılır Liste ....
Sütun Yöneticisi: Belirli Sayıda Sütun Ekleme  |  Sütunları Taşı  |  Gizli Sütunların Görünürlük Durumunu Değiştir  |  Aralıkları ve Sütunları Karşılaştırın ...
Öne Çıkan Özellikler: Izgara Odağı   |  Tasarım görünümü   |   Büyük Formül Çubuğu    Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynak Kütüphanesi (Otomatik metin)   |  Tarih Seçici   |  Çalışma Sayfalarını Birleştirin   |  Hücreleri Şifrele/Şifresini Çöz    E-postaları Listeye Göre Gönder   |  Süper Filtre   |   Özel Filtre (kalın/italik/üstü çizili filtre...) ...
En İyi 15 Araç Seti12 Metin Tools (Metin ekle, Karakterleri Kaldır, ...)   |   50+ Grafik Türleri (Gantt şeması, ...)   |   40+ Pratik Formüller (Yaşı doğum gününe göre hesapla, ...)   |   19 sokma Tools (QR Kodunu Girin, Yoldan Resim Ekle, ...)   |   12 Dönüştürme Tools (Sayılardan Kelimelere, Para Birimi Dönüştürme, ...)   |   7 Birleştir ve Böl Tools (Gelişmiş Kombine Satırları, Bölünmüş hücreler, ...)   |   ... ve dahası

Kutools for Excel ile Excel Becerilerinizi Güçlendirin ve Daha Önce Hiç Olmadığı Gibi Verimliliği Deneyimleyin. Kutools for Excel, Üretkenliği Artırmak ve Zamandan Tasarruf Etmek için 300'den Fazla Gelişmiş Özellik Sunar.  En Çok İhtiyacınız Olan Özelliği Almak İçin Buraya Tıklayın...


Office Tab, Office'e Sekmeli Arayüz Getirir ve İşinizi Çok Daha Kolay Hale Getirir

  • Word, Excel, PowerPoint'te sekmeli düzenlemeyi ve okumayı etkinleştirin, Publisher, Access, Visio ve Project.
  • Yeni pencereler yerine aynı pencerenin yeni sekmelerinde birden çok belge açın ve oluşturun.
  • Üretkenliğinizi% 50 artırır ve her gün sizin için yüzlerce fare tıklamasını azaltır!