textbox'ta kalın olan yazının hücrede de kalın olması için..

[takoo]

merhaba değerli hocalar.textbox'taki yazının biçimini kalın olarak ayarladım.bu textbox controlsource ile bir hücreye bağlı.ve bu hücredeki bilgi, diğer sayfalarda,hücrelerde başka metinlerle "birleştirilmiş" vaziyette.şimdi bu bilginin geçtiği her yerdeki biçimlendirmesinin kalın olması gerekiyor.bu "kalın" biçimlendirmesini tek bir (ana) yerden yapabilir miyiz?

 

[Orion1]

Merhaba.
Aşağıdak kodlar size bir fikir verir sanırım.

Private Sub CommandButton1_Click()
If TextBox1.Font.Bold = True Then
    Range("A1").Font.Bold = True
    Range("A1").Value = TextBox1.Value
End If
End Sub

 

[Orion1]

Kodları şu şekilde yapmak dağa doğru olacak.

Range("A1").Font.Bold = TextBox1.Font.Bold
    Range("A1").Value = TextBox1.Value

 

[takoo]

çok teşekkür ederim ,sağolun , iyi çalışmalar

 

[Orion1]

Rica ederim.
İyi çalışmalar.