Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Par Macro, gérer fichier TXT

Créer une discussion

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 !

S'inscrire
M

malabarbe

XLDnaute Occasionnel
Bonjour,

Je voudrais qu'a l'exécution d'une Macro, (pour la première fois)
1 - Créer un fichier toto.txt
2 - Ecrire le chiffre 1 (un compteur)
3 - Lire le fichier pour en extraire le compteur
4 - Pour la réexécution de la Macro, incrémenter ce compteur
5 - Après je gère le chiffre du compteur

Merci à vous
 
Trier par date Trier par votes
Re : Par Macro, gérer fichier TXT

Bonjour,


Code: 
Sub compteur()
 repertoire = ThisWorkbook.Path & "\"
 nf = "toto.txt"
 chemin = repertoire & nf
 If Dir(chemin) <> "" Then
   Open chemin For Input As #1
   Input #1, temp
   Close #1
 Else
   temp = 0
 End If
 Open chemin For Output As #1
 Print #1, temp + 1
 Close #1
 MsgBox temp
End Sub

JB
Formation Excel VBA JB
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

S
  • Question Question
XL 2021 Automatisation et synthèse données
Réponses
1
Affichages
326
Dand87
D
H
  • Résolu(e)
XL 2021 Lire un fichier txt
Réponses
6
Affichages
264
patricktoulon
  • Question Question
XL 2016 relevé de consommation électrique
Réponses
1
Affichages
346
wDog66
W
T
  • Résolu(e)
XL 2019 Filtrer certains champs au démarrage avec vba
2
Réponses
15
Affichages
1 K
telemarrk
T
  • Résolu(e)
XL 2019 Import fichier ".txt" avec des caractères cachés qui gênent l'import
2
Réponses
22
Affichages
695
job75
  • Résolu(e)
XL 2019 Intégration d'un fichier ".txt" avec des lignes tabulées
2
Réponses
17
Affichages
474
Oneida
G
  • Question Question
XL 2016 filtrer, copier et coller les données avec la macro
Réponses
4
Affichages
323
job75
L
  • Question Question
XL 2013 fichier txt
Réponses
7
Affichages
524
job75
C
  • Question Question
Microsoft 365 Incrémenter une liste par rapport à une 1ere liste
Réponses
2
Affichages
151
Chris5633
C
E
  • Résolu(e)
Microsoft 365 insertions d une ligne
2
Réponses
19
Affichages
708
Piment
P
F
  • Résolu(e)
XL 2021 Génération d'un fichier TXT à partir d'une feuille Excel
Réponses
3
Affichages
434
fd.30
F
  • Résolu(e)
XL 2021 tri par lignes
2
Réponses
19
Affichages
1 K
rastafouette
  • Résolu(e)
XL 2021 Temps réel d'éxécution macro
Réponses
3
Affichages
258
treza88
M
  • Question Question
XL 2021 Macro
Réponses
6
Affichages
315
AtTheOne
  • Résolu(e)
Microsoft 365 Macro de tri
Réponses
2
Affichages
240
Phil Du59
  • Résolu(e)
XL 2019 macro avec fonction copié coller si rempli par la macro
Réponses
12
Affichages
646
AtTheOne
U
  • Question Question
Autres [RÉSOLU] Macro qui bug et je ne sais pas la corriger!!!
Réponses
7
Affichages
450
un internaute
U
  • Question Question
XL 2021 Besoin aide sur macro en VBA
Réponses
0
Affichages
264
Francoise_nord
M
  • Résolu(e)
Microsoft 365 $ Macro pour copier un exemple et$.....
Réponses
9
Affichages
518
sousou
A
  • Résolu(e)
XL 2019 Macro Excel recherche par occurrence Macro déjà créer juste modifications
2
Réponses
25
Affichages
929
Aeroberto0099bis
A
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…