Bom-dia!
Aqui vai um.

If CheckBox1.Value = True Then Range("A1").Value = 1
If CheckBox1.Value = False Then Range("A1").Value = 0

att,

Francisco

Alan Ruiz,

Bom Dia!

Você pode selecionar um item na ListBox utilizando o código:

    'Seleciona o terceiro item da ListBox1
    ListBox1.Selected(2) = True

Ou desmarcar um ítem utilizando o código:

        'Desmarca o terceiro item da ListBox1
        ListBox1.Selected(2) = False

opa...foi mal. Eu li "CheckBox".

Então, não entendi.

Eu tenho uma listbox pronta já com os itens nela.

Quero que ela funcione da seguinte maneira:

Quando eu seleciono um item dentro dela, ela fica azul.
quando eu clicar nesse item novamente ele é desmarcado, ou seja, não fica mais selecionado.

Mais mesmo assim, já agradeço as respostas anteriores.

Grato