Supprimer une ligne dans un txt

[titouxo]

Bonjour,
J'aimerai savoir le code à utiliser pour supprimer une ligne d'un fichier texte, qui est caratérisée comme un type perso
je simplifie au max le code
merci de vos réponses


Type typfich
texte As String * 50
End Type

Private Sub EcritureFichier()
Fichier = ThisWorkbook.Path & "\*.txt"
Fiche.texte = "***"
num = 1

Open Fichier For Random As #1 Len = Len(Fiche)
If LOF(1) = 0 Then
Put #1, num, Fiche
End If
Close #1
End Sub


Private Sub ExtraireFiche()
Open Fichier For Random As #1 Len = Len(Fiche)
Get #1, num, Fiche
Close #1
End Sub

Private Sub SupprimerFiche()
C'est ici que je ne sais aps quoi faire!!!!
End Sub

 

[tototiti2008]

Re : Supprimer une ligne dans un txt

Bonjour titouxo,

je te conseille d'aller voir dans les fabuleuses pages Wiki de MichelXLD :

https://www.excel-downloads.com/thr...oter-dautres-applications-depuis-excel.92359/

recherche le texte là dans cette page : Supprimer une ou plusieurs lignes dans un fichier texte

 

[titouxo]

Re : Supprimer une ligne dans un txt

Le problème est que je ne peux pas supprimer une ligne, car cette méthode stock l'ensemble des données sur une seule ligne........
je vais qd meme regarder le lien
merci

 

[titouxo]

Re : Supprimer une ligne dans un txt

Bonsoir,
c'est encore moi et mon problème
je ne sais vraiment pas comment faire
si qcq pouvait m'aider ça serait gentil
merci

 

[wilfried_42]

Re : Supprimer une ligne dans un txt

Bonjour

le problème : meme si tu appelles un fichier .TXT, l'ouvrant en type Random, ce n'est pas un fichier TXT comme DOS le comprend, c'est un fichier à acces direct.... mais pas un fichier TXT.

Meme si un fichier à acces direct facilite l'utilisation, il en complique la gestion

pour supprimer des enregistrements sur un Fichier Random, c'est impossible...

il faut pour cela : placer les enregistrements en memoire (feuille excel), ensuite detruire le fichier pour enfin le recreer avec les enregistrements selectionnés selon notre désir

donc : charger le fichier dans une feuille
donc : le fermer
donc : le détruire
donc : le reouvrir (ce qui le recrée automatiquement)
donc : réenregistrer le fichier

 

[titouxo]

Re : Supprimer une ligne dans un txt

merci bcp
je sais ce qu'il me reste à faire maintenant...