[RESOLU]Supprimer caractèrers récurants dans une colonne

michelw

XLDnaute Nouveau
Bonjour,
J'ai une colonne qui contient des données sous cette forme:
S3 19-347,"01/19/12","12:00:00 ","01/20/12","12:00:00 ","True","False","","","","","","False"
Je souhaiterai:
* supprimer tous les termes après la deuxième virgule et cette deuxième virgule:
S3 19-347,"01/19/12"
* les guillemets de la deuxième expression
S3 19-347,01/19/12
* et mettre cette dernière expression sous forme de 3 colonnes:
Colonne 1: S3
Colonne 2: 19-347
Colonne 3: 01/19/12
Auriez-vous un tutoriel qui pourrai me guider pour mettre cela en place
En vous remerciant
 

Pièces jointes

  • exemple.xlsx
    23.8 KB · Affichages: 41
  • exemple.xlsx
    23.8 KB · Affichages: 45
  • exemple.xlsx
    23.8 KB · Affichages: 46
Dernière édition:

camarchepas

XLDnaute Barbatruc
Re : Supprimer caractèrers récurants dans une colonne

Bonsoir,

A mettre dans un module et hop

Code:
Sub Coupe()
Dim LigneMax As Long
Dim Ligne As Long

LigneMax = Range("A" & Rows.Count).End(xlUp).Row
Ligne = 1
Do
  Ligne = Ligne + 1
  Range("B" & Ligne) = Trim(Split(Range("A" & Ligne), " ")(0))
  Range("C" & Ligne) = Trim(Replace(Split(Range("A" & Ligne), ",")(0), Range("B" & Ligne), ""))
  Range("D" & Ligne) = Replace(Trim(Split(Range("A" & Ligne), ",")(1)), """", "")
Loop Until Ligne = LigneMax
End Sub
 

mapomme

XLDnaute Barbatruc
Supporter XLD
Re : Supprimer caractèrers récurants dans une colonne

Bonsoir michelw,

Sélectionner la colonne A
Menu Données/convertir
Sélectionner Délimité puis Suivant
Sélectionner la virgule et l'espace comme séparateurs
Sélectionner, si ce n'est fait, les guillemets doubles comme identificateur de texte puis Suivant
Sélectionner la 3eme colonne (date) dans l'aperçu des données
Cliquer sur date et Sélectionner le format de la date à convertir (MJA apparemment)
Cliquer sur Terminer
Supprimer les colonnes inutiles

-> plus facile à faire qu'à décrire...

nb: la date sera francisée au format jour/mois/année
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
311 708
Messages
2 081 750
Membres
101 812
dernier inscrit
trufu