mise en forme, du format texte à excel....

Question

Bonjour,

Je fais de nouveau appel à votre savoir pour un petit problème de mise en forme.

j'ai une macro qui importe un fichier texte sous excel, cependant elle ne le met pas en forme. Je m'explique sous format texte le fichier importer donne ça :

nom_de_l'équipe,joueur,point,reb,passe
nom_de_l'équipe2,joueur,point,reb,passe
nom_de_l'équipe3,joueur,point,reb,passe
nom_de_l'équipe4,joueur,point,reb,passe

lorsque la macro importe le fichier texte, une ligne va dans une cellule alors que j'aimerai avoir le nom de l'équipe colonne A, ligne 1; joueur colonne B ligne1; point colonne C ligne1,....nom de l'équipe 2 colonne A ligne 2; joueur colonne B ligne 2;....

J'aimerai incorporer quelques  lignes de code dans ma macro pour résoudre ce problème !

Merci d'avance

f894009 · Answer

Bonjour,

Fait avec l'enregistreur de macro.

Sub Macro1()
    'Chemin du fichier a adapter
    Workbooks.OpenText Filename:="D:\_Docs\Equipe.txt", Origin:=932, StartRow _
        :=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
        ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, Comma:=True, _
        Space:=False, Other:=False, FieldInfo:=Array(Array(1, 1), Array(2, 1), Array( _
        3, 1), Array(4, 1), Array(5, 1)), TrailingMinusNumbers:=True
End Sub


A vous d'essayer

eriiic · Answer

Bonjour,

si tu enlèves la référence à la feuille ça sera la feuille active par défaut.
Essaie donc en supprimant 'Feuil4'! 

eric

kgigant · Answer

Merci de ton aide je réessayerai dès mon retour en entreprise.

Mise en forme, du format texte à excel....

3 réponses

Discussions similaires

Newsletters