Makro ile bir hücreye tıklayınca istediğim bir satırın genişliğini genişletip sıfırlamak

[u.L.a.s]

Merhabalar

O sütunu üstünde Örneğin O2 hücresine çift tıklayınca 19. satırın genişliğini 15 yapmak istiyorum. P2 hücresine çift tıklayınca 19. Satırın genişliğini 0 yapmak istiyorum.
bunu butona atamak istemiyorum direk hücreye çift tıklama işlemi ile yapmak istiyorum. bilgi ve yardımlarınızı rica ederim.

Bu sorunun devamı olarak ise O3 e çift tıklayınca 20. satırın genişliğini 15 yapmak, P3 e çift tıklayınca 20.satırın genişliğini sıfır yapmak istiyorum.

Hani ilk sorudaki kod içeriğine göre eğer bir alt satırıda işin içine katarsak daha kısa bir kod yazımı olur mu bilmiyorum.

Teşekkürler

 

[Korhan Ayhan]

O2-O3... bu şekilde devam edecek mi? Yoksa talebiniz sadece bu iki hücre ile sınırlı mı?