FUSION DE 2 CHAÎNES DE CARACTÈRES SUIVANT UN CRITÈRE SPÉCIFIQUE.
tmcuh
Messages postés
458
Date d'inscription
dimanche 22 décembre 2002
Statut
Membre
Dernière intervention
18 avril 2009
-
12 mars 2003 à 17:49
tmcuh Messages postés 458 Date d'inscription dimanche 22 décembre 2002 Statut Membre Dernière intervention 18 avril 2009 - 12 mars 2003 à 17:49
tmcuh Messages postés 458 Date d'inscription dimanche 22 décembre 2002 Statut Membre Dernière intervention 18 avril 2009 - 12 mars 2003 à 17:49
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/6450-fusion-de-2-chaines-de-caracteres-suivant-un-critere-specifique
https://codes-sources.commentcamarche.net/source/6450-fusion-de-2-chaines-de-caracteres-suivant-un-critere-specifique
12 mars 2003 à 17:49
Function Fusion(quoi, avecquoi, lettredefusion) As String
For i = 1 To Len(quoi)
Fusion Fusion & IIf(Mid(quoi, i, 1) lettredefusion, Mid(avecquoi, i, 1), Mid(quoi, i, 1))
Next i
End Function
Je sais pas pour toi mais je trouve mon code beaucoup plus simple...et de plus il n'y a aucune variable à part pour la boucle si tu veux la mettre.