Manipulation Fichier Texte avec Macro

  • Initiateur de la discussion Initiateur de la discussion duduAG
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

duduAG

XLDnaute Nouveau
Bonjour à tous,

je suis nouveau dans la programmation de Macro. Normalement je fais mes programmes en Matlab, mais je me suis dit que ce serait interessant de changer de platforme

Ce que j'aimerais faire est à priori simple, mais pour un debutant c'est assez difficile

J'aimerais ouvrir un fichier texte, pour cela j'utilise ce code en cliquant sur un bouton

Sub Test_Klick()
BrowserFile = ""
'liste des fichiers
Finfo = "FILES TEXT (*.TXT),*.TXT," & _
"ALL FILES TYPE (*.*),*.*"
'afficher *.* par defaut
Filtredefault = 1

'titre de la boite de dialogue
Titre = "File to read"

'obtenir le chemin d'acces
nomfichier = Application.GetOpenFilename(Finfo, Filtredefault, Titre)

'recuperer l'info de la boite de dialogue
If nomfichier = False Then
MsgBox "aucun fichier n'a été sélectionné."
BrowserFile = ""
Else
BrowserFile = nomfichier
MsgBox nomfichier
End If
Sheets("Tabelle1").TextBox1.Value = nomfichier
End Sub

Après j'aimerais lire ce fichier texte, et par exemple changer des caractères

Le fichier est de cette forme:
Test1 0 0 245.8 3650
Test2 0 1 384.6 5692

Par exemple dire si je reconnais Test2 dans le fichier, je change le caractère 7 de la ligne sélectionné et au lieu de 0 ça devient 1. Et après récrire ce fichier texte dans un autre fichier texte

Merci pour votre aide et j'espère que j'ai été clair
 
Re : Manipulation Fichier Texte avec Macro

Merci pour ta reponse, j'ai bien regarde mais je ne trouve pas vraiment ce que je cherche. Ce que je veux ce n'est pas ouvrir le fichier dans Excel, c'est juste utiliser Excel pour faire les calculs, et à la fin avoir un autre fichier texte. En gors utiliser Excel comme une Black Box. J'ai un bouton qui lance les calculs et sauve le fichier modifie dans un autre repertoire
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
4
Affichages
149
  • Question Question
Microsoft 365 Pb avec Windows
Réponses
47
Affichages
3 K
Réponses
17
Affichages
2 K
Retour