Salut le forum,
Je me permets de rouvrir un nouveau post pour demander de l'aide sur le problème suivant:
Private Sub CommandButton1_Click()
Dim choix As Integer
If OptionButton1 = True Then choix = 1
If OptionButton2 = True Then choix = 2
Select Case choix
Case 1
With Sheets(1)
.Range("e29") = "bpe"
.Range("i43") = 0
.Range("i50") = 0
.Range("i55") = 0
.Range("i64") = 0
.Range("i69") = 0
.Range("i78") = 0
.Range("i83") = 0
.Range("i92") = 0
.Range("i101") = 0
.Range("i109") = 0
End With
Case 2
With Sheets(1)
.Range("e29") = "centrale"
.Range("i42") = 0
.Range("i49") = 0
.Range("i54") = 0
.Range("i63") = 0
.Range("i68") = 0
.Range("i77") = 0
.Range("i82") = 0
.Range("i91") = 0
.Range("i100") = 0
.Range("i108") = 0
End With
Au départ, j'ai des formules dans i43,...Lorsque je lance ma procédure, si je clique sur l'optionbutton1, un 0 apparait dans i43, effaçant du coup ma formule. Si je relance ma procédure, et que je clique sur optionbutton2, le 0 restera dans i43 du fait de la première manoeuvre.
Je voudrais 'réinitialiser' le tableau Excel.
Merci pour votre aide,
Alex