bonjous a tous     voilà   mon brobleme est simple a poser mais peut etre un peut plus dur  a repondre (pour ma part en tous cas je n'y suis pas arrivé)
je possede un fichier text   "mon fichier.txt"   dont le nombre de ligne est totalement aleatoire
et j'aimerai garder de ce text que l'avant derniere ligne
voila s'est fait  s'est dit
si ququ'un pouvait m'aider ce serai top  merci a tous

    Dim hFile As Integer
    Dim sAvandernierLigne As String
    Dim lsTab() As String
   
    hFile = FreeFile
      
    Open App.Path & "\" & NomDuFichier For Input As #hFile
        Do While Not EOF(hFile) ' Effectue la boucle jusqu'à la fin du fichier.
            Line Input #hFile, TextLine
            lsTab() = TextLine
        Loop
    Close #hFile
    sAvandernierLigne = lsTab(Ubound(lsTab)-1)

Duracelle 

ok ca devrais marcher mais cela ne marche pas   par contre j'ai fait comme ca

Dim hFile As Integer
    Dim derniereLigne
    Dim lsTab
    Dim textline
    Dim sAvandernierLigne
       hFile = FreeFile
      
    Open App.Path & "\datas" & "\com.txt" For Input As #hFile
        Do While Not EOF(hFile) ' Effectue la boucle jusqu'à la fin du fichier.
            Line Input #hFile, textline
            lsTab = textline
        Loop
    Close #hFile
    sAvandernierLigne = lsTab


et la lsTab = ma derniere ligne

donc n'aurrier vous pas de quoi effacer ma dernier ligne (sans imoptance) que mon avant derniere ligne devienne la derniere et que je puisse la lire avec le code ci desus

Réponse acceptée !
Désoler il manque un ligne qui conserve toute les lignes du tableau
Dim textline
    Dim sAvandernierLigne
       hFile = FreeFile
      
    Open App.Path & "\datas" & "\com.txt" For Input As #hFile
        Do While Not EOF(hFile) ' Effectue la boucle jusqu'à la fin du fichier.
            Line Input #hFile, textline
            lsTab = textline
           redim preseve lsTab(ubound(lsTab)+1)
        Loop
    Close #hFile
    sAvandernierLigne = lsTab(Ubound(lsTab)-2)
  -2 car on retrouve une ligne vide après avoir entrer le dernirer élément dans le tableau

Duracelle

ok s'est cool s'est sa  merci beaucoup

bonjour

moi aussi j'ai le même probleme
j'essaye de trier un fichier texte plusieurs ligne avec tabulation

exemple

tel nom adresse ville cp

et des fois je veux trier par tel ou par adresse etc ...

merci de me repondre

Mourad

Meme topo pour moi qui galer avec VB.
dur de trier par nom, prenom,age etc...
Pour le stockage des donnees, un ichier texte séparé par un trait vertical est il LA solution à preferer ?
Merci pour votre réponse
SPHERIS5