Excel içindeki alt sayfa isimlerinin rengini degiştirmek

[erdinc_1982]

İyi günler arkadaşlar,

Öncelikle arakadaşlar yapmak istedigim olay bir excell dosyası içinde sertifika programı hazırlamak istiyorum.Sertifika için ana bilgileri ilk sayfaya giriyorum ve diger sayfalar burdan otomatik alıyor.Sertifika çeşidi çok oldugu için ilk ana sayfaya hangi sertifikaları verdigimi anlamak için sertifika isimlerini ve yanlarına onay kutusu koydum.Burda amacım onay kutusuna tıkladıgım zaman o onay kutusuna hangi sertifika yazılı ise o sertifikaya ait çalışma sayfasının alttaki sayfa isminin kırmızı olamsını istiyorum.Bu konuyu buraya açmamın nedeni çalışma sayfası ismine sag tıkladıgımda kod görüntüleden makro ve VBA çıktı.Bu işleminde burdan olacagını düşündüm.Ayrıca yapmak istedigim olayı daha rahat anlamanız için dosyayı eekte sundum.Bana bu konuda yardımcı olursanız çok sevinirim.

Yardımınız için şimdiden teşekkür ederim.

Saygılar

 

[hımmmmmmmm]

slm

Sheets("Sayfa1").Tab.ColorIndex = 43 'aÇIK YEŞİL
Sheets("Sayfa1").Tab.ColorIndex = 3 'kIRMIZI
Sheets("Sayfa1").Tab.ColorIndex = 14 'yEŞİL
Sheets("Sayfa1").Tab.ColorIndex = 5 'mAVİ
Sheets("Sayfa1").Tab.ColorIndex = 44 'tURUNCU
Sheets("Sayfa1").Tab.ColorIndex = 9 'kİREMİT