Trie de données

[tikoad]

Bonjour à tous

Je vient de copier une liste de données sur internet (c'est un annuaire d'entreprises) et je les est collé sur une feuille excel mais voila tout est sur une seul colonne, et il y a plus de 1500 lignes. il est donc fastidieu de retier les donnée une par une pour les remettre sur 8 colonnes(société, nom, adresse, ville, tel, fax, email, descriptif) . Y a t il un outil dans excel pour m'aider à le faire?

Merci

 

[jeanpierre]

Re : Trie de données

Bonjour tikoad, le forum,

Tu selectionnes toutes tes lignes et Données/Convertir, cocher délimité et suivant.
Là tu choisis le séparateur utilisé dans la page (espace, virgule etc.
Et, finalement Terminer,

Cela doit fonctionner.

Bonne journée.

Jean-Pierre

 

[Pierrot93]

Re : Trie de données

Bonjour Tikoad

essaye peut être => barre de menu => Données => convertir, après tout dépend du type de donnée à convertir...

bonne journée
@+

 

[Pierrot93]

Re : Trie de données

Aarf, Bonjour Jean Pierre, t'avais pas vu, pas raffraichi bonne journée

 

[tikoad]

Re : Trie de données

le probleme c'est que a la fin de chaque ligne il y un retour a la ligne
Et la liste est sous la forme suivante:
Société
nom
adresse
ville
tel
fax
email
descriptif
Société2
nom2
adresse2
ville2
tel2
fax2
email2
descriptif2
etc...

donc ca marche pas

 

[tikoad]

Re : Trie de données

C vraiment pas possible ce que je demande?

Si non tant pi mais je vais perdre 2 h c tout...

 

[Staple1600]

Re : Trie de données

Bonjour le forum


Peux-tu joindre un extrait de ton fichier
(sans modifications, juste aprés le collage)?

 

[tikoad]

Re : Trie de données

Je joint le debut de mon listing ...

 

[Staple1600]

Re : Trie de données

Re

Je ne vois pas comment faire

J'ai essayé (manuellement) Collage spécial /transposé

ce qui donne en VBA
Sub Macro3()
Range("A2:A6").Select
Selection.Copy
Range("B2").Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone, SkipBlanks:=False _
, Transpose:=True
End Sub

Mais cela reste fastidieux

Ou alors il faudrait identifier les quatres lignes au dessus d'une cellule contenant le mot Fax et les copier/coller en transposant

Mais je ne vois pas comment faire cela en VBA

 

[tikoad]

Re : Trie de données

C pas grave je te remerci quand meme

A+