Excel'de belirli bir metinden sonra boş bir satır nasıl eklenir?
Aşağıdaki ekran görüntüsü gibi belirli bir metinden sonra boş satırlar eklemek istiyorsanız, bunları tek tek manuel olarak eklemeden hızlı ve kolay bir şekilde nasıl başa çıkabilirsiniz?
 |
 |
 |
VBA kodu ile belirli metinden sonra boş satırlar ekleyin
VBA kodu ile belirli metinden sonra boş satırlar ekleyin
İhtiyacınız olan belirli metinden sonra boş satırlar eklemek için aşağıdaki VBA kodunu uygulayabilirsiniz, lütfen şu şekilde yapın:
1. Basılı tutun ALT + F11 tuşlarını açmak için Uygulamalar için Microsoft Visual Basic pencere.
2. tıklayın Ekle > modülve aşağıdaki kodu Modül Penceresine yapıştırın.
VBA kodu: Belirli metinden sonra boş satırlar ekleyin
Sub Insertrowbelow()
'updateby Extendoffice
Dim i As Long
Dim xLast As Long
Dim xRng As Range
Dim xTxt As String
On Error Resume Next
xTxt = Application.ActiveWindow.RangeSelection.Address
Set xRng = Application.InputBox("please select the column with specific text:", "Kutools for Excel", xTxt, , , , , 8)
If xRng Is Nothing Then Exit Sub
If (xRng.Columns.Count > 1) Then
MsgBox "the selected range must be one column", , "Kutools for Excel"
Exit Sub
End If
xLast = xRng.Rows.Count
For i = xLast To 1 Step -1
If InStr(1, xRng.Cells(i, 1).Value, "In progressing") > 0 Then
Rows(xRng.Cells(i + 1, 1).Row).INSERT shift:=xlDown
End If
Next
End Sub
not: Yukarıdaki kodda "metin değerini değiştirebilirsiniz"İşleniyor"Komut dosyasından istediğiniz diğer tüm değerlere InStr (1, xRng.Cells (i, 1) .Value, "Devam ediyor")> 0 ise.
3. Daha sonra, tuşuna basın. F5 Bu kodu çalıştırmak için tuş, açılan iletişim kutusunda, kullanmak istediğiniz belirli metni içeren sütun verilerini seçin, ekran görüntüsüne bakın:
4. Ve sonra tıklayın OK düğmesi ve belirttiğiniz belirli metinden sonra boş satırlar eklenmiştir, ekran görüntüsüne bakın:
|
|
|
Daha göreli ekleme satırı makaleleri:
- Satırı Birden Çok Kez Kopyala ve Ekle veya Satırı X Kez Çoğalt
- Günlük çalışmanızda, hiç bir satırı veya her satırı kopyalamayı ve ardından bir çalışma sayfasındaki geçerli veri satırının altına birden çok kez eklemeyi denediniz mi? Örneğin, bir hücre aralığım var, şimdi, her satırı kopyalamak ve aşağıdaki ekran görüntüsü gibi 3 kez sonraki satıra yapıştırmak istiyorum. Excel'de bu işle nasıl başa çıkabilirsiniz?
- Excel'de Değer Değiştiğinde Boş Satırlar Ekle
- Bir dizi veriye sahip olduğunuzu varsayarsak ve şimdi değer değiştiğinde veriler arasına boş satırlar eklemek istiyorsunuz, böylece bir sütundaki sıralı aynı değerleri aşağıda gösterilen ekran görüntüleriyle ayırabilirsiniz. Bu yazıda, bu sorunu çözmeniz için bazı püf noktalarından bahsedeceğim.
- Google E-Tablolara Hızlıca Birden Çok Satır veya Sütun Ekleme
- Bu makale, bir google sayfasına birden çok boş satır veya sütun eklemenin kolay bir yolunu tanıtacağım.
- Excel'de Belirli Metnin Üstüne Boş Satır Ekle
- Bir çalışma sayfası üzerinde çalışırken, hiç bir sütundaki belirli bir metnin üzerine boş satır eklemeyi denediniz mi? Örneğin, A sütununda bazı isimler var, şimdi, gösterilen sol ekran görüntüsü olarak "Mike" adını içeren hücrelerin üzerine boş satırlar eklemek istiyorum, belki, bu görevi Excel'de çözmenin doğrudan bir yolu yok . Bu yazıda, Excel'de bu işin üstesinden gelmek için bazı iyi püf noktalarından bahsedeceğim.
En İyi Ofis Üretkenliği Araçları
Kutools for Excel Sorunlarınızın Çoğunu Çözer ve Verimliliğinizi% 80 Artırır
- Süper Formül Çubuğu (birden çok metin ve formül satırını kolayca düzenleyin); Okuma Düzeni (çok sayıda hücreyi kolayca okuyun ve düzenleyin); Filtrelenmiş Aralığa Yapıştır...
- Hücreleri / Satırları / Sütunları Birleştirme ve Verilerin Saklanması; Bölünmüş Hücre İçeriği; Yinelenen Satırları ve Toplam / Ortalamayı Birleştirme... Yinelenen Hücreleri Önleyin; Aralıkları Karşılaştır...
- Yinelenen veya Benzersiz'i seçin Satırlar; Boş Satırları Seçin (tüm hücreler boştur); Süper Bul ve Bulanık Bul Birçok Çalışma Kitabında; Rastgele Seçim ...
- Tam kopya Formül referansını değiştirmeden Birden Çok Hücre; Otomatik Referans Oluştur Birden Çok Sayfaya; Madde İşaretleri Ekle, Onay Kutuları ve daha fazlası ...
- Sık Kullanılan ve Hızlı Eklenen Formüller, Aralıklar, Grafikler ve Resimler; Hücreleri Şifrele şifre ile; Posta Listesi Oluşturun ve e-posta gönder ...
- Metni Çıkar, Metin Ekle, Konuma Göre Kaldır, Alanı Kaldır; Sayfalama Alt Toplamları Oluşturma ve Yazdırma; Hücre İçeriği ve Yorumları Arasında Dönüştür...
- Süper Filtre (filtre şemalarını kaydedin ve diğer sayfalara uygulayın); Gelişmiş Sıralama ay / hafta / gün, sıklık ve daha fazlasına göre; Özel Filtre kalın, italik ...
- Çalışma Kitaplarını ve Çalışma Sayfalarını Birleştirin; Tabloları anahtar sütunlara göre birleştirin; Verileri Birden Çok Sayfaya Bölme; Toplu dönüştürme xls, xlsx ve PDF...
- Pivot Tablo Gruplaması hafta numarası, haftanın günü ve daha fazlası ... Kilidi Açılmış, Kilitli Hücreleri Göster farklı renklerle; Formülü / Adı Olan Hücreleri Vurgulayın...
- 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!
