Recuperer données spécifique d'un fichier txt par VBA

Bonjour,

Débutante en VBA, je voudrais récupérer des données GPS avec plusieurs trames GPRMC (longitude,latitude,heure), PTNTHPR (roulis,tangage,lacet)...

Chaque ligne commence par une cellule avec l'identification de la trame (GPRMC,PTNTHPR, GPGGA...). La trame sur les informations roulis... ne contiennent pas l'heure mais qui elle est presente dans la trame GPRMC.

Je voudrais donc pour chaque ligne commençant par les cellules PTNTHPR/ GPGGA/GPGSA les couper/coller à la suite de la ligne commençant par la cellule GPRMC.

Quelqu'un pourrait-il m'aider pour la macro? Je mets ci-joint le fichier .log

Merci d'avances pour les informations,

51gps.zip (55.50 Ko)

bonjour,

une macro qui créé un fichier converti

Sub aargh()
    With Application.FileDialog(msoFileDialogOpen)
        If .Show = -1 Then
            f = .SelectedItems(1)
            Open f For Input As 1
            f2 = f & "(2)"
            Open f2 For Output As 2
            Line Input #1, l
            While Not EOF(1)
                If Left(l, 6) = "$GPRMC" Then Print #2, ""
                Print #2, l,
                Line Input #1, l
            Wend
            MsgBox f & " converti en " & f2
            Close 1, 2
        End If
    End With
End Sub

Merci beaucoup pour votre aide.

Rechercher des sujets similaires à "recuperer donnees specifique fichier txt vba"