Koşulluk satır silme nasıl yapılır

[hakan332]

Excel Versiyonu

Excel 2016

Excel Sürümü

64 Bit

Excel Dili

Türkçe

selam arkadaşlar exceldeki sayfa1 sekmesindeki a1 hücresindeki sayıdan daha düşük olan sayıyı, sayfa2 deki A sutununda bulunan o hücreden daha düşük olan sayıları sildirmek istiyorum bir türlü yapamadım. makro kullanmak lazım ama çözemedim sorunu lütfen yardımcı olun. mesala sayfa 1 deki sekmeden a1 hücresine 50 yazacağım. excel sayfa 2 deki sekmeden a sütünundaki tüm 50 den düşük olan sayıları otomatik silmesini istiyorum nasıl yapabilirim?

 

Akaryakıt Takip Kodlarda Revize

VBA Veriyi Diğer Sütuna Kopyalama

[Ömer BARAN]

Örnek belge olmadığına ve soru sözel ifadeyle sorulduğuna göre cevap da kod veya örnek belgeyle olamayacak demektir.
Kodlamayı örneğin şöyle yapmayı deneyin:
-- Alana tek satırlık makro koduyla, <50 diye filtre uygulatın,
-- Sonra da görünen hücreleri, ....SpecialCells(xlCellTypeVisible)..... şeklinde hedef göstererek
.... Delete kodu hücreyi sildirebilir, ....ClearContents koduyla hücre içeriklerini temizletebilirsiniz.

 

[ExcelDepo]

Konu başlığı içinde kullandığınız; "lütfen, yardım" vs kelimeler size gelecek olası yardımı hızlandırmaz, hatta daha itici hale getirir.
Başlığınızı düzelttim, bilginiz olsun.

 

[berffink]

selam arkadaşlar exceldeki sayfa1 sekmesindeki a1 hücresindeki sayıdan daha düşük olan sayıyı, sayfa2 deki A sutununda bulunan o hücreden daha düşük olan sayıları sildirmek istiyorum bir türlü yapamadım. makro kullanmak lazım ama çözemedim sorunu lütfen yardımcı olun. mesala sayfa 1 deki sekmeden a1 hücresine 50 yazacağım. excel sayfa 2 deki sekmeden a sütünundaki tüm 50 den düşük olan sayıları otomatik silmesini istiyorum nasıl yapabilirim?

For i = 1 To WorksheetFunction.CountA(Range("A:A"))
If Sayfa2.Cells(i, 1) < Sayfa1.Cells(1, 1) Then
Sayfa2.Cells(i, 1).ClearContents
End If
Next i

bu kodu kullanarak istediğiniz uygulamayı sağlayabilirsiniz