"Tümünü Temizle" Kısayolu

[Nilay Karabasogullari]

Herkese merhabalar,

Excel'de sağ üst kısımda bulunan Temizle > Tümünü Temizle'nin klavyede bir kısayolu var mıdır? Eğer yoksa makro ile atanabilir mi?

 

[Saban Sertkaya]

Klavye kısayolu şöyle kurulabilir.
Ctrl + A tüm hücreleri seç demektir. Ctrl + A yapıldıktan sonra Delete tuşuna basılabilir.

Veya kod istiyorsanız, aşağıdaki kodu bir butona atayınız.

Cells.Clearcontents 'tüm hücrelerin içini temizler
Cells.Delete 'tüm sayfayı (içini) siler

 

[Nilay Karabasogullari]

Saban Bey ilginize teşekkür ederim. Fakat benim söylemek istediğim tam olarak bu değildi. Örneğin ben A5:C9'un içerisindeki her şeyi silmek istiyorum (dolgu, biçim, kenarlıklar dahil). Bu durumda A5:C9'u seçip, üst menüden, mouse ile "Temizle > Tümünü Temizle" seçeneklerini tıklıyorum. Mouse ile tıklamaya gerek kalmadan, bir kısayol (ör: CTRL + Q) atayarak yapmak mümkün müdür?

 

[Zeki Gürsoy]

"auto_open" metodunu bir kez çalıştırdıktan sonra Ctrl + Q ile işlem yapabilirsiniz.

Sub auto_open()
    Application.OnKey "^q", "Clear"
End Sub

Sub Clear()
    Selection.Clear
End Sub

 

[Nilay Karabasogullari]

Teşekkür ederim Zeki Bey