Soru Hücre renklendirme

Katılım
30 Haziran 2022
Mesajlar
48
Excel Vers. ve Dili
Excel 2016
Altın Üyelik Bitiş Tarihi
28-07-2023
Merhaba , aşağıdaki kodla bir hücrenin içerisindeki karekterleri kalın yapabiliyorum. Benim istediğim şey ise bir 3 hücrenin içeriğini başka bir hücreye topladığım zaman (bunlar A1,a2,A3 olsun) a2 nin istediğim renkte olması. Nasıl yazabilirim? Bir örneği var mı ?

Kod:
With Sheets("Tutanak").Range("K157, K127, K185, K216, K630")

 .Font.Bold = False

  .Value = .Value

  .Characters(1, 3).Font.Bold = True

   End With
 

hamitcan

Uzman
Uzman
Katılım
1 Temmuz 2004
Mesajlar
7,712
Excel Vers. ve Dili
Excel 2019 Türkçe
Bu şekilde dener misiniz ?
Kod:
Private Sub Worksheet_Calculate()
    Renk
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
   Renk
End Sub
Sub Renk()
 Cells.Font.ColorIndex = xlAutomatic
    Cells.SpecialCells(xlCellTypeFormulas, 23).Select
    Selection.Font.Color = vbRed
End Sub
 
Katılım
30 Haziran 2022
Mesajlar
48
Excel Vers. ve Dili
Excel 2016
Altın Üyelik Bitiş Tarihi
28-07-2023
Hamitcan bey kod hücrenin tamamını kırmızı yapıyor . Benim istediğim şey hücrenin içerisinde ki =BİRLEŞTİR(B3;D3;F3) formülündeki D3 ün kırmızı olması diğerleri aynı renklerinde kalacak.
 
Katılım
30 Haziran 2022
Mesajlar
48
Excel Vers. ve Dili
Excel 2016
Altın Üyelik Bitiş Tarihi
28-07-2023
Sorunuzu burada yanıtlamıştım.

Korhan hocam ben sizin mesajınıza baktığımda sadece kodla yapılabilir yazıyordu . Şimdi gördüm kodu. Sağ olun. Deneyeceğim hemen.
 
Üst