écrire en chiffre des départements et inscription en lettres après validation

[pascal21]

bonjour le forum
dans une colonne j'inscris des départements en lettres grace à une zone de liste
j'aimerais augmenter la rapidité de cette saisie en n'inscrivant que le chiffre des départements
comment grace à une macro transformer ce chiffre en lettres du département
ex: si j'écris 33 en a1 j'aimerais que "gironde" s'inscrive après validation
merci

 

[wilfried_42]

Re : écrire en chiffre des départements et inscription en lettres après validation

bonjour

je ne sais pas comment est definie ta base mais disons qu'elle est en feuille Departement, en colonne A

tu as deux solutions

Formule : Cellule de saisie : A1, affichage A2
en A2 :

=INDIRECT("Departement!A" & A1)

par macro : Sur le nom de la feuille click droit : Visualiser le code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Application.EnableEvents = False
    If Target.Column = 1 Then
        If IsNumeric(Target) Then Target = Sheets("Departement").Range("A" & Target)
    End If
    Application.EnableEvents = True
End Sub

 

[pascal21]

Re : écrire en chiffre des départements et inscription en lettres après validation

bonsoir wilfried_42
je viens d'essayer mais ça ne fonctionne pas
paetite précision ma liste ne contient pas tout les departements français mais seulement ceux qui me concernent soit environ une quinzaine
mais s'il le faut je veux bien rajouter tout les departements dans ma liste pour que ton code fonctionne
j'ai fais un essai avac un fichier vierge j'ai bien renommé la feuille 2 en "departement" mais que neni

 

[marco57]

Re : écrire en chiffre des départements et inscription en lettres après validation

Bonsoir Pascal, Wilfried et toi le Forum,

Un exemple valant mieux qu'un long discours, je te joins un fichier.

Si tu tapes un numéro de département en colonne A de la feuille 2, ce chiffre sera transformé en nom. Les noms sont à définir en feuille "Departements". La liste n'a pas besoin d'être compléte.

A+

Marco

 

[pascal21]

Re : écrire en chiffre des départements et inscription en lettres après validation

bonjour à tous
marco
je te remercie pour ton aide
le problème est que je n'arrive pas à ouvrir ton fichier
peux-tu recommencer
merci
edit: ok c'est bon!!!
merci