XL 2013 Supprimer caracteres

maval

XLDnaute Barbatruc
Bonjour,

Je suis à la recherche d'un code VBA un peut spécial qui est:
j'ai une colonne avec des noms comme ceci:
77 397 - SAACY SUR MARNE (*)
67 421 - SAALES (*)
67 422 - SAASENHEIM (*)
65 380 - SABALOS
et j'aimerai supprimer les 6 premier caractères et les trois derniers quand il sont présent c'est à dire comme ceci:
SAACY SUR MARNE
SAALES
SAASENHEIM
SABALOS
Je vous remercie de votre aide

Cordialement
Max
 

vgendron

XLDnaute Barbatruc
Hello
une piste:
avec la fonction split avec l'espace comme délimiteur
puis tu cherches le caractère "-", et tu supprimes tout ce qu'il y a avant
et tu cherches le caractère "(" et supprimes ce qu'il y a après

sinon, tu peux aussi jouer avec les fonctions, left, stxt right, mid...
 

DoubleZero

XLDnaute Barbatruc
Bonjour à toutes et à tous,

Comme ceci ?
VB:
Option Explicit
Sub Remplacer()
    Dim c As Range
    Application.ScreenUpdating = False
    With Columns(1).SpecialCells(xlCellTypeConstants) ' numéro de colonne adapter
        .Replace What:="*- ", Replacement:="", LookAt:=xlPart
        .Replace What:=" (*)", Replacement:="", LookAt:=xlPart
    End With
    Application.ScreenUpdating = True
End Sub
A bientôt :)
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
311 725
Messages
2 081 945
Membres
101 849
dernier inscrit
florentMIG