Sütunları ve satırları tek bir satıra nasıl transpoze edersiniz?
Birden fazla satırı ve sütunu tek, uzun bir satırda nasıl birleştirirsiniz? Belki size kolay geliyor olabilir; çünkü bunları tek tek kopyalayıp elle aynı satırda birleştirebilirsiniz. Ancak yüzlerce satır ve sütun söz konusuysa, bu işlem son derece zaman alıcı ve yorucu hale gelir. İşte tam da bu sorunu çözmek için bazı hızlı yöntemleri sizinle paylaşacağım.
Formül kullanarak sütunları ve satırları tek bir satıra transpoze etme / dönüştürme
VBA kodu kullanarak sütunları ve satırları tek bir satıra transpoze etme / dönüştürme
Sütunları ve satırları tek bir satıra transpoze etme / dönüştürme Kutools for Excel ile
Formül kullanarak sütunları ve satırları tek bir satıra transpoze etme / dönüştürme
Aşağıdaki ekran görüntüsünde gösterildiği gibi bir veri aralığınız olduğunu varsayalım; bu veriyi, uzun bir formül kullanarak yeni bir çalışma sayfasında tek bir satıra dönüştürebilirsiniz.
Lütfen aşağıdaki formülü uygulayın:
1. Geçerli çalışma kitabındaki yeni bir çalışma sayfasında A1 hücresine tıklayın ve aşağıdaki formülü kopyalayıp yapıştırın:=OFFSET(Sheet1!$A$1,((ROW()-1)*5)+(FLOOR(COLUMN()-1,4)/4),(COLUMN()-1)-(FLOOR(COLUMN()-1,4)))
Not: Sheet1!$A$1, kullanmak istediğiniz çalışma sayfası ve hücre başvurularıdır.
ROW()-1)*5 yukarıdaki formülde, 5, satır numarasını temsil eder; ve COLUMN()-1,4)/4, 4, sütun numarasını temsil eder. Bunları ihtiyacınıza göre değiştirebilirsiniz.
2. Ardından, 0 sayısı görünene kadar doldurma tutamacını sağa doğru sürükleyin. Bu örnekte, aralıktaki tüm veriler tek bir satıra dönüştürülerek Yeni çalışma sayfasına transpoze edilmiştir. Ekran görüntüsüne göz atın:
VBA kodu kullanarak sütunları ve satırları tek bir satıra transpoze etme / dönüştürme
Aşağıdaki VBA kodu, bir veri aralığını tek bir satıra dönüştürmenize yardımcı olabilir.
1. Microsoft Visual Basic for Applications penceresini açmak için ALT + F11 tuşlarına basın.Microsoft Visual Basic for Applications penceresi.
2. Ekle > Modül seçeneğine tıklayın ve aşağıdaki kodu Modül penceresine yapıştırın.
Sub TransformOneRow()
'Updateby20131120
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Ranges to be transform :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Paste to (single cell):", xTitleId, Type:=8)
Application.ScreenUpdating = False
xRows = InputRng.Rows.Count
xCols = InputRng.Columns.Count
For i = 1 To xRows
InputRng.Rows(i).Copy OutRng
Set OutRng = OutRng.Offset(0, xCols + 0)
Next
Application.ScreenUpdating = True
End Sub3. Ardından kodu çalıştırmak için F5 tuşuna basın; bir iletişim kutusu açılır ve satıra dönüştürmek istediğiniz içerik aralığını seçmeniz istenir. Daha sonra Tamam düğmesine tıklayın. Sonrasında, sonuçların yerleştirileceği tek bir hücreyi seçmeniz için başka bir iletişim kutusu açılır. Ekran görüntülerine bakın:
 |
 |
 |
Ardından Tamam düğmesine tıklayın; Aralık Seç içindeki içerikler bir satıra dönüştürülmüş olur. Ekran görüntüsüne bakın:
 |
|
 |
Not: Set OutRng = OutRng.Offset(0, xCols + 0) satırında, 0 değerini ihtiyacınıza göre istediğiniz sayıyla değiştirebilirsiniz.
Örneğin, sonuçları orijinal satırlardan bir sütun boşlukla ayırmak istiyorsanız, Set OutRng = OutRng.Offset(0, xCols + 0) ifadesini Set OutRng = OutRng.Offset(0, xCols + 1) olarak değiştirebilirsiniz. Sonuçlar aşağıdaki gibidir:
Sütunları ve satırları tek bir satıra transpoze etme / dönüştürme Kutools for Excel ile
Yukarıdaki iki yöntem, Excel’de yeni olan kullanıcılar için biraz zorlayıcı görünebilir; işte tam da bu yüzden size son derece kullanışlı bir araçtan – Kutools for Excel – bahsedeceğim.
Kutools for Excel30 gün boyunca sınırsız olarak ücretsiz denenebilen, 300’dan fazla kullanışlı Excel aracına sahiptir.Şimdi Edinin
Kutools for Excel’in Aralığı Dönüştür özelliğini kullanarak bir veri aralığını hızlıca tek bir satıra dönüştürebilirsiniz. Aşağıdaki adımları izleyin: Kutools for Excel
1. Transpoze etmek istediğiniz aralığı seçin.
2. Kutools > Aralık > Aralığı Dönüştür seçeneğine tıklayın.
3. Aralığı Dönüştür iletişim kutusunda, Aralığı Tek Satıra Dönüştür seçeneğini işaretleyin. Ekran görüntüsüne bakın:
4. Ardından TAMAM düğmesine tıklayın ve çıkan iletişim kutusundan sonucun yerleştirileceği hücreyi seçin.
5. TAMAM düğmesine tıklayın; artık aralıktaki veriler tek bir satıra transpoze edilmiştir. Ekran görüntülerine bakın:
|
|
 |
Bu özellik hakkında daha fazla bilgi edinmek istiyorsanız, lütfen şurayı ziyaret edin: Aralığı Dönüştür.
İlgili makaleler:
Excel'de bir satırı sütuna nasıl dönüştürebilirsiniz?
Excel'de tek bir sütunu birden çok sütuna nasıl transpoze edersiniz?
Sütunları ve satırları tek bir sütuna nasıl transpoze edersiniz?
En İyi Office Üretkenlik Araçları
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.
- 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