Accéder au contenu principal

Comment supprimer rapidement les tirets des cellules dans Excel ?

Author: Xiaoyang Last Modified: 2025-05-27
remove dashes from cells

Supposons qu'il y ait une liste de codes postaux ou de longs numéros ISBN dans les cellules de votre feuille de calcul, et que ces longs numéros contiennent des tirets. Pour une raison quelconque, vous devez éliminer les tirets entre les chiffres (comme le montrent les captures d'écran ci-dessous). Existe-t-il des moyens rapides de supprimer ces tirets entre les nombres dans Excel ?

Supprimer les tirets des cellules avec une formule
Supprimer facilement les tirets des cellules avec Kutools pour Excel

Supprimer les tirets des cellules avec du code VBA


Supprimer les tirets des cellules avec une formule

Avec cette fonction SUBSTITUE, les nombres seront convertis en valeurs texte, donc lorsque vous supprimez les tirets, ni le zéro de début ne sera supprimé ni les nombres ne deviendront une notation scientifique. Veuillez procéder comme suit :

1. Dans une cellule vide adjacente, C1 par exemple, saisissez cette formule : =SUBSTITUE(A1,"-",""), voir capture d'écran :

Remove dashes from cells with a formula

2. Appuyez sur la touche Entrée, puis sélectionnez la cellule C1, ensuite faites glisser la poignée de recopie vers la plage où vous souhaitez appliquer cette formule. Les tirets entre les nombres ont été supprimés. Voir capture d'écran :

drag and fill the formula to other cells


Supprimer les tirets des cellules avec Kutools pour Excel

Si vous êtes débutant sur Excel, la formule ainsi que le code peuvent être difficiles pour vous, mais ne vous inquiétez pas, la fonction Supprimer des caractères spécifiques de Kutools pour Excel peut vous aider à supprimer rapidement les tirets des cellules.

Kutools pour Excel propose plus de 300 fonctionnalités avancées pour simplifier les tâches complexes, augmentant ainsi la créativité et l'efficacité. Intégré à des capacités d'IA, Kutools automatise les tâches avec précision, rendant la gestion des données facile et sans effort. Informations détaillées sur Kutools pour Excel...  Essai gratuit...

1. Sélectionnez la plage de cellules dont vous avez besoin de supprimer les tirets, puis cliquez sur Kutools > Texte > Supprimer des caractères spécifiques, voir capture d'écran :

click Remove Characters feature of kutools

2. Dans la boîte de dialogue Supprimer des caractères spécifiques, cochez l'option Personnalisé, et tapez le caractère “-” dans la zone de texte, ensuite vous pouvez prévisualiser les résultats dans le volet Aperçu. Ensuite, cliquez sur le bouton OK pour supprimer tous les tirets des cellules sélectionnées. Voir capture d'écran :

type - character into the text box

Remarque : Si les cellules sélectionnées contiennent des zéros de début ou beaucoup de chiffres, afin de conserver les zéros de début et d'éviter que le nombre ne devienne une notation scientifique après avoir supprimé les tirets, vous devez formater les cellules en tant que Texte comme indiqué dans la capture d'écran ci-dessous avant d'appliquer l'utilitaire Supprimer des caractères spécifiques.

format the cells as Text in the Format Cells dialog box

  Si vous souhaitez bénéficier d'un essai gratuit (30 jours) de cet utilitaire, veuillez cliquer pour le télécharger, puis aller appliquer l'opération selon les étapes ci-dessus.


Supprimer les tirets des cellules avec du code VBA

Avec le code VBA suivant, vous pouvez également supprimer les tirets entre les nombres d'une plage de cellules.

1. Mettez en surbrillance la plage où vous souhaitez supprimer les tirets.

2. Maintenez les touches ALT + F11 enfoncées pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.

3. Cliquez sur Insertion > Module, et collez le code suivant dans la fenêtre Module.

VBA : supprimer les tirets entre les nombres

Sub DeleteDashes()
'Update 20130907
Dim rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Application.ScreenUpdating = False
For Each rng In WorkRng
    rng.NumberFormat = "@"
    rng.Value = VBA.Replace(rng.Value, "-", "")
Next
Application.ScreenUpdating = True
End Sub

4. Appuyez ensuite sur la touche F5 pour exécuter ce code, et une boîte de dialogue s'affiche pour vous demander de sélectionner une plage que vous souhaitez utiliser. Voir capture d'écran :

vba code to select the data list

5. Puis cliquez sur OK, les tirets entre les nombres ont été supprimés des cellules. Et le format numérique est converti en format texte. Voir captures d'écran :

the dashes between the numbers are removed from the cells


Articles connexes :

Meilleurs outils de productivité pour Office

🤖 Kutools AI Aide : Révolutionner l'analyse des données basée sur : Exécution intelligente   |  Générer du code  |  Créer des formules personnalisées  |  Analyser les données et générer des graphiques  |  Invoquer les Fonctions améliorées
Fonctionnalités populaires : Trouver, mise en évidence ou marquer les doublons   |  Supprimer les lignes vides   |  Consolider les colonnes ou les cellules sans perdre de données   |   Arrondir sans formule ...
Super RECHERCHEV : RECHERCHEV avec critères multiples    RECHERCHEV avec valeurs multiples  |   Recherche multi-feuilles   |   Correspondance floue ....
Liste déroulante avancée : Créer rapidement une liste déroulante   |  Liste déroulante dépendante   |  Liste déroulante multi-sélection ....
Gestionnaire de colonnes : Ajouter un nombre spécifique de colonnes  |  Déplacer les colonnes  |  Basculer l'état de visibilité des colonnes masquées  |  Comparer les plages & colonnes ...
Fonctionnalités en vedette : Mise au point de la grille   |  Affichage de conception   |   Barre de formule améliorée    Gestionnaire de classeur & feuille de calcul   |  Bibliothèque dAutoTexte (Auto Text)   |  Sélecteur de date   |  Fusionner les données   |  Crypter/Déchiffrer les cellules    Envoyer un e-mail par liste   |  Super Filtre   |   Filtre spécial (filtrer les cellules avec une police en gras/italique/barré...) ...
Top15 ensembles d'outils12 outils de texte (Ajouter du texte, Supprimer des caractères spécifiques, ...)   |   50+ types de graphiques (Diagramme de Gantt, ...)   |   40+ formules pratiques (Calculer lâge en fonction de la date de naissance, ...)   |   19 outils d'insertion (Insérer un code QR, Insérer une image depuis le chemin, ...)   |  12 outils de conversion (Convertir en mots, Conversion de devises, ...)   |  7 outils de fusion & division (Fusion avancée des lignes, Diviser les cellules, ...)   |   ... et plus

Boostez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité sans précédent. Kutools pour Excel propose plus de300 fonctionnalités avancées pour augmenter la productivité et gagner du temps.  Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...


Office Tab apporte une interface à onglets à Office, et facilite grandement votre travail

  • Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de50 %, et réduit des centaines de clics de souris pour vous chaque jour !