Bonsoir,
A l'ouverture de mon classeur Excel cette erreur apparait:
"Erreur 1004: Impossible de définir la propriété FontStyle de la classe Font"
Mon code qui contient "Font" est :
Private Sub ComboBox1_Change()
For i = 2 To 5
With Sheets("Simulation").DrawingObjects("Bouton " & i)
If .Text = ComboBox1.Value Then
.Characters.Font.FontStyle = "Gras"
.Characters.Font.ColorIndex = 9
Else
.Characters.Font.FontStyle = "Normal"
.Characters.Font.ColorIndex = 0
End If
End With
Next
End Sub
Pouvez-vous m'aider à résoudre ce problème?
Je vous remercie,
Mat
A l'ouverture de mon classeur Excel cette erreur apparait:
"Erreur 1004: Impossible de définir la propriété FontStyle de la classe Font"
Mon code qui contient "Font" est :
Private Sub ComboBox1_Change()
For i = 2 To 5
With Sheets("Simulation").DrawingObjects("Bouton " & i)
If .Text = ComboBox1.Value Then
.Characters.Font.FontStyle = "Gras"
.Characters.Font.ColorIndex = 9
Else
.Characters.Font.FontStyle = "Normal"
.Characters.Font.ColorIndex = 0
End If
End With
Next
End Sub
Pouvez-vous m'aider à résoudre ce problème?
Je vous remercie,
Mat