[Résolu] Soustraire 2 variables

[DonBeuBeu]

Coucou!

Voilà le truc, je cherche à exécuter une opération de soustraction entre 2 variables et que le résultat de cette soustraction amène une action spécifique:

Dim plage As Range
Set plage = Range("E33:I33")
Dim mini As Byte
Dim maxi As Byte

mini = Application.WorksheetFunction.min(plage)
maxi = Application.WorksheetFunction.max(plage)

Range("E35") = mini
Range("F35") = maxi

If maxi - mini = "4" Then
Range("H35") = "4 semaines"

ElseIf maxi - mini = "5" Then
Range("H35") = "5 semaines"

Else: Range("H35") = "Pas possible"

C'est un petit code de test, j'extrait les valeurs maxi et mini d'une plage de cellule, puis je soustrait ces 2 valeurs et en fonctions du résultat 3 possibilités... En l'état actuel sa bloque sur le premier If, je vois pas trop quoi faire...

Merci d'avance, bon après-midi à tous!

 

[Pierrot93]

Re : [VBA] Soustraire 2 variables

Bonjour,

enlève peut être les guillemets :

If maxi - mini = 4 Then

bon après midi
@+

 

[DonBeuBeu]

Re : [VBA] Soustraire 2 variables

Quel idiot je l'avais fait mais je me suis planté dans le résultat de la soustraction x)

Merci à toi, bon aprèm!