KutoolsforOffice — Tek çözüm, beş güçlü araç.Daha az çabayla daha fazlasını başarmak.

Sütunları ve satırları tek bir sütuna nasıl transpoze edersiniz?

YazarXiaoyang Değiştirme Tarihi

Excel çalışma sayfası kullanırken bazen şu sorunla karşılaşabilirsiniz: Veri aralığını bir sütuna nasıl dönüştürebilir veya transpoze edebilirsiniz? (Aşağıdaki ekran görüntülerine göz atın.) Şimdi bu sorunu çözmek için size üç hızlı yöntemi tanıtacağım.

orijinal verisağ okaralığı tek bir sütuna dönüştür

Formül ile sütunları ve satırları tek bir sütuna transpoze etme / dönüştürme

Kutools for Excel ile sütunları ve satırları tek bir sütuna transpoze etme / dönüştürme iyi fikir3

VBA kodu ile sütunları ve satırları tek bir sütuna transpoze etme / dönüştürme


Formül ile sütunları ve satırları tek bir sütuna transpoze etme / dönüştürme

Aşağıdaki uzun formül, veri aralığınızı hızla tek bir sütuna dönüştürmenize yardımcı olabilir. Lütfen aşağıdaki adımları izleyin:

1. İlk olarak, veri aralığınız için bir hücre adı tanımlayın. Dönüştürmek istediğiniz veri aralığını seçin, sağ tıklayın ve bağlam menüsünden Ad Tanımla seçeneğini belirleyin. Yeni Ad iletişim kutusunda istediğiniz hücre adını girin. Ardından Tamam düğmesine tıklayın. Ekran görüntüsüne bakın:

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

2. Hücre adını belirttikten sonra boş bir hücreye tıklayın. Bu örnekte E1 hücresine tıklayacağım ve ardından aşağıdaki formülü girin:=INDEX(MyData,1+INT((ROW(A1)-1)/COLUMNS(MyData)),MOD(ROW(A1)-1+COLUMNS(MyData),COLUMNS(MyData))+1).

Not: MyData, Veri Seç için tanımlanan hücre adıdır; ihtiyacınıza göre değiştirebilirsiniz.

3. Ardından, hata mesajı görünene kadar formülü aşağı doğru sürükleyin. Böylece aralıktaki tüm veriler tek bir sütuna transpoze edilmiş olur. 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 bir sütuna transpoze etme / dönüştürme

Formül hatırlamak zor ve uzun olabilir; VBA koduysa bazı sınırlamalara sahip olabilir. Endişelenmeyin—size daha kolay ve çok yönlü bir çözüm sunuyorum: Kutools for Excel! Transform Range özelliğini kullanarak bu sorunu hızlı ve zahmetsizce çözebilirsiniz.

Kutools for Excelkarmaşık görevleri kolaylaştırmak, yaratıcılığı ve verimliliği artırmak için 300'den fazla gelişmiş özelliğe sahiptir.Yapay zeka yetenekleriyle entegre, Kutools görevleri hassasiyetle otomatikleştirerek veri yönetimini zahmetsiz hale getirir.Kutools for Excel hakkında ayrıntılı bilgi…         Ücretsiz deneme…

Kutools for Excel’ı ücretsiz olarak yükledikten sonraaşağıdaki adımları uygulayın:

1. Transpoze etmek istediğiniz aralığı seçin.

2. Kutools > Transform Range seçeneğine tıklayın. Ekran görüntüsüne bakın:

kutools'un Aralık Dönüştür özelliğine tıklayın

3. Transform Range iletişim kutusunda, Range to single column seçeneğini işaretleyin. Ekran görüntüsüne bakın:

Aralığı Tek Sütuna Dönüştür seçeneğini seçin

4. Ardından, sonuçların yerleştirileceği hücreyi belirlemek için açılır pencereden bir hücre seçin ve Tamam düğmesine tıklayın.

sonucun yerleştirileceği bir hücre belirtin

5. Tamam düğmesine tıklayın; böylece birden fazla sütun ve satırdaki veriler tek bir sütuna transpoze edilir.
aralık verisi tek bir sütuna dönüştürüldü

