séparer à l'aide de _

[beru59]

Bonjour,

Je cherche à éclater une cellule dans lequel on va avoir:
né le 1er janvier 2012 à Reims
_ métier

Donc, du texte + une date + un lieu + un métier
Sachant que parfois toutes les infos n'y sont pas .

Dans un premier temps j'aimerais mettre le métier dans une autre cellule; ou autrement dit tout ce qui trouve après le "_"

Mais je sèche!

J'ai remplacé tous les "_" par "@".
Puis j'ai pris dans le menu: "convertir"
Mais cela ne fonctionne pas, sans doute à cause du retour à la ligne qui précède le "_"

Beru

 

[DoubleZero]

Re : séparer à l'aide de _

Bonjour, beru59, le Forum,

Merci de bien vouloir déposer un fichier exemple, sans donnée confidentielle.

A bientôt 🙂

 

[herve62]

Re : séparer à l'aide de _

Salut
Essaye de passer avec cette instruction :
parc = .Cells(x, 8).Value > On prend la valeur de la cellule dans mon appli j'avais AR 183-186
tir = Split(parc, "-") > On s'arrête au "-" , toi tu prendras le "_"
ensuite je faisais

For n = 0 To UBound(tir)
A = tir(n)
For j = 1 To der_col
Sheets(2).Cells(lig + n, j).Value = .Cells(x, j).Value
Sheets(2).Cells(lig + n, 8).Value = A
Next j
Next n

Donc à adapter dans ton fichier , moi ça donnait : AR 183 et dans la ligne dessous : 186
Ca ressemble beaucoup à ce que tu cherches à faire ?

 

[beru59]

Re : séparer à l'aide de _

J'ai résolu mon premier problème:
Séparer en deux colonnes:
- Utiliser chercher (mettre alt + 010) remplacer (mettre un espace): cela supprime les retours à la ligne
- puis pour faire deux colonnes: Sélectionnez la colonne puis menu "Données" - "Convertir" - choix : délimité et " _ "

Maintenant, je dois supprimer:
né le
née le
ou encore né en

Cela veut dire trouver une formule pour supprimer tout ce qui est à gauche du premier chiffre rencontré.

Cela est-il possible ?

 

[herve62]

Re : séparer à l'aide de _

Au fait , t'as pas précisé si c'était en Excel ou VBA ??

 

[DoubleZero]

Re : séparer à l'aide de _

Re-bonjour,

...Cela est-il possible ?

Voir... ici !

🙂

 

[phlaurent55]

Re : séparer à l'aide de _

Bonjour à tous,

Dans un premier temps j'aimerais mettre le métier dans une autre cellule; ou autrement dit tout ce qui trouve après le "_"

voir fichier joint

à+
Philippe

 

[ODVJ]

Re : séparer à l'aide de _

Bonjour à tous,

Pour l'extraction du métier, qui est ce qu'il y a de plus facile vu que tes données semblent régulières à ce niveau, plutôt que ta conversion, tu peux utiliser la formule =DROITE(A1;NBCAR(A1)-TROUVE("_ ";A1)-1)

Pour le reste, il faut que tu nous envoies des exemples diversifiés de tes données.
Donc, comme DoubleZero te l'a demandé, dépose un fichier exemple, sans données confidentielles.
Ça nous évitera de tâtonner.

Cordialement

 

[DoubleZero]

Re : séparer à l'aide de _

Re-bonjour, bonjour, herve62, Philippe, ODVJ,

Merci, Philippe 🙂, de me rajeunir !

A bientôt 😀😀

 

[beru59]

Re : séparer à l'aide de _

Au fait , t'as pas précisé si c'était en Excel ou VBA ??

Que veux-tu dire ?

 

[beru59]

Re : séparer à l'aide de _

Merci pour tous ces messages.

Comme je l'ai dit plus haut, j'ai résolu le premier problème: séparé en deux colonnes avec "_"

Pour le 2e problème, j'ai encore utilisé dans le menu:
"données" "convertir"; en choisissant comme séparateur un espace, j'ai pu faire une colonne avec tous mes "né", une avec les "le", etc...
Ensuite je supprime les colonnes inutiles.

Donc à ce stade j'en suis à avoir une date de naissance en trois colonnes sous la forme:
01 janvier 2000
qu'il faut que je transforme en 01/01/2000, réunit dans une seule colonne.

J'utilise la formule
=CONCATENER(J2;"/";K2;"/";L2)

Le seul souci qui me reste c'est comment transformer les mois écrits en lettre, en mois écrits en chiffres.

Beru

 

[gosselien]

Re : séparer à l'aide de _

Encore une fois, sans un fichier exemple, c'est toujours difficile de t'aider...

P.

 

[herve62]

Re : séparer à l'aide de _

Beru , je réponds au #10 : veux tu que ce soit en excel ou en VBA ?
Sinon comme je suis pile poil à écrire une macro pour ça !! ( mais pas pour toi désolé) , un exemple :
m1=range("b2").value ( exemple on a septembre )
md = Month(DateValue("01 " & m1 & " 2015"))
Msgbox md ( ça devrait te donner 9 )
Donc pour résumer ton cas :
tu utilises cela pour transformer le mois ensuite tu concatènes dans Une seule cellule ( mettre au format date jj/mm/aaaa)
Sinon juste avec Excel , inspire toi de ce post :
Transformer le mois en chiffre sous excel

 

[beru59]

Re : séparer à l'aide de _

Ok.
Ca me semble très simple pourtant mais voici un exemple ci joint

Sachant qu'il s'agit juste d'une transformation d'une base à une autre, en passant par excel.

Comment transformer les mois écrits en lettre, en mois écrits en chiffres

 

[gosselien]

Re : séparer à l'aide de _

ALors:
le mois étant en B1
=INDEX({1;2;3;4;5;6;7;8;9;10;11;12};EQUIV(B1;{"janvier";"fevrier";"mars";"avril";"mai";"juin";"juillet";"aout";"septembre";"octobre";"novembre";"decembre"};0))
et ensuite:
=A1&"/"&F1&"/"&C1 ' jour/mois/annee

P.