secilen hücreye göre sütun ve satırın renklenmesi

[cagın1]

sayın hocalarım ekte örnek dosyamevcuttur örnekleme yaptım

örnek olarak j10 hücresini tıkladığımda satır ve sütun olarak renklenmesini istiyorum veya başka bir hücreyi tekrar tıkladığımda aynı şeyi yapsın mümkünmüdür acaba ?

şimdiden tşk ederim


http://s7.dosya.tc/server3/tjp07n/ornek.xlsx.html

 

[cagın1]

konu günceldir

 

[cagın1]

yardımcı olabilecek bir hocam yokmu acaba ?

 

[byfika]

Merhabalar,
Sayın Korhan AYHAN'nın çalışmasını aşağıdaki linkten inceleyebilirsiniz.

http://www.excel.web.tr/f50/satyr-ve-sutun-renklendirme-t89107.html

İyi çalışmalar.

 

[Haluk]

yardımcı olabilecek bir hocam yokmu acaba ?

İstediğiniz böyle bir şey mi?

.

 

[cagın1]

İstediğiniz böyle bir şey mi?

.

günaydın evet hocam kesinlikle bu dosyaya uygulayabilirseniz minettar kalacagım saygılarımla

 

[Haluk]

Sayfa modülüne aşağıdaki kodları yapıştırın;

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Static OldRange As Range
    On Error Resume Next
    Columns(OldRange.Column).Interior.Color = xlNone
    Rows(OldRange.Row).Interior.Color = xlNone
    Columns(Target.Column).Interior.Color = vbYellow
    Rows(Target.Row).Interior.Color = vbYellow
    Set OldRange = Target
End Sub

 

[cagın1]

çok teşekür ederim hocam istediğim gibi oldu yalnız dosyayı kaydedip açarken en son işaretlediğiniz renk olarak kalıyor ?

 

[Haluk]

Artık idare ediceksiniz .... bunlar fantastik şeyler :mrgreen:

Ben olsam, Excel'i böyle şeyler için yormam ....


.

 

[cagın1]

Artık idare ediceksiniz .... bunlar fantastik şeyler :mrgreen:

Ben olsam, Excel'i böyle şeyler için yormam ....


.

aslında haklısınız emeginize yüreğinize tşk ederim