Cum se face ca culoarea de fundal a casetei de selectare să fie transparentă în Excel?

În mod normal, atunci când introduceți casete de selectare (Control ActiveX) în celule în Excel, culoarea de fundal a casetei de selectare va acoperi culoarea de umplere a foii de lucru, după cum se arată mai jos. Pentru a afișa întreaga culoare de fundal a foii de lucru, trebuie să schimbați culoarea de fundal a casetei de selectare pentru a fi transparentă. Și acest articol va oferi o metodă VBA pentru a rezolva această problemă.

Faceți culoarea de fundal a casetei de selectare transparentă cu codul VBA

Faceți culoarea de fundal a casetei de selectare transparentă cu codul VBA

Vă rugăm să faceți următoarele pentru a face culoarea de fundal a casetelor de selectare transparente cu codul VBA.

1. În foaia de lucru care conține casetele de selectare pe care doriți să le faceți transparente, apăsați pe Alt + F11 tastele simultan pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastra, faceți clic pe Insera > Module. Apoi copiați și lipiți codul VBA în fereastra Cod.

Cod VBA: faceți culoarea de fundal a casetelor de selectare transparente

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. apasă pe F5 tasta sau faceți clic pe Alerga pentru a rula codul. Apoi, toate casetele de selectare din foaia de lucru curentă devin transparente. Vedeți captura de ecran:

Legate de articole:

• Cum se filtrează datele pe baza casetei de selectare din Excel?
• Cum se creează o listă derulantă cu mai multe casete de selectare în Excel?
• Cum se modifică o valoare sau o culoare specificată a celulei când este bifată caseta de selectare în Excel?
• Cum să evidențiați celula sau rândul cu caseta de selectare în Excel?