Hücre içindeki veriyi gizleyebilir miyiz?

[Elantra]

Merhaba,

Buton yardımı ile bir hücredeki veriyi gizleyip tekrar gösterebilir miyiz acaba? veya hücre içerisindeki yazıyı beyaz hale getirip tekrar renkli hale getirerek butona tıklayarak gizle/göster yapabilir miyiz?

 

[hasankardas]

Merhaba Sayfa1 de A1 hücresine göre beyaz renk ve siyah renk yapıyor

Sub Düğme2_Tıkla()

Dim ws As Worksheet

Set ws = ThisWorkbook.Sheets("Sayfa1")

If ws.Range("A1").Font.Color = RGB(255, 255, 255) Then

ws.Range("A1").Font.Color = RGB(0, 0, 0)

Else

ws.Range("A1").Font.Color = RGB(255, 255, 255)

End If

End Sub

 

[Elantra]

Hasan Bey,

Çok teşekkür ederim, zahmet verdim.

 

[hasankardas]

Hasan Bey,

Çok teşekkür ederim, zahmet verdim.

Rica ederim.Estğfirullan ne demek

 

[Trilenium]

Alternatif olarak o hücreyi seçip ;;; yazarsanız da gizlemiş gibi olursunuz