Comment convertir des données en nombre ou en texte sur Excel? Les fonctions N() et T() Comment créer une référence automatiquement sur Excel? La fonction DECALER() Comment extraire les plus petites et plus grandes valeurs avec Excel? Les fonctions () et () Comment mettre en place une référence dynamique? La fonction INDIRECT() d'Excel Comment calculer le PGCD et le PPCM (« Plus Grand Commun Diviseur » et « Plus Petit Commun Multiple ») sur Excel? Comment utiliser la fonction SOMMEPROD d'Excel Comment nettoyer une chaîne de caractères - Supprimer les espaces indésirables et les caractères illisibles sur Excel? Comment compter le nombre de feuilles, de lignes ou de colonnes Excel? Comment extraire des parties de texte avec les fonctions DROITE() - GAUCHE() - STXT() d'Excel
Avec le code ci-dessous cela fonctionne mais à chaque fois que je l'exécute il m'enlève de nouveau un caractère. 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 Dim cell As Range Dim datarange Set datarange = Sheets ( "liste transferts") ( "D:D") Columns ( "D:D") place What:= "GL00X", Replacement:= "ARPEGE\X", LookAt:=xlPart, _ SearchOrder:=xlByRows, MatchCase:= False, SearchFormat:= False, _ ReplaceFormat:= False place What:= "GL00", Replacement:= "ARPEGE\A", LookAt:=xlPart, _ For Each cell In datarange If Left$ (, 8) = "ARPEGE\A" Then cell = Left (, Len () - 1) End If Next Est -il possible de mettre le même nombrer de caractère pour toutes les valeurs de la colonne D soit 14 caractères? Cela évitera de spécifier de faire le changement seulement sur les valeurs commençant pas "ARPEGE\A". Merci de votre aide 19/08/2013, 20h50 #2 1 2 3 4 5 6 7 8 Il fait exactement ce que tu lui dis de faire. Il faudrait que tu trouves ou ajoute le moyen de tester si ton texte a déjà été "esquinté" et de sauter par dessus la cellule en cause.
Supprimer toutes les espaces d'une cellule Maintenant pour supprimer toutes les espaces d'une cellule et non pas seulement celles répétées, nous ne pourrons pas utiliser la fonction SUPPRESPACE (), ce qui aurait pour but de conserver une espace simple à l'intérieur de chaque texte. Pour cela, nous allons devoir utiliser une technique que nous avons déjà utilisée dans un précédent tutoriel qui permet de supprimer un caractère donné dans une chaîne de caractère. Cette technique repose tout simplement sur la fonction SUBSTITUE () que nous venons tout juste d'utiliser dans la partie précédente, et dans laquelle nous allons remplacer les espaces par des chaînes de caractères vides: =SUBSTITUE(A12;" ";"") 3. Supprimer les caractères illisibles Dans le cadre de l'importation d'un fichier de données généré par une application tierce, il peut également arriver que celui-ci génère des caractères spéciaux, qui seront illisibles et non inexploitables en tant que tels. Pour les supprimer rapidement, nous pouvons utiliser la fonction EPURAGE (): =EPURAGE(texte) Ici encore, l'argument texte correspond au texte que nous souhaitons retraiter, afin d'y retirer tous les caractères illisibles.
Vos réponses TMQA Le 10/08/2006 à 16:24 # 3827331 Bonjour David, Pour supprimer les x caractères de gauche (de la cellule A1): =droite(A1;x) ou =right(A1;x) Pour supprimer les x caractères de droite... =gauche... =left... Au revoir.
=EPURAGE(A13) La fonction, EPURAGE() permet d'automatiser la suppression des principaux caractères illisibles (les 32 premiers de la table ASCII). Mais il existe encore des caractères illisibles contenus hors de cette plage (notamment les caractères 127, 129, 141, 143, 144, 157 et 160 de cette même plage ASCII) et qui ne seront donc pas traités par la fonction EPURAGE (). Pour cela, nous allons devoir utiliser une fois de plus la fonction SUBSTITUE () pour nous débarrasser de ces caractères: =SUBSTITUE(A14;"";"") Ici, pour obtenir la valeur de l'argument ancien_texte, nous avons simplement effectué un copier-coller du caractère concerné, que nous avons encadré par des guillemets. Une autre méthode qui permet de supprimer rapidement tous les caractères non voulus va consister à utiliser la fenêtre de remplacement d'Excel: Pour commencer, nous sélectionnons le caractère à supprimer dans la cellule Ensuite, nous lançons la fenêtre de remplacement d'Excel (menu Accueil > Rechercher et sélectionner > Remplacer) ou plus rapidement encore en utilisant le raccourci clavier: [Ctrl]+[H] Puis nous venons effectuer un collage du caractère dans la zone Rechercher, et nous laissons la zone « Remplacer par » vide Et pour finir, nous cliquons sur le bouton « Remplacer tout »: 4.
Pour illustrer le fonctionnement de la fonction SUPPRESPACE (), nous disposons d'une liste des noms et prénoms du personnel d'une entreprise: Comme nous pouvons le constater, de nombreuses espaces se sont immiscées, au début, au milieu ou encore à la fin des éléments de cette liste. Pour exploiter cette liste, nous allons donc utiliser la fonction SUPPRESPACE (): =SUPPRESPACE(A7) Nous pouvons contrôler que toutes les espaces ont bien été supprimées, y compris ceux se trouvant en bout de cellule, en sélectionnant l'une des cellules, puis en cliquant sur [F2] afin de nous placer à l'intérieur de la formule et enfin en appuyant sur la touche [F9] pour obtenir directement la valeur de la formule: Nous pouvons alors constater qu'il n'y a pas d'espace à la toute fin de la cellule. Attention toutefois, il faut savoir que la fonction SUPPRESPACE () va supprimer automatiquement les espaces répétées, mais uniquement les espaces classiques.