Comment remplacer tous les caractères d'un tableau par d'autres caractères
Sais-tu cela? Les données que vous recevez des partenaires commerciaux ou après l'importation des données contiennent des caractères incorrects. Il peut arriver qu'un point décimal apparaisse partout où un point décimal est nécessaire. Ou il peut arriver que des barres obliques apparaissent entre les chiffres individuels.
Vous pouvez utiliser la commande REPLACE pour rechercher ces caractères et les remplacer par d'autres caractères. Mais cela demande beaucoup d'efforts si vous voulez faire ce processus plus souvent. Vous gagnez du temps en effectuant la tâche à l'aide d'une macro. Vous pouvez rappeler cette macro rapidement et facilement dans la même situation à l'avenir.
Pour inclure la macro dans un classeur vide, ouvrez un nouveau classeur dans toutes les versions d'Excel à l'aide de la combinaison de touches CTRL N. Appuyez ensuite sur la combinaison de touches ALT F11 pour afficher l'éditeur VBA. Là, sélectionnez la commande INSERER - MODULE. Saisissez ensuite la macro suivante :
Échanger les sous-caractères ()
En cas d'erreur Reprendre ensuite
Dim Cell As Range
Recherche faible en tant que chaîne
Dim Remplacer par As String
SearchFor = "."
Remplacer par = ","
Pour chaque cellule dans ActiveSheet.UsedRange
Cell.Value = Application.Substitute (Cell.Value, FindFor, ReplaceBy)
Cellule suivante
En cas d'erreur GoTo 0
Fin du sous-marin
La macro remplace le point décimal par un point décimal dans toutes les cellules utilisées dans la feuille de calcul active. Pour appeler la macro, activez la feuille de calcul souhaitée, appuyez sur la combinaison de touches ALT F8 et sélectionnez la macro ÉCHANGE DE CARACTÈRES.
Pour contrôler quel contenu est recherché et remplacé, ajustez les deux variables SUCHENNACH et REPLACE BY dans la macro.
