XL 2013 Variable prenant un nom de fichier

Bonjour,

j'essaie de faire une macro en nommant une variable "box" qui doit correspondre à un fichier.
Le but c'est d'ouvrir une userform et de choisir le fichier à imprimer.

Voici ma macro :

Private Sub CommandButton1_Click()

Dim box As String

For I = 1 To 2
If Me.Controls("CheckBox" & I).Value = True Then
box ="Checkbox" & I.Value & ".xlsm"
Workbooks.Open Filename:="C:\DLB\Catalogues\box"
Windows("box").Activate

Sheets("CAT").Select

Or il ne reconnait pas ma variable box

Pouvez-vous m'aider sur ce sujet, pour trouver la bonne synthaxe ???

Merci