Eduardo, li e reli sua rotina e sinceramente não compreendi, o ideal seria anexar um modelo compactado para que possa analisar melhor, ou dar uma pincelada nesta sua explicação.

Por hora o que dá para dizer, é que está referenciando errado os Controles CheckBox, coloque as rotinas abaixo em seu formulário, crie 3 CommandButtons com os Nomes CommandButton1, CommandButton2 e CommandButton3, depois abra o formulario e clique nos mesmos, assim será mais fácil sua compreensão :

Lembrando que os CheckBox(s) nas rotinas abaixo estão com os nomes Padrão (CheckBox1, 2, 3, ...)

Private Sub CommandButton1_Click()
    Dim ctrl As MSForms.Control
  
    'Define Valor TRUE para todos os CheckBox no Formulário
    For Each ctrl In Me.Controls
        If TypeOf ctrl Is MSForms.CheckBox Then
            ctrl.Object.Value = True
        End If
    Next

End Sub

Private Sub CommandButton2_Click()
    Dim ctrl As MSForms.Control
    
    'Exibe o Nome de Todos os CheckBox
    For Each ctrl In Me.Controls
        If TypeOf ctrl Is MSForms.CheckBox Then
            MsgBox ctrl.Name
        End If
    Next

End Sub

Private Sub CommandButton3_Click()
    Dim ctrl As MSForms.Control
        
    'Define o Valor TRUE somente para o CheckBox
    'de nome CheckBox1
    For Each ctrl In Me.Controls
        If ctrl.Name = "CheckBox1" Then
            ctrl.Object.Value = True
        End If
    Next

End Sub

[]s

Deixa eu tentar me expressar de outra maneira.

Eu tenho um formulário com mais de 100 checkbox.
eu preciso de um código que:

1º. saiba quais estão selecionados
2º. envie o caption do que está selecionado para uma textbox.

"minha dúvida toda é como fazer com que "ao pressionar o botão" o textbox receba todos os captions de todos os checkbox's selecionados.

consegui resolver com o código do botão 1 enviado por vc. obrigado

Private Sub CommandButton2_Click()
Dim ctrl As MSForms.Control
         If Me.ComboBox1.Value <> "Selecione a OS e pressione inserir" And Me.ComboBox1.Value <> "Selecione a proxima OS" Then ''verifica se foi selecionado alguma os
            texto = Me.ComboBox1.Value
            Me.TextBox1.Value = texto + ", " + Me.TextBox1.Value ''inclui a os selecionada + a existente na textbox
            Me.ComboBox1.Value = "Selecione a proxima OS"
         End If
                     'Define Valor TRUE para todos os CheckBox no Formulário
                For Each ctrl In Me.Controls
                  
                  If TypeOf ctrl Is MSForms.CheckBox And ctrl.Object.Value = True Then
                     
                     Me.TextBox1.Value = ctrl.Object.Caption + ", " + Me.TextBox1.Value ''inclui a os selecionada + a existente na textbox
                                  
                  End If
                Next
                                       
             
End Sub

Tópico Resolvido!
Caso o autor do tópico necessite, o mesmo será reaberto, para isso deverá entrar em contato com a moderação solicitando o desbloqueio.