séparateur espace sélection tableau

séparateur espace sélection tableau - VB/VBA/VBS - Programmation

Marsh Posté le 24-06-2013 à 17:00:34    

Bonjour à tous,
 
je peine à trouver une solution sur le net c'est pour cela que je fais appel à vous :o
 
J'ai un fichier txt comportant deux colonne séparé par un espace:
1 2
3 4
5 6
 
je souhaite ouvrir ce fichier avec excel à l'aide de vba avec en prime sélectionner que la dernière ligne afin d'avoir au final que:
2
4
6
 
 A bientot les loulou  :o

Reply

Marsh Posté le 24-06-2013 à 17:00:34   

Reply

Marsh Posté le 25-06-2013 à 17:18:33    

 
           Bonjour,
 
           sous Excel, l'enregistreur de macros procure une base de code !
 
           Voir aussi l'aide intégrée de VBA concernant la fonction  Split  …


Message édité par Marc L le 25-06-2013 à 17:19:14
Reply

Marsh Posté le 27-06-2013 à 10:31:29    

Sub LirefichierTexte()
  Dim NomFichier As String
  Dim Chaine As String
  Dim Tableau() As String
   
  NomFichier = "c:\fichier.txt"
  Open NomFichier For Input As #1
  Do While Not EOF(1)
    Line Input #1, Chaine
    Tableau = Split(Chaine, " " )
    MsgBox Tableau(1)
  Loop
  Close #1
End Sub

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed