Hur gör jag bakgrundsfärgen för kryssrutan transparent i Excel?

Normalt när kryssrutorna (ActiveX Control) infogas i celler i Excel täcker kryssrutans bakgrundsfärg fyllningsfärgen på kalkylbladet enligt skärmdump nedan. För att visa hela bakgrundsfärgen på kalkylbladet måste du ändra kryssrutans bakgrundsfärg så att den blir transparent. Och den här artikeln ger en VBA-metod för att lösa detta problem.

Gör bakgrundsfärg i kryssrutan transparent med VBA-kod

Gör bakgrundsfärg i kryssrutan transparent med VBA-kod

Gör så här för att göra kryssrutornas bakgrundsfärg transparent med VBA-kod.

1. I kalkylbladet som innehåller kryssrutorna du vill göra genomskinliga, tryck på andra + F11 samtidigt för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer klicka på fönstret Insert > Modulerna. Kopiera och klistra sedan in VBA-kod i kodfönstret.

VBA-kod: Gör kryssrutornas bakgrundsfärg transparent

Sub CheckBoxTransparent()
    Dim xOleChk As OLEObject
    Application.ScreenUpdating = False
    For Each xOleChk In ActiveSheet.OLEObjects
        If TypeName(xOleChk.Object) = "CheckBox" Then
            xOleChk.Object.BackStyle = fmBackStyleTransparent
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. tryck på F5 eller klicka på Körning för att köra koden. Då blir alla kryssrutor i det aktuella kalkylbladet transparenta. Se skärmdump:

Relaterade artiklar:

• Hur filtrerar jag data baserat på kryssrutan i Excel?
• Hur skapar jag en listruta med flera kryssrutor i Excel?
• Hur ändrar jag ett specificerat cellvärde eller färg när kryssrutan är markerad i Excel?
• Hur markerar jag cell eller rad med kryssrutan i Excel?