Sujet Précédent Sujet Suivant

Partionner un fichier sous vba

Résolu/Fermé
yoan - 16 févr. 2011 à 11:29
 yoan - 16 févr. 2011 à 13:24
Bonjour,

J'ai un fichier excel qui se présente sous la forme suivante :
813551083,EURX,MAR 11 EURX DAX INDEX ,P,P227,22700561,1,0,,,7416.0,,,,2011/02/16,02:22:06,FIMFR,R004,,

Je voudrais le partionner de telle sorte qu 'après chaque virgule ce soit une colonne.
Je sais faire cette opé sous excel avec la fonction Convertir, mais j'aimerai coder ça sous vba afin d'y lancer depuis un bouton.

Merci de votre aide.

A voir également:

3 réponses

Réponse 1 / 3
ccm81 Messages postés 10855 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 29 avril 2024 2 404
Modifié par ccm81 le 16/02/2011 à 12:06
bonjour,
il doit y avoir mieux mais, c'est un début 

Private Sub CommandButton1_Click() 
Dim s As String, nbv As Long, i As Long 
Dim t 
  s = Range("A1").Value 
  nbv = 0 
  For i = 1 To Len(s) 
    If Mid(s, i, 1) = "," Then 
      nbv = nbv + 1 
    End If 
  Next i 
  t = Split(s, ",", -1) 
  For i = 1 To nbv +1
    Range("A" & i + 1).Value = t(i - 1) 
  Next i 
End Sub


bonne suite
0
Réponse 2 / 3
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
16 févr. 2011 à 12:59
Tu pourrais au moins répondre à ton premier poste ???
DOUBLON
Si tu pratique encore longtemps comme ça je ne pense pas que tu auras encore beaucoup d'aide sur ce forum.
0
Réponse 3 / 3
yoan
16 févr. 2011 à 13:24
désolé lermite je n'avais pas vu ta réponse g essayé ta solution et ça marche merci beaucoup.

Merci aussi a ccm81 pr ta reponse .
0

Discussions similaires

comment donner les droits sur fichier partage
ch'ti du 57 -
fil1958 -

2 réponses
ouverture d'un fichier excel à partir d'un code VBA
TraderAS -
pijaku -

3 réponses
Chemin Logo du site de la Cité de l'espace
Keiios -
blux -

11 réponses