XL 2010 Supprimer #Valeur! Function VBA

Scorpio

XLDnaute Impliqué
Bonjour à tous,

Un petit soucis dont je n'arrive pas à régler, en fait, j'ai 2 function dans un module, et en colonne A je saisi le 1 ou 2 ou 3, en colonne B et C s'affiche les données.
Mais lorsque je supprime le 1 ou 2 ou 3 en colonne A, dans les colonne B et C s'affiche #Valeur!
Est-ce qu'un membre pourrais s'il vous plaît m'informer du pourquoi.
Merci et à plus
 

Pièces jointes

  • TEST_VBA.xlsm
    16.7 KB · Affichages: 28

phlaurent55

Nous a quittés en 2020
Repose en paix
Re,

ou alors en modifiant les codes comme ceci:

Code:
Function societe(R As Range)
societe = IIf(R <> "", Application.Choose(R, "Libre", "Papa", "Maman", "DrNicolas"), "")
End Function

Function Ref(R As Range)
' En rapport avec Function societe, si dessus
Ref = IIf(R <> "", Application.Choose(R, "---", "100", "499", "Z 4042"), "")
End Function

à+
Philippe
 

Discussions similaires

Réponses
7
Affichages
903
Réponses
27
Affichages
2 K
Réponses
3
Affichages
943
Compte Supprimé 979
C
Réponses
4
Affichages
665

Statistiques des forums

Discussions
311 733
Messages
2 082 019
Membres
101 872
dernier inscrit
Colin T