bonjour j'ai ceci dans une cellule 43.20 et le résultat de mon addition donne ceci43 .00 ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Private Sub OptionButton2_Click() '''2 competition
If var = True Then
     Me.OptionButton2.Value = False
      Nouveaux_collegues.Label41.Caption = Format(Sheets("Cotisations").Range("R6").Value, "# ##0.00")
 
     Label45.Caption = Format(Val(Me.Label40.Caption) + Val(Me.Label41.Caption) + Val(Me.Label42.Caption) + Val(Me.Label43.Caption) + Val(Me.Label44.Caption), "# ##0.00")
Else
    Me.OptionButton2.Value = True
     Nouveaux_collegues.Label41.Caption = Format(Sheets("Cotisations").Range("R5").Value, "# ##0.00")
 
    Label45.Caption = Format(Val(Me.Label40.Caption) + Val(Me.Label41.Caption) + Val(Me.Label42.Caption) + Val(Me.Label43.Caption) + Val(Me.Label44.Caption), "# ##0.00")
End If
var = False
End Sub
merci