xlCellTypeVisible

[asilacar]

Merhaba arkadaşlar

Benim sorum şöyle;

Elimde bol kolonlu uzunca bir veri setim var. KOlonlardan bir tanesinde sıfır içeren hücreleri filtre ile gösterip daha sonra sadece görünen (yani o değeri sıfır olan) satırları seçmek ve onları bir başka sheete taşımak istiyorum(bazen silmem de gerekebiliyor tabi)

Bunu başlıktaki kodu kullanarak yapabilir miyim?

 

[hamitcan]

Küçük boyutlu bir dosya ekleyin, daha çabuk cevap bulabilirsiniz

 

[Necdet]

Merhaba,

Basit bir örnek. Sıfırlı hücreleri seçer ve Sayfa2 ye kopyalar.

Sub Kopyala()
    Selection.AutoFilter Field:=2, Criteria1:="0"
    Sheets("Sayfa1").Activate
    ActiveSheet.[COLOR=red][B]UsedRange[/B][/COLOR].Select
    Selection.Copy
    Sheets("Sayfa2").Select
    [A1].Select
    ActiveSheet.Paste
End Sub

 

[asilacar]

Teşekkürler üstad böyle bir özellik olduğundan haberim yoktu hele bir deneyeyim eğer işimi görüyorsa bu özellik üzerinden devam ederim olmadı gene Visible şiarına geri döneriz.

Tekrar çok teşekkür ederim =)