sayfadaki girilen bilgileri tek bir seferde temzileme

[Cengizkhaan]

gunluk kasa tutulan bir calısma sayfasında hergun bir onceki gunun bilgilerini silerek guncel bilgiler giriliyor.
bu işlemi yani hucre lerin içeriklerini otomatik temizleyebilecegim bir sekil varmıdır arkadaslar.
mesela belirlediğim alandaki hucrelerin içeriğini tek bir butona dokunarak temizlemek yani.bu arada hucrelerdeki formuller kaybolmadan olmalı bu teizlik.

 

[xxcell]

Range("g23") = ""
Range("f21") = ""
Range("a1:a5") = ""

kodunu bir butona atayıp çalıştırın, ilgili hücrelerdeki bilgileri silecektir.

 

[xxcell]

Yada sizin işinizi görecek daha etkili bir yol aklıma geldi.

1. Araçlar | Makro menüsünden Yeni Makro Kaydet Tuşuna basın.
2. Makro Kaydet isimli ufak bir pencere açılacak, Kısıyal Tuşu Ctrl + yazısının yanında ufak bir yer var, oraya "Q" harfini yazıp Tamam'a tıklayın
3. Şu andan itibaren yapacağınız her işlem makro tarafından kayıt edilecek.
4. Sırasıyla silmek istediğiniz tüm hücreleri mouse ile seçip silin.
5. Ekranda Makroya ait ufacık bir pencere var. Kaydı Durdur (Stop şeklindeki tu&#351 tuşuna basıp makroyu sonlandırın.
6. Bundan sonra ctrl + q yaptığınız tüm sayfalarda ilgili hücreleri silecektir.

 

[emrexcel123]

örnek

Sub clean()
Range("a1:b15").ClearContents
End Sub
bu kodu ilgili hücre aralıklarını yazarak reviza ederseniz sorununuz hallolur...

 

[Cengizkhaan]

tesekkurler yardımlarınız için