• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Macro ile belirli satırları nasıl silebilirim?

  • Konbuyu başlatan Konbuyu başlatan rza35
  • Başlangıç tarihi Başlangıç tarihi
Katılım
27 Mart 2016
Mesajlar
10
Excel Vers. ve Dili
2016 Türkçe
Macro yardımıyla C sütünda "boş" yazan satırların silinmesini istiyorum. Bununla ilgili visual basic macrosu olabilir mi? C sütünunda sadece boş yazan satırlar silinecek.
 
Buyurun.:cool:
Kod:
Dim sonsat As Long, i As Long
sonsat = Cells(Rows.Count, "C").End(xlUp).Row
For i = sonsat To 1 Step -1
    If Cells(i, "C").Value = "boş" Then
        Rows(i).Delete
    End If
Next i
MsgBox "Silme işlemi bitti" & vbLf & "evrengizlen@hotmail.com"
 
Merhaba.
-- Alt taraftan uygulamayı istediğiniz sayfanın adına fareyle sağ tıklayın ve KOD GÖRÜNTÜLEYİ seçin,
-- Açılan ekranın sağ tarafındaki boş alana aşağıdaki kod'u yapıştırın,
-- Kod'u çalıştırın.
.
Kod:
[FONT="Arial Narrow"]Sub BOŞLARI_SİL_BRN()
    For brn = [C65536].End(3).Row To 1 Step -1
        If Cells(brn, 3) = "[B][COLOR="Blue"]BOŞ[/COLOR][/B]" Then Rows(brn & ":" & brn).Delete Shift:=xlUp
    Next
End Sub[/FONT]
SONRADAN İLAVE NOT: Sayın Orion cevabı göndermiş bile, benimkisi de alternatif olsun artık.
.
 
Kusura bakmayın ama ekleyemedim hata veriyor bende.
Geliştiriciden Visual Basic diyorum, insert module diyip verdiğiniz değeri yazıyorum hata veriyor.

Office 2016 var ondan dolayı olabilir mi ben mi hata yaptım.

Edit: Ömer bey teşekkür ederim sizin verdiğiniz kod çalıştı.

Edit 2: Aynı formüle yanlış veya doğru yazınca olmuyor. Bunun nedeni nedir acaba?

Yardımlarınız için teşekkürler.

Buyurun.:cool:
Kod:
Dim sonsat As Long, i As Long
sonsat = Cells(Rows.Count, "C").End(xlUp).Row
For i = sonsat To 1 Step -1
    If Cells(i, "C").Value = "boş" Then
        Rows(i).Delete
    End If
Next i
MsgBox "Silme işlemi bitti" & vbLf & "evrengizlen@hotmail.com"
 
Son düzenleme:
Yeni konu açmadan buradan sormak istiyorum bir soru daha. Bir hücrenin içi doluysa yanına bir formülü otomatik yazma macrosu olabilir mi?

Misal B1 hücresinde giriş var C1 hücresine istediğim bir formülü otomatik doldurmasını istiyorum.
Yani alt alta B1,B2,B3 doluysa C1,C2,C3 de formül olacak.
 
Yeni konu açmadan buradan sormak istiyorum bir soru daha. Bir hücrenin içi doluysa yanına bir formülü otomatik yazma macrosu olabilir mi?

Misal B1 hücresinde giriş var C1 hücresine istediğim bir formülü otomatik doldurmasını istiyorum.
Yani alt alta B1,B2,B3 doluysa C1,C2,C3 de formül olacak.

Mevcut tablonuz seçiliyken, EKLE menüsünden TABLO'yu seçin, gerisini Ms.Excel'e bırakın.
Artık aşağı doğru yeni veriler eklediğinizde formüller eklenecektir.
 
Geri
Üst