Çözüldü Sadece A1 hücresinde çift tıklama yapabilme

Yani A1 hücresine çift tıklandığında F2 işlemi yapılmış gibi hücre içerisine girilsin,
1'inci satırdaki diğer hücrelere çift tıklandığında ise, mevcut çift tıklama makroları çalışsın istiyorsunuz öyle mi?

Sayın hocam güzel sordunuz. Örnek dosya hazırladım. Hemen gönderiyorum. Açıklamayı dosyaya da yazdım. İstediğim şöyle. A1’in de B1:M1’in de içine girilmemesini istiyorum.

Sadece A1’e çift tıklayınca sıralama yapsın (kod çalışsın).
Buraya kadar hiç sorun yok.

Fakat B1:M1 aralığına çift tıklayınca koruma iptal oluyor. İptal olmaması lazım.

Cümleleri aynı kriterlere göre kurup açıklama yazmalısınız.

Çift tıklanan hücre;
-- A1 ise .....şu olacak/şu olmayacak
-- B1:M1 aralığında bir hücre ise .....şu olacak/şu olmayacak
-- A1:M1 dışında 1'inci satırdaki bir hücre ise .....şu olacak/şu olmayacak
-- boş bir hücre ise .....şu olacak/şu olmayacak
-- 2 ve sonraki satırlardaki bir hücre ise .....şu olacak/şu olmayacak
gibi yazmalısınız.

-- Mevcut koddaki şu satırı pasif hale getirdiğinizde oluşan işleyişte bir sıkıntı, istemediğiniz bir durum var mıdır?
'If Intersect(Target, Range("A1")) Is Nothing Then Exit Sub

Sayın hocam hepsini birazdan yazacağım. Teşekkürler.

Ömer hocam ayrıntılı olarak yazdım. Anlaşılmayan bir şey olursa izah etmeye hazırım.


Sayın hocam şöyle ki

A1:M1 arasında verilerim var.

İstediğim şunlar

A1 ile M1 arası korumalı olacak. A1 ile M1 arası bir hücre silinmek istendiğinde silinmeyecek.

Mevcut kodlar marifetiyle, çift tıklama ile sıralama özelliği sadece A1 hücresine mahsus olacak. (Tablonun tamamı sıralanacak süphesiz). Yani diğer B1:M1 arası bir hücreye çift tıklamak istediğimizde sıralama özelliği çalışmayacak.

A1:M1 arasında bir hücre silinmek istenirse, silinemeyecek. Korumalı olacak.

A1 ile M1 arasına çift tıklama yaptığımda (F2 yapar gibi) hücre içine girilemeyecek.

B1:M1 arası bir hücre silinemediği gibi, çift tıklama yapıldığı zaman hücre içine girilemeyecek ve koruma bozulmayacak. (Şu anki sorun bu)


2. satırdan itibaren diğer tüm hücrelere veri girilebilecek. Zaten kilitsiz hücreler bunlar, sayfanın koruması bozulmayacak. (Pasif hale geçmeyecek)

A1 İLE M1 arasındaki 1. satırdaki diğer hücrelere de, (N sütunu, O sütunu gibi) sütunlara da veri girersem, N1 ve diğer hücreleri koruyacağım. Ama şu an için A1 ile M1 arasının korumalı olması yetiyor. Çünkü M sütunundan sonraki diğer sütunlar şimdilik boş.

Toparlayacak olursam:
Koruma hiçbir şekilde deaktif hale geçmeyecek
Çift tıklayarak sıralama özelliği sadece A1'e ait olacak.
B1:M1 arası bir hücreye çift tıkladığım zaman sıralama özelliği çalışmayacak.
A1:M1 aralığı silinemeyecek. A1’e çift tıkladığımda içine girilemeyecek.
B1:M1 aralığı silinemediği gibi, çift tıklama yapınca içine girilemeyecek.
2. satırdan itibaren tüm boş hücrelerin tamamına veri girişi yapılabilecek. Ama koruma bozulmayacak.
N1 ve sonrası şimdilik boş, ama daha sonra veri girişi elbet yapacağım.
Yaptığımda da M1 den sonraki diğer 1. satır hücrelerini kilitleyerek koruma altına alacağım.
Tüm tablo sadece A sütununa göre sıralanacak. A1 çalışacak sadece.

Umarım yanlış düşünmüyorum.
İşlem öncesinde A1 hücresinin KİLİT özelliğini etkinleştirin.

A1'e bir kez çift tıkladığınızda ARTAN sıralanırken ikinci çift tıklamada AZALAN şeklinde sıralama yapılır.
Diğer istediğiniz hususları da gerçekleşiyor olması gerekir.

Sayın hocam emeğinize sağlık çok güzel olmuş. Fakat ikinci çift tıklamayla azalan sıralamayı iptal edebilir miyiz.
Sadece artan sıralama kullanıyorum şu an için.

Şöyle;