CheckBox ile üstü çizili yazı

[sinnernekolens]

İyi akşamlar, CheckBox işaretli olunca A1 hücresinde yazının üstü çizili, işareti kaldırınca normale dönecek şekilde nasıl yapabiliriz.

 

[Ömer BARAN]

Merhaba.

Private Sub CheckBox1_Click()
    [A1].Font.Strikethrough = CheckBox1
End Sub

 

[sinnernekolens]

Ömer bey, Teşekkür ederim.

 

[Ömer BARAN]

Ömer bey, Teşekkür ederim.

Kolay gelsin.
.