O
Olic95
Guest
Salut à tous,
Je bidouille dans VBA sous EXCEL 2003 et je bloque sur une CHECKBOX :
Dim CASEACOCHER As CheckBox
Dim NOMFILIALE As String
Private Sub OK_Click()
Windows('Fichier Impression Des Indicateurs par Activite.xls').Visible = True
Sheets('Filiales').Activate
Range('A1').Select
NOMFILIALE = ActiveCell.Value
CASEACOCHER.Name = ActiveCell.Offset(0, 4).Value
If CASEACOCHER.Value = True Then
Sheets('Recap').Activate
Range('B4').Select
ActiveCell.Value = NOMFILIALE
End If
End Sub
En rouge mon problème. Je veux que le nom de ma variable CASEACOCHER.Name prenne la valeur d'une cellule (on va dire TOTO) et ensuite tester si TOTO.Value est 'True' ou 'False'.
J'ai une erreur d'exécution 91 :
Je ne m'en sors pas... help please !
Je bidouille dans VBA sous EXCEL 2003 et je bloque sur une CHECKBOX :
Dim CASEACOCHER As CheckBox
Dim NOMFILIALE As String
Private Sub OK_Click()
Windows('Fichier Impression Des Indicateurs par Activite.xls').Visible = True
Sheets('Filiales').Activate
Range('A1').Select
NOMFILIALE = ActiveCell.Value
CASEACOCHER.Name = ActiveCell.Offset(0, 4).Value
If CASEACOCHER.Value = True Then
Sheets('Recap').Activate
Range('B4').Select
ActiveCell.Value = NOMFILIALE
End If
End Sub
En rouge mon problème. Je veux que le nom de ma variable CASEACOCHER.Name prenne la valeur d'une cellule (on va dire TOTO) et ensuite tester si TOTO.Value est 'True' ou 'False'.
J'ai une erreur d'exécution 91 :
Variable objet ou variable de bloc With non définie
Je ne m'en sors pas... help please !