Üstü Çizili Metin

[nafis]

Merhaba,,

Google de bir sitede buldum excel sayfasında koşula göre üstü çizili metin biçimi yapılıyor. Bunun aynısını user formda yapılabilir mi?

http://s3.dosya.tc/server10/4pl36b/Ustu_cizili_yazi_bicimi.zip.html

https://drive.google.com/file/d/0B2XC6vNifgPrT1g2bHNsVmVSWk0/view?usp=sharing

 

[Erdem Akdemir]

Merhaba,

Google drive yükleyerek indirme linkini paylaşabilir misiniz.

 

[nafis]

Sn. Kuvari, google drive linkini 1. mesaja ekledim.

 

[Erdem Akdemir]

Userformda hangi nesnede çizilmesini istiyorsunuz.

 

[nafis]

Cexbox işaretli ise yanıdaki texbox dolu ise çizsin. Excel sayfasındaki olayın aynısı user formda olabilirmi.

 

[Erdem Akdemir]

Deneyebilir misiniz.

Private Sub CheckBox1_Click()
If CheckBox1.Value = True And TextBox1.Value <> "" Then
   
   TextBox1.Font.Strikethrough = True
   
   Else
      TextBox1.Font.Strikethrough = False

End If
End Sub

 

[nafis]

Tamam sn.kuvari çalışıyor, elinize sağlık. Teşekkürederim.
Saygılarımla.