Excel'de hızlı bir şekilde boş satır nasıl eklenir?
Birçoğumuz, Excel'de mevcut satırların her biri arasına boş bir satır eklememiz gereken bir sorunla karşılaşabiliriz ve hepimiz tek tek boş bir satır ekleme işlemini biliyoruz. Ancak yüzlerce boş satırı tek tek eklemek oldukça yorucu bir işlem olacaktır. İşte bu sorunu çözmek için size yardımcı olacak bazı pratik ipuçları.
Sıralama işlevini kullanarak boş satırlar ekleme
Kutools for Excel ile belirli sayıda boş satır hızlıca ekleme
VBA kodu ile sırayla boş satırlar ekleme
Sıralama işlevini kullanarak boş satırlar ekleme
Bu yöntem, var olan satırlar arasına boş satırlar eklemenin daha kolay ancak dolaylı bir yoludur. Aşağıdaki adımları izleyebilirsiniz:
1. Verilerinizin yanına boş bir sütuna ihtiyacınız var. Örneğin, A1:E9 aralığından oluşan bir çalışma sayfam olduğunu varsayalım, F sütununu kullanabilirsiniz.
2. F1 hücresine 1 yazın ve F2 hücresine 2 yazın.
3. 1 ve 2 numaralarını seçin ve otomatik doldurma tutamacına çift tıklayın, Excel F sütunundaki hücreleri otomatik olarak dolduracaktır.
4. Ardından bu yeni F sütununu (F1:F9) kopyalayın, F10 hücresini seçin ve F1:F9'dan otomatik doldurma numaralarını yapıştırın. Ekran görüntüsüne bakın:
5. Ardından Veri > Sırala'ya tıklayın ve bir Sıralama Uyarısı iletişim kutusu açılacak, Seçimi Genişlet seçeneğini işaretleyin ve Sırala... butonuna tıklayın. Ekran görüntüsüne bakın:
6. Ve bir Sıralama iletişim kutusu açılacak, Sıralama ölçütü açılır listesinden 1 numarayı seçin ve ardından Tamam butonuna tıklayın. Ekran görüntüsüne bakın:
Ardından, yeni boş satırlar mevcut satırlar arasına eklenecektir. Ekran görüntüsüne bakın:
Not: Her satır arasında iki veya üç boş satır eklemek istiyorsanız, yeni otomatik doldurma sütununu iki veya üç kez kopyalayarak yeni satırlar ekleyebilirsiniz.
Kutools for Excel ile belirli sayıda boş satır hızlıca ekleme
Yukarıdaki iki yöntem yalnızca her satır arasına boş satırlar eklemeye yönelik iken, her n satır sonra bir veya birden fazla boş satır eklemek için ne yapmalısınız? Burada Kutools for Excel'in Boş Satır ve Sütun Ekle yardımcı programını öneririm. Bu yardımcı program, belirli bir aralığa her n satır sonrasına belirli sayıda boş satır eklemenize yardımcı olabilir. Lütfen aşağıdaki adımları izleyin.
1. Boş satırlar eklemek istediğiniz aralığı seçin ve Kutools > Ekle > Boş Satır ve Sütun Ekle'ye tıklayın. Ekran görüntüsüne bakın:
2. Boş Satır ve Sütun Ekle iletişim kutusunda, Ekleme Türü bölümünde Boş satırlar'ı seçin, boş satırlar eklemek için aralık satırlarının sayısını ve eklemek istediğiniz satır sayısını belirtin ve ardından Tamam butonuna tıklayın. Ekran görüntüsüne bakın:
>
Ardından, her iki satır sonrasında belirli boş satırların eklendiğini görebilirsiniz. Ekran görüntülerine bakın:
Not: Aralık ve Satırlar içindeki sayılar ihtiyaçlarınıza göre ayarlanabilir. Örneğin, her bir, iki, üç… satır sonra üç, dört, beş… boş satır ekleyebilirsiniz.
Bu yardımcı programın ücretsiz deneme sürümünü (30-gün) kullanmak istiyorsanız, lütfen indirmek için tıklayın ve ardından yukarıdaki adımlara göre işlemi uygulamak için gidin.
VBA kodu ile sırayla boş satırlar ekleme
Yukarıdaki yöntem biraz karmaşık geldiyse, aşağıdaki VBA kodunu kullanarak sorunu çözebilirsiniz.
1. Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın, ardından Ekle > Modül'e tıklayın ve aşağıdaki kodu Modül'e girin:
VBA kodu: Excel'de boş satırlar ekleme
Sub InsertBlackRows()
'Updateby20131127
Dim Rng As Range
Dim WorkRng As Range
Dim FirstRow As Integer, xRows As Integer, xCols As Integer
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
FirstRow = WorkRng.Row
xRows = WorkRng.Rows.Count
xCols = WorkRng.Columns.Count
Application.ScreenUpdating = False
WorkRng.Cells(xRows, 1).Resize(1, xCols).Select
Do Until Selection.Row = FirstRow
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Selection.Offset(-1, 0).Select
Loop
Application.ScreenUpdating = True
End Sub
2. Ardından butonuna tıklayın veya F5 tuşuna basarak kodu çalıştırın. Açılan Kutools for Excel iletişim kutusunda, boş satırlar eklemek istediğiniz aralığı seçin ve ardından Tamam butonuna tıklayın. Ekran görüntüsüne bakın:
Ardından, her iki satır arasında yeni bir boş satır eklenmiş olacaktır. Ekran görüntüsüne bakın:
İlgili makaleler
- Her diğer sütun arasına hızlıca boş sütun ekleme
- Tek seferde birden fazla boş satır veya sütun ekleme
En İyi Ofis Verimlilik Araçları
Kutools for Excel ile Excel becerilerinizi geliştirin ve daha önce hiç olmadığı kadar verimli olun. Kutools for Excel, üretkenliğinizi artırmak ve zamanınızı kaydetmek için300'den fazla gelişmiş özellik sunar. En çok ihtiyacınız olan özelliği almak için buraya tıklayın...
Office Tab, Office'e sekmeli arayüz getirir ve işinizi çok daha kolaylaştırır
- Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Aynı pencerenin yeni sekmelerinde birden fazla belge açın ve oluşturun, yeni pencerelerde değil.
- Verimliliğinizi %50 artırır ve her gün yüzlerce fare tıklamasını azaltır!