Bonjour à tous,
Voilà, donc j'ai ce code, et je cherche la manière de pouvoir le mettre à la ligne, pour ne pas avoir un code trop long dans la fenêtre.
Par ex: après "En attente" mettre à la ligne
Voici le code:
Option Explicit
Function Nom(R As Range)
Nom = Application.Choose(R, "GV", "AV", "RI", "Payé", "En attente", "Envoyé à RI", "Envoyé à GM", "Attendre Remboursement", "Pas de nouvelle", "Rien")
End Function
Merci et à plus
Voilà, donc j'ai ce code, et je cherche la manière de pouvoir le mettre à la ligne, pour ne pas avoir un code trop long dans la fenêtre.
Par ex: après "En attente" mettre à la ligne
Voici le code:
Option Explicit
Function Nom(R As Range)
Nom = Application.Choose(R, "GV", "AV", "RI", "Payé", "En attente", "Envoyé à RI", "Envoyé à GM", "Attendre Remboursement", "Pas de nouvelle", "Rien")
End Function
Merci et à plus