VBA problème avec open for output et print#

Signaler
Messages postés
55
Date d'inscription
mardi 15 février 2005
Statut
Membre
Dernière intervention
4 juin 2010
-
Messages postés
55
Date d'inscription
mardi 15 février 2005
Statut
Membre
Dernière intervention
4 juin 2010
-
Bonjour à tous,
Voila j'ai un problème pour écrire dans un fichier texte avec EXEL et vba.
Lorsque j'utilise le code suivant
open "D:\fichier1.txt" for output as #1
print #1, "Une phrase simple"
close #1

Une erreur s'affiche et si le fichier n'existe pas il me marque que le fichier n'existe pas ou que le chemin est mauvais. Si je créé un fichier fichier1.txt sur le D il me marque une erreur au niveau du print et dit que le mode d'access n'est pas bon.

Lorsque j'utilise ces meme ligne de codes sous vb6 il execute sans problème. La je comprend pas. Est ce que cela provient de moi ou de exel u d'une library ou dll ou de windows? Merci de m'éclairer à ce sujet. Faut il que je change de PC ou que j'apprenne à programmer sous VBA? :-)
Merci d'avance.

mickadevelop

3 réponses

Messages postés
1788
Date d'inscription
mardi 7 novembre 2000
Statut
Membre
Dernière intervention
11 mars 2006
26
Bonsoir,
J'ai essayer sous Excel 2003 et celà fonctionne très bien.

jpleroisse
Messages postés
402
Date d'inscription
vendredi 6 août 2004
Statut
Membre
Dernière intervention
12 octobre 2008
28
bonjour

la synthaxe que tu utilises fonctionne chez moi ( Excel 2002 & WinXP )

sans garantie , tu peux essayer cette adaptation

Dim Cible As Integer
Cible = FreeFile
Open "C:\Fichier1.Txt" For Output As #Cible
Print #1, "Une phrase simple"
Close

bon week end
michel
Messages postés
55
Date d'inscription
mardi 15 février 2005
Statut
Membre
Dernière intervention
4 juin 2010

Bonjour,
Merci beaucoup pour les réponses. En résumé c'est un bug de VBA sur mon PC. Si quelqu'un à déja rencontré c genre de pb n'hésité pas à m'en faire part. Et si quelqu'un à la solution pour corriger ce problème n'hésiter surtout pas à me faire par de la solution :-) sans changer de PC bien sur lol.
Merci :-)
mickadevelop