Discussion :

[psgkiki]

Bonjour

Je suis bloqué sur ma macro Excel qui permet de recopier des données d'un fichier TXT dans un classeur EXCEL.

J'aimerai cependant recopier qu'une partie du fichier txt. J'ai donc ouvert le fichier TXT (Open) et j'ai récupérer la ligne de début et la ligne de fin.

Maintenant j'aimerai ecrire le contenu entre la ligne de debut et la ligne de fin mais je n'y arrive pas.

Voici un extrait de mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Sub proc_WriteXMLTempFile(ByVal ao_file As File, ByVal ai_StartLineMessage As Integer, ByVal ai_EndLineMessage As Integer)
 
    Dim XMLfilename                                         As String
    Dim texte
 
    XMLfilename = "D:\...\XMLTempFile.xml"
 
    Open ao_file For Input As #1
    Open XMLfilename For Output As #2
 
        While Not EOF(1)
 
            Line Input #1, texte
 
 
           //Comment dire ecrit moi (Write #2, texte) de la ligne de debut (statLine) à la ligne de fin (endLine).
 
 
        Wend
 
    Close #1
    Close #2
 
End Sub

Merci pour votre aide

[cafeine]

Bonjour,

un exemple théorique avec un booléen qui détermine si nous devons écrire dans le fichier #2 ou pas :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
        Dim blnCopie As Boolean
        While Not EOF(1)
            Line Input #1, Texte
            Select Case Texte
                Case ai_StartLineMessage
                    blnCopie = True
                Case ai_EndLineMessage
                    blnCopie = False
                    Exit Sub   ' optionel
                Case Else
                    If blnCopie Then
                        Write #2, Texte
                    End If
            End Select
         Wend

[psgkiki]

Merci pour ton aide ! car dans ton exemple, il ne recopie pas le contenu entre les deux bornes ?

Comment dire tu me copies tout le texte de la ligne start a la ligne End. Peux t on le faire en bloc ou dois-je le gérer ligne par ligne ?


Ma premiere idée était de se positionner sur la ligne START. Ensuite a partir de celle-ci, tant que l'on est pas à la ligne END, j'ecris dans mon fichier. Mais je ne peux pas incrémenter ma ligne dans le tant que.

Est-ce possible ?

Merci