Macro pour supprimer des caractères

bonjour à tous

j'ai une petite question sur excel et j'ai besoin de votre aide SVP

je veux une macro qui parcourt de A1 à A10 et qui supprime les 4 premiers et les 6 derniers caractères de chaque cellule

Merci infiniment pour votre aide

Salut,

Voici un code qui supprime comme demandé les 4 premiers caractères des données de la colonne A ainsi que les 6 derniers.

Option Explicit

Sub aa()
Dim i As Integer

For i = 1 To 10
    Cells(i, 3) = Left(Right(Cells(i, 1), Len(Cells(i, 1)) - 4), Len(Right(Cells(i, 1), Len(Cells(i, 1)) - 4)) - 6)
Next i

End Sub

Selon qu'il y a des espaces ou non, on pourrait en plus les supprimer (uniquement devant et derrière) directement par le code.

On peut également remplacer les données de la colonne A au lieu de placer le résultat dans la colonne C.

A te relire.

22hisuka.zip (10.94 Ko)

ca répond parfaitement à ma question Merci chef c super sympa

Rechercher des sujets similaires à "macro supprimer caracteres"