Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Rechercher remplacer dans chaîne de caractères

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Daybouk
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
D

Daybouk

Guest
Bonjour,

Je cherche à remplacer des éléments d'une chaîne de caractères (de longueur variable) par d'autres en utilisant le principe de RECHERCHEV.

Je m'explique :
- j'ai des cellules contenant des codes séparés par une virgule
Ex :
3701,3725
0504
0501,0503,0502,0504,0523,0505,0506,0550

- chaque code a un équivalent en lettre (voir onglet "Tab d'équivalence" dans le fichier joint)
Ex :
3701 = SIN
3725 = MAL
0504 = SER
etc.

- je veux remplacer chaque code par son équivalent lettre en les séparant par un tiret et en gardant l'ordre.
Ex du résultat :
3701,3725 => SIN,MAL
0504 => SER
0501,0503,0502,0504,0523,0505,0506,0550 => CRO,BOS,SLO,SER,MON,MCD,ALB,KOS

Je prends les solutions formules Excel ou VBA !

Merci pour votre aide.
 

Pièces jointes

Trier par date Trier par votes
Bonjour
fonction modifiée, elle renvoie #N/A si il reste un chiffre supérieur à zéro dans la chaîne après traitement
Cordialement
Code: 
Function Correspondance_Ident(Valeur_Code As String, Plage_Tab As Range)
Tab_Données = Plage_Tab.Value
For Compteur = LBound(Tab_Données) To UBound(Tab_Données)
    Valeur_Code = Replace(Valeur_Code, Tab_Données(Compteur, 1), Tab_Données(Compteur, 2))
Next Compteur
Correspondance_Ident = Replace(Valeur_Code, ",", "-")
If Val(Correspondance_Ident) > 0 Then Correspondance_Ident = "#N/A"
End Function
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

E
  • Question Question
Microsoft 365 utilisation de la fonction rechercher/remplacer pour ajouter un caractère d'annihilation par ' en amont de chaque contenu de la cellule
Réponses
2
Affichages
572
elgringo123456
E
  • Résolu(e)
Microsoft 365 formules pour remplacer les caractères "st" et "ste" en début de chaine de texte ou dans la chaine si séparés par 1 espace avant et 1 espace après
2 3 4
Réponses
50
Affichages
5 K
Usine à gaz
S
  • Question Question
XL 2016 Rechercher une liste de référence et copier/coller dans un nouveau classeur
Réponses
9
Affichages
1 K
chris
U
  • Question Question
Aide: intégration d'une vérification de similitude de caractères dans une formule
Réponses
8
Affichages
2 K
UnknownUser
U
A
  • Question Question
Recherche d'une cellule dans une liste par présence de chaîne de caractères
2
Réponses
15
Affichages
8 K
Alexxpz
A
M
[REF] Wiki 5 de MichelXld (Formules, Audits de formules, Répertoires, Fichiers)
Réponses
0
Affichages
47 K
MichelXld
M
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…