Lancement d'une macro selon la valeur d'une cellule

Bonjour,

J'ai une liste de conseillers

J'utilise la formule NBVAL pour savoir combien j'ai de conseillers dans une activité

Est il possible d'écrire une macro qui lancerai une autre macro selon la valeur que j'obtiens avec la formule NBVAL

Dans l'exemple joint, j'ai 5 conseillers et la macro lancerai la macro5

Merci pour votre aide

Cordialement

Philmaure

Re,

Bon j'ai fait le code suivant et cela fonctionne

Sub test()

Dim ws As Worksheet
Set ws = ThisWorkbook.Sheets("Trigramme à suivre")

' Vérification que la cellule contient bien un nombre
If IsNumeric(ws.Range("A14").Value) Then
' Comparaison avec 1
If ws.Range("A14").Value = 1 Then
Call Une_ligne
Else
If ws.Range("A14").Value = 2 Then
Call Deux_lignes
Else
If ws.Range("A14").Value = 3 Then
Call Trois_lignes

End If

End If
End If
End If
End Sub

Bonne soirée

Philmaure