Excel'de her diğer satıra aynı metni nasıl ekleyebilirim?
Bu makalede, Excel’de her diğer satıra aynı metni nasıl ekleyeceğinizi adım adım gösteriyoruz. Daha fazla ayrıntı için okumaya devam edin!
VBA koduyla her bir satıra aynı metni ekleme
Kutools for Excel ile her diğer satıra aynı metni ekleme
VBA koduyla her bir satıra aynı metni ekleme
Aşağıdaki ekran görüntüsünde gösterildiği gibi, belirli bir aralıkta her diğer satıra sırasıyla "Name", "Data" ve "Score" metnini eklemek istediğinizi varsayalım. Lütfen aşağıdaki VBA kodunu deneyin.
1. Çalışma sayfasında, Alt+F11 tuşlarına aynı anda basarak Microsoft Visual Basic for Applications penceresini açın.
2. Ekle > Modül seçeneğine tıklayın. Ekran görüntüsüne bakın:
3. Aşağıdaki VBA kodunu kopyalayın ve Kod Düzenleyicisi’ne yapıştırın.
VBA kodu: Excel'de her bir satıra aynı metni ekleme
Sub inserttexteveryonerow()
Dim Last As Integer
Dim emptyRow As Integer
Last = Range("A" & Rows.Count).End(xlUp).Row
For emptyRow = Last To 2 Step - 1
If Not Cells(emptyRow, 1).Value = "" Then
Rows(emptyRow).Resize(1).Insert
Range(Cells(emptyRow, "A"), Cells(emptyRow, "C")).Value = Array("Name", "Date", "Sore")
End If
Next emptyRow
End SubNotlar: Yukarıdaki kodda:
Kutools for Excel ile her diğer satıra aynı metni ekleme
Yukarıdaki kodla yalnızca her bir satıra metin ekleyebilirsiniz. Peki ya Excel'de her n satıra bir metin eklemek isterseniz? Bu bölümde size Başlık Satırları Ekle yardımcı programını tanıtacağız—Kutools for Excel sayesinde her n'inci satıra metin eklemek artık çok kolay!
1. Bu yardımcı programı etkinleştirmek için Kutools > Ekle > Başlık Satırları Ekle seçeneğine tıklayın.
2. Başlık Satırları Ekleiletişim kutusunda şunları yapmanız gerekir:
Artık belirtilen metin, Aralık seçimi içinde her n satırda bir eklenmiştir.
Kutools for Excel– Excel'i, işinizi daha hızlı ve kolay hale getiren 300 temel araçla güçlendirin ve daha akıllı veri işleme ile üretkenlik için yapay zeka özelliklerinden yararlanın.Hemen Edinin
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