Çözüldü Güncelleme yaparken yazı renk değistirme

[Sebahattin]

Selamun Aleyküm Dostlar Ekte bulunan excel dosyamda userform2de bulunan kısımda sunu yapmak istiyorum Örnek olarak B hissedarını forma girerek kaydediyoruz daha sonra B hissadarını frama3 de bulunan ad soyad kısmında ara ile ılgili kısının bılgilerini texbox getirıyoruz B hissedarın ismını kaldırım olarak değiştirdiğimizde verileri güncelleme yaptiğimizda bu degisiklık hisse sayfasında degiskliği görmek icin kaldırım hissedarının bılgilerin bulundugu satırnın yazı renginin kırmız olarak yapabilirmiyız

 

[Sebahattin]

Sayfamda sayfa koruması olabilir sayfa koruma şifresi (durusu)

 

[Refaz]

Private Sub CommandButton8_Click() içindeki .Cells(bulAdSatir, "B").Value = yeniAdSoyad ' Yeni ad-soyadı yaz alt satırına alttaki kodu ekleyin.

HTML:

İçeriği görebilmek için Giriş yap ya da Üye ol.

 

[Sebahattin]

Private Sub CommandButton8_Click() kırmızı hata
Dim bulAdSatir As Long
Dim mevcutAdSoyad As String
Dim yeniAdSoyad As String
Cells(bulAdSatir, "B").Value = yeniAdSoyad ' Yeni ad-soyadı yaz
.Range("A" & bulAdSatir & ":F" & bulAdSatir).Font.Color = vbRed
yukarıdakı kodu yapıstırdim hata verdi

 

[Refaz]

Private Sub CommandButton8_Click() kırmızı hata
Dim bulAdSatir As Long
Dim mevcutAdSoyad As String
Dim yeniAdSoyad As String
Cells(bulAdSatir, "B").Value = yeniAdSoyad ' Yeni ad-soyadı yaz
.Range("A" & bulAdSatir & ":F" & bulAdSatir).Font.Color = vbRed
yukarıdakı kodu yapıstırdim hata verdi

Sayın hocam bende yazı rengi kırmızı yapmıştı.
Yazdığınız kodu resim olarak atın bakalım.

 

[Refaz]

Cells(bulAdSatir, "B").Value = yeniAdSoyad ' Yeni ad-soyadı yaz
.Range("A" & bulAdSatir & ":F" & bulAdSatir).Font.Color = vbRed

Bunlar zaten dim altına yazılmayacak.Bir daha okuyun mesajımı.
Yani en alttaki kodu dediğim yere ekleyeceksiniz sadece.

 

[Refaz]

Yapamadınız mı?

 

[Sebahattin]

Hocam şu hastanedeyim bakamadim kayinpeder rahatsız olduğu için

 

[Refaz]

Hocam şu hastanedeyim bakamadim kayinpeder rahatsız olduğu için

Geçmiş olsun.
Yapamazsanız resim olarak atarım yerini.Yazarsınız sonucu.

 

[Sebahattin]

Allah razı olsun size olumlu veya olumsuz size dönerim İNŞALLAH

 

[Sebahattin]

Selamun Aleyküm Vermis oldugunuz destek için tesekkur ederim Hakkınızı Helal ediniz.

 

[Refaz]

Aleyküm Selam
Rica ederim,kolay gelsin.