• DİKKAT

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

satır seçmek

Katılım
1 Haziran 2006
Mesajlar
76
Merhaba arkadaşlar,
Çalışma sayfamda bazı satırları silmem gerekiyor, örnekte gösterdiğim gibi mehmet sütunlarını seçip silemek ama seçerek silmem gerekiyor, murat sütunları ise kalacak, ben bunu ctrl yapıp tek tek maus le seçiyorum ama bu zor oluyor koay bir yol bilen varmı
 
Sn murtili71,

Aşağıdaki kodları deneyin.

Sub Makro1()
For i = 1 To 65536
If Cells(i, 1) = "mehmet" Then Rows(i).Delete
Next
End Sub
 
aRKADAŞLAR İSME TAKILMAYIN BUNLAR FARKLI İSİMLERDE OLA BİLRİ BENİM GAYEM ATIK SATIRLARI KOMPLE KALDIRMAK ÇALIŞMAMADA 1 SATIR DEĞER BİR SATIR ATIK BU ŞEKİLDE DEVAM EDİYOR YANİ ARADIĞIM KISA YOL TEŞEKKÜR EDRİM
 
Alternatif : Silinecek veriyi B1 hücresine yazılıp, farklı veriler silinebilir.

Sub Düğme1_Tıklat()
For a = 1 To 1000
If Cells(a, 1) = [B1] Then Cells(a, 1) = ""
Next
[B1]=""
End Sub
 
Sayın :murtili71,

Sorunuz tam olarak net değil. İlk sorunuzda mehmet olan sutunları (!?) silmek istiyorsunuz.Sonradan 1 değer, 1 atık (!?) veriler ortaya çıktı.
 
Bu kodu bir deneyiniz.

Sub Düğme1_Tıklat()
For a = 1 To 1000
If Cells(a, 1) = [B1] Then Rows(a).Delete
Next
[B1] = ""
End Sub

Not : Silinecek verileri B1 hücresine yazınız.
 
Sayın :murtili71,

Sorunuz tam olarak net değil. İlk sorunuzda mehmet olan sutunları (!?) silmek istiyorsunuz.Sonradan 1 değer, 1 atık (!?) veriler ortaya çıktı.
Sayın ripek çok haklısınız, anlatamadım, excel kelime doğarcığım kısıtlı olduğu için, kusuruma bakmayın tüm site üyelerinden özür dilerim.
vakit ayırdığınız için teşekkür ederim
 
Sayın murtili71,

Önemli değil.Biz size çözüm bulmaya çalışıyoruz.

Sizin yapmak istediğinizi tam anlarsak beraber doğru çözümü bulmuş oluruz.

Tekrar başa dönmek gerekirse;

1-Siz belli satırları seçip bunları silmek istiyorsunuz.

2-Bunu kısayol ile yapmak istiyorsunuz.

Satırları seçmek için makroda olsa, kısayol da olsa muhakkak bir kriterin olması gerekiyor.
Siz hangi kriterlere göre satırların silinmesini istiyorsunuz?
 
Geri
Üst