Mausenin bulunduğu satırın a:v arası renklendirilmesi

[M.ACAR]

çalıştığım bir proğramda daha önceden forumdan aldığım,mause hangi satırda ise satırın renklenmesi ile ilgili bir formül almıştım,şimdi yapmak istediğim ise mause hangi satırda ise o satırın a:v arasının renk değiştirmesidir,mevcut formülü nasıl uygulamam lazım,yardım edermisiniz,lütfen.

 

[dEdE]

Merhaba,
Koddaki

 Target.EntireRow.Interior.ColorIndex = 35

satırını aşağıdaki ile değiştirip dener misiniz?

Range("A" & ActiveCell.Row & ":V" & ActiveCell.Row).Interior.ColorIndex = 35

 

[M.ACAR]

SAYIN:dEdE hücrenin üzerine sol tuş ile işaretlendiğim anda hata veriyor.

 

[dEdE]

Merhaba,
Bu hata benim vediğim kod satırı ile ilgili değil.
Dosyanızda aynı ismi taşıyan iki tane prosedur var. Hata ondan kaynaklanıyor. Hangisi gereksiz ise onu kaldırmalısınız veya iki proceduru birleştirip tek procedure olarak yazmalısınız.

 

[M.ACAR]

Sayın:dEdE Tek procedure yaptığımda sorun kalmadı,teşekkür ederim,

 

[dEdE]

Rica ederim.
İyi çalışmalar.

 

[M.ACAR]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = 0 'Turn off previous use
If Cells(1, 1) = "." Then Exit Sub
Range("B" & ActiveCell.Row & ":Y" & ActiveCell.Row).Interior.ColorIndex = 44
End Sub

kodu ile mause'nin bulunduğu satırın zemin rengi değiştirilebiliyor,şimdi öğrenmek istediğim konu zemin rengini değiştirmiş olduğumuz sütunun yazı boyutu ve fontunu nasıl değiştirebilirim,yardım ederseniz çok sevinirim,herkese iyi çalışmalar