Componer un objeto con una cadena de texto

[fran321]

Es Visual Basic de Excel 2007.

He rehecho el código para ver si funcionaba en forma de matriz:

Código:

Private Sub cmdActivarTodas_Click()

Dim Contador As Integer, NombreCasilla As String, CB(2) As Object

Contador = 1

For Contador = 1 To 2
    CB(Contador).Value = True
    Contador = Contador + 1
Next Contador

End Sub

pero tampoco funciona, ni declarando como Object ni como Integer