bold yapmak

[karakayalı]

arkadaşlar, aşağıdaki kod ilgili hücreyi bold yapıyor...c sutununa yazı yazdığımda enter yaptığımda tüm satırın bold olmasını istiyorum..yardımlarınız için şimdiden tşk.ler

Selection.Font.Bold = True
End Sub

 

[meslan]

Merhaba
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [c:c]) Is Nothing Then Exit Sub
Rows(Target.Row).Font.Bold = True
End Sub

 

[karakayalı]

teşekkürler..elinize sağlık