Bir sütunu sabit bir değerle aralığa dönüştürmek istiyorsanız, bunu hızlıca gerçekleştirmek için Transform Range işlevini kullanabilirsiniz.
tek bir sütunu kutools ile aralığa dönüştür


VBA kodu ile sütunları ve satırları tek bir sütuna transpoze etme / dönüştürme

Aşağıdaki VBA koduyla birden fazla sütun ve satırı tek bir sütunda birleştirebilirsiniz.

1. ALT + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

2. Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodu Modül penceresine yapıştırın.

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. Kodu çalıştırmak için F5 tuşuna basın; dönüştürülecek aralığı seçmeniz için bir iletişim kutusu görüntülenecektir. Ekran görüntüsüne bakın:

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

4. Ardından Tamam düğmesine tıklayın; sonuçların yerleştirileceği tek bir hücreyi seçmeniz için başka bir iletişim kutusu açılacaktır. Ekran görüntüsüne bakın:

sonucun yerleştirileceği hücreyi seçmek için vba kodu

5. Tamam düğmesine tıklayın; böylece aralıktaki hücre içerikleri tek 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 bir satırı sütuna nasıl dönüştürürsünüz?

Excel'de tek bir sütunu birden fazla sütuna nasıl transpoze edersiniz?

Sütunları ve satırları tek bir satıra nasıl transpoze edersiniz?

En İyi Office Üretkenlik Araçları

🤖KUTOOLS AI Yardımcısı: Şunu temel alarak Veri Analizi’i devrimleştirin:Akıllı Yürütme   |  Kod Oluştur|  özel formüller Oluştur  |  Verileri Analiz Et ve Grafikler Oluştur|  Geliştirilmiş İşlevler Çağır…
Popüler Özellikler:Bul, Vurgula veya Yinelenenleri İşaretle   |  Boş Satırları Sil   |  Veri Kaybetmeden Sütunları Birleştir veya Hücreleri   |   Formül kullanmadan yuvarlama…
Süper ARA:Çoklu Kriterli Dikey Arama (VLookup)  |  Çoklu Değerli Dikey Arama (VLookup)  |   Birden Fazla Sayfada Dikey Arama (VLookup)   |   Bulanık Eşleme…
Gelişmiş Açılır Liste:Açılır Liste Hızlıca Oluştur   |  Bağımlı Açılır Liste   |  Çoklu Seçimli Açılır Liste…
Sütun Yöneticisi:Belirli Sayıda Sütun Ekle|Sütunları Taşı|Gizli Sütunların Görünürlük Durumunu Aç/Kapat|Aralıkları ve Sütunları Karşılaştır…
Öne Çıkan Özellikler:Izgara Odaklama   |  Tasarım Görünümü   |Gelişmiş formül çubuğu   | Çalışma Kitabı ve Sayfa Yöneticisi   |  Kaynaklar(Otomatik Metin)|  Tarih Seçici   |  Çalışma Sayfalarını Birleştir  |  Şifrele/Hücreleri Şifre Çöz   | Listeye Göre E-posta Gönder   |  Süper Filtre   |   Özel Filtre(Kalın Yazılı Hücreleri Filtrele/italik/üstü çizili…) …
En Çok Kullanılan 15 Araç Setleri:12 MetinAraçları(Metin Ekle,Belirli Karakterleri Sil, …)|   50+GrafikTürleri(Gantt Grafiği, …)|   40+ Pratik Formüller(Doğum tarihine dayanarak yaş hesapla, …)|   19 EklemeAraçları(QR Kodu Ekle,Yoldan Resim Ekle, …)|   12 DönüştürmeAraçları(Kelimeye Dönüştür,Döviz Kuru Dönüşümü, …)|   7 Birleştir ve AyırAraçları(Gelişmiş Satırları Birleştir,Hücreleri Böl, …)|… ve daha fazlası
Kutools'u tercih ettiğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve 40+ başka dillerde de desteklenir!

Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…


Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.

  • Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
  • Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
  • Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!

Tüm Kutools eklentileri — tek bir kurulum dosyasında!

Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.

ExcelWordOutlookTabsPowerPoint
  • Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
  • Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
  • Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
  • 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
  • En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar