BDD excel rechercher remplacer

Résolu
technibase -  
 technibase -
Bonjour,
Alors sous excel j'ai une colonne x , dans cette colonne je doit remplacer tout les mots A par le chiffre 1 puis tout les mots B par le chiffre 2 .... tout les mot J par le chiffre 11 etc...
Jusqu'a maintenant je faisait un rechercher remplacer sur chaque mot mais rapidement j'ai trouvé ca long.
Je Voudrais en une seule saisi remplacer tout les mot A par 1, B par 2 etc...
Quelle est la possibilité sous excel pour faire cela ?

Merci
Configuration: Mac OS X
Safari 523.12.2

2 réponses

  1. ariel
     
    Bonjour!
    voici ma proposition. Cas où les noms sont dans la colonne A

    sub remplacer()
    '
    '

    '
    a = sheets.count
    for b = 1 to a
    if (not ((range ("A" & b)) = "")) then
    if (range ("A" & b)) = "mot A" then
    (range ("A" & b)) = "1"
    end if
    if (range ("A" & b)) = "mot B" then
    (range ("A" & b)) = "2"
    end if
    if (range ("A" & b)) = "mot C" then
    (range ("A" & b)) = "3"
    end if
    if (range ("A" & b)) = "mot D" then
    (range ("A" & b)) = "4"
    end if
    else
    goto 10
    end if
    next
    10 end sub
    0