otomatik şekil renk değiştirsin

Katılım
2 Aralık 2005
Mesajlar
10
Merhaba, excelde ekte gönderdiğim gibi 50 şekli sıralamak istiyorum. Bu şekiller ard arda gelecek ve tıkladığım şekilin rengi yeşilken ondan sonra gelen şekil sarı renk olcak. Aslında her kutu için ben kodu oluşturdum fakat 50 kutu için 50 farklı kod yazmak istemiyorum. Bunu kısaltmanın bir yolu var mı? Şimdiden yardımlarınız için teşekkürler..
 

Kemal Demir

Özel Üye
Katılım
29 Temmuz 2004
Mesajlar
2,108
Sn.incredible

Ek'teki Örnek Tam İsteginize Cevap vermeyebilir ama Yol Göstrebilir sanırım.
 
Katılım
2 Aralık 2005
Mesajlar
10
Sn. Rakkas yardımlarınız için teşekkür ederim fakat ben daha çok ilk gönderdiğim ekteki gibi exceldeki otomatik şeklin üstüne tıkladığımda onun renginin yeşil bir sonraki otomatik şeklinde sarı olmasını, sarı olan otomatik şekli tıkladığımda da 3.şeklin sarı tıkladığım şeklin yeşil olmasını istiyorum. Bu şekilde 50 tane kutu olduğu için kodda kısaltma yapabilir miyim? Şekillerin adını değiştirip 1,2, yapıp for next döngüsüyle yapmaya çalıştım fakat çalışmadı..
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,057
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Sayfa üzerinde bu tip bir gruplama yapmak kolay değil. Eğer userform üzerinde olsaydı çözüm çok kolay olacaktı. Sayfa üzerinde eğer şekil yerine hücrelere tıklayarak elde edilen bir çözüm uygun olursa bir kod önerebilirim.
 

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,406
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Sayın incredible, ekli dosyayı inceleyiniz...

Aşağıdaki resimde de görüldüğü gibi;

- Şekillerin dolgu rengi "sarı" dır.

- Tıklanan, yani seçilen aktif şekil rengi "açık mavi - turkuvaz" olur.

- Seçilen şekilden bir sonraki şeklin rengi de "kırmızı" olur.

- Diğer şekillerin rengi "sarı" olur.
 

Levent Menteşoğlu

Administrator
Yönetici
Admin
Katılım
13 Ekim 2004
Mesajlar
16,057
Excel Vers. ve Dili
Excel 2010-32 bit-Türkçe
Excel 365 -32 bit-Türkçe
Gerçeten çok güzel bir çözüm, üstadım tebrik ediyorum.
 
Katılım
2 Aralık 2005
Mesajlar
10
Hepinizin ilgi ve alakası için teşekkür ederim. Özellikle Haluk Bey size çok teşekkür ederim. Tam istediğim gibi olmuş, emeğinize sağlık..
 

Haluk

Özel Üye
Katılım
7 Temmuz 2004
Mesajlar
12,406
Excel Vers. ve Dili
64 Bit 2010 - İngilizce
+
Google Sheets
+
JScript
Altın Üyelik Bitiş Tarihi
Sevgili dostum Levent ve sayın incredible,

Teşekkür ederim.
 

Kemal Demir

Özel Üye
Katılım
29 Temmuz 2004
Mesajlar
2,108
Gerçekten Güzel Bir Çalışma.Çok Başarılı.
 
Üst