Les sujets:

Les partenaires publicitaires:

Réponses populaires

Questions connexes

Les partenaires publicitaires:

Comment supprimer des caractères dans une cellule Excel 2007 avec VBA

Visual Basic de Microsoft pour Applications (VBA) est un sous-ensemble de Visual Basic qui est utilisé pour personnaliser les applications Microsoft Office. Un morceau de code VBA, une macro, peut remplacer de nombreuses fonctions répétitives comme rechercher et remplacer. Si vous souhaitez supprimer certains caractères à partir de cellules, comme des périodes ou des virgules, écrire une routine pour effectuer la tâche pour vous. Au lieu d'avoir à cliquer "Rechercher et remplacer" plusieurs fois, vous pourrez obtenir de VBA pour effectuer la tâche pour vous dans un bouton poussoir.

Instructions

  1. 1

    Appuyez "Alt" + "F11" dans Excel pour ouvrir l'éditeur Visual Basic (VBE).

  2. 2

    Cliquez "Insérer" gt; "Module."

  3. 3

    Coupez et collez le code suivant dans la fenêtre vide:

    Option Explicit

    Sous Supprimer ()

    Dim rgxRegExp As Object
    Dim rngCell Comme Range, rngRange Comme Range
    Réglez rngRange = Sheet1.Range ("A1: A3")
    Réglez rgxRegExp = CreateObject ("VBScript.RegExp")


    rgxRegExp.Global = True
    rgxRegExp.Pattern = " |.,"
    Avec application
    .Calcul = xlCalculationManual
    .EnableEvents = False



    .ScreenUpdating = False
    End With
    Pour chaque rngCell Dans rngRange.SpecialCells (xlCellTypeConstants)
    rngCell.Value = rgxRegExp.Replace (rngCell.Value, vbNullString)
    Suivant
    Avec application
    .Calcul = xlCalculationAutomatic
    .EnableEvents = True
    .ScreenUpdating = True
    End With

    End Sub

  4. 4

    Changez la gamme qui correspond à la gamme de données que vous souhaitez supprimer à partir de caractères. Par exemple, si vous voulez supprimer les caractères à partir de cellules D1 à D110 dans la feuille 2, remplacer la ligne 5 dans le code à lire:

    Réglez rngRange = Sheet2.Range ("D1: D110").

  5. 5

    Modifiez le code afin de refléter les caractères que vous souhaitez supprimer à partir des cellules dans votre feuille de calcul. Le code tel que rédigé supprime les périodes ou des virgules (rgxRegExp.Pattern = ". |,"). Vous pouvez changer de code qui supprime les virgules et les tirets (rgxRegExp.Pattern = ", | -") Ou des périodes et des pourcentages (rgxRegExp.Pattern = ". |,"), Ou vous pouvez remplacer les numéros et d'autres caractères spéciaux.

  6. 6

    Appuyez "F5" pour exécuter la routine.

Conseils & Avertissements

  • Vous ne devez pas quitter le VBE pour vérifier si le code a réalisé l'action que vous attendiez. Basculer entre la feuille de calcul et de la VBA en appuyant "Alt" + "F11."

Questions connexes

» » » » Comment supprimer des caractères dans une cellule Excel 2007 avec VBA