none
Macro excel 2010 problème création de fichier qui ne fonctionne pas RRS feed

  • Question

  • Bonjour.
    J'utilise une macro toute simple qui crée un fichier et le remplis de quelques trucs, sous excel 2010 et windows XP. Mais en fait, le problème n'est pas spécifique à la macro, j'utiliserais donc cet exemple simple :

    Sub OpenExample()
    Dim sFirst, sLast, sAddress, sCity, sState, sZip As String
    ' CREATE DATA FILE
    ' Open file for input.
    Open "Datafile.txt" For Output As #1
    ' Write data to file.
    Write #1, "John", "Doe", "An Address", "A City", "A State", "A Zip"
    ' Close File.
    Close #1
    End Sub


    En gros le but est de créer le fichier Datafile.txt

    Mon problème est le suivant :

    1- J'ouvre le fichier excel. J'ai un message d'alerte m'informant qu'une macro est bloquée. Je l'autorise. J'exécute la macro. Aucun message d'erreur, mais le fichier Datafile.txt n'est pas crée !!! (En exécution pas à pas, la commande open est bien exécuté mais ne crée rien). Si je l'exécute plusieurs fois c'est toujours pareil.
    2- Je fais un "SAVE AS" du fichier excel en changeant légèrement le nom. J'exécute la macro. => le FICHIER EST CREE, tout fonctionne bien. . (Et je peux le faire plusieurs fois, ca marche).
    3- Je quitte excel et re-ouvre le fichier sauvegardé au point 2. Au message d'alerte j'autorise la macro. Je l'exécute. LE FICHIER n'est pas crée !!!!!! La macro échoue, mais la encore sans erreur.

    Bref je suis obligé de faire un save as au préalable à chaque fois que je veux utiliser cette macro (pourtant simple), ce qui n'est pas très pratique.

    J'ai envoyé le fichier avec la macro à des collègues sous XP et windows seven, ils n'ont eu aucun problème.

    Dans les options sécurité des macros, j'ai désactivé le mode protégé, et coupé toutes les protections possibles et imaginables. Cela n'a rien changé.
    Je n'ai pas pu couper mon antivirus, n'y ayant pas accès mais bon ça va chercher loin.

    J'avoue être très perplexe. Pourriez vous m'aider ?
    Merci de votre aide.
    mercredi 30 mai 2012 14:18

Réponses

  • Bonjour.

    J'ai trouvé le problème.

    Finalement, c'était que le fichier envoyé dans open file était donné en relatif. (exemple datafile.txt).

    En donnant la position du fichier complète. (Exemple c:\datafile.txt), je n'ai plus de problèmes.

    Visiblement excel ne sait pas toujours ou il se trouve.

    Fabrice.

    jeudi 31 mai 2012 08:41