macro changement de tranche

[sri75]

Bonjour , je cherche une macro pointant sur 2 variables a et b qui vérifie quand a n'est plus dans la meme tranche que b.

1 er tranche <300000
2 eme tranche de 300001 à 750000
3 eme tranche de 750001 à 1350000
4 eme sup à 1350000

merci de votre aide

 

[Lord Nelson]

Re : macro changement de tranche

Salut,

Tu peux dans un premier temps créer une fonction Tranche dans un module de code, comme ceci :

Function Tranche(Nombre)
Select Case Nombre
Case Is <= 300000: Tranche = 1
Case Is <= 750000: Tranche = 2
Case Is <= 1350000: Tranche = 3
Case Else: Tranche = 4
End Select
End Function

Ensuite, tu pourras utiliser cette fonction, par exemple :

Dim A As Long, B As Long
A = 1000
B = 1000000
MsgBox Tranche(A)
MsgBox Tranche(B)

Ou alors :

If Tranche(A) <> Tranche(B) Then
...
End If

A+
Horatio

 

[sri75]

Re : macro changement de tranche

ca marche très bien, merci beaucoup, et bon week end

Stephane