Erreur Automotion

bonjour à tous,

la fonction suivante me provoque une : erreur automation défaillance irrémédiable ; quand j'essai d'ouvrir mon fichier depuis un autre PC que le mien.

sur le mien tout fonctionne nickel

Function FileExiste(p As String) As Boolean
If Dir(p, vbNormal) <> "" Then FileExiste = True
End Function

si je supprime cette fonction le fichier fonctionne normalement.

info complémentaire: l'erreur se produit uniquement si je demande l'ouverture automatique de la macro !

en revanche si dans mes options excel je demande a m'avertir avant l'ouverture et que j'accepte la macro , ca fonctionne correctement.

avez vous une idée du problème ...?

10copie-forum.xlsm (177.13 Ko)

une bonne âme pour m'aider ??

Bonjour Slygan,

Doucement dans les up SVP,
votre demande à été postée à 11h11... nous ne sommes pas à votre disposition

Sinon pour vous répondre, il n'y a absolument aucune raison

debug.print fileexiste("c:\toto.txt")

Me donne bien FAUX

bonjour brunoM45,

pardon pour le UP....

merci pour ta réponse, mais je la comprend pas ...

Re,

Ce que je voulais dire, c'est si on tape l'instruction indiquée dans la fenêtre d'exécution on obtient bien un retour

info complémentaire: l'erreur se produit uniquement si je demande l'ouverture automatique de la macro !

Quel est le code de ?

Private Sub Workbook_Open()

A+

Nota : cela peut être normal avec les sécurité Microsoft aujourd'hui

la c'est moi qui me suis mal exprimé je pense...

quand je parle d'ouverture automatique c'est uniquement par rapport au message d'alerte d'excel t'indiquant que le fichier contient une macro et donc te propose d'activer le contenu via le centre de de gestion de confidentialité.

Rechercher des sujets similaires à "erreur automotion"