Erreur d'exécution '53': Fichier introuvable

Question

Bonjour,

Lorsque j'essaye d'injecter des factures dans BOB50 via un fichier Excel, j'ai le message d'erreur suivant : "Erreur d'exécution '53': Fichier introuvable".

J'ai contacté la société qui nous a fourni le fichier Excel et ceux-ci nous indiquent que le problème vient de chez vous.

Pourriez-vous m'indiquer approximativement quand le problème sera-il résolu?

Merci pour votre réponse.

Cordialement,

DUPONT Marcellin.

Answer 1

Cette réponse a été traduite automatiquement. Par conséquent, il peut y avoir des erreurs grammaticales ou des formulations étranges.

Cher Marcellin DUPONT,

Veuillez nous fournir plus de détails. Je suppose que le problème semble provenir de l’appel de fonction dans votre fonction. ShellWait

Voici quelques suggestions que vous pourriez essayer :

1. Assurez-vous que la variable est correctement définie et qu’elle pointe vers le fichier exécutable que vous souhaitez exécuter. Vous pouvez ajouter un pour afficher la valeur de avant l’appel afin de le vérifier : MsgBox CompletePath

2.La fonction Shell peut ne pas être en mesure de localiser le fichier si le chemin d’accès contient des espaces ou des caractères spéciaux. Vous pouvez utiliser l’API ShellExecute à la place, qui est plus robuste :

Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As LongPtr, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

Function ShellWait(ByVal CompletePath As String) As Long
    Dim ProcessHandle As LongPtr, ProcessId As Long
    ProcessId = ShellExecute(0, "open", CompletePath, vbNullString, vbNullString, vbNormalFocus)
    ProcessHandle = OpenProcess(&H1F0000, 0, ProcessId)
    ShellWait = WaitForSingleObject(ProcessHandle, INFINITE)
End Function

D’ailleurs, assurez-vous que le fichier exécutable que vous essayez d’exécuter existe au chemin d’accès spécifié et qu’il n’est pas corrompu. Vous pouvez accéder manuellement au chemin d’accès et essayer d’exécuter l’exécutable pour confirmer.

Et si vous exécutez ce code sur une version 64 bits d’Excel, assurez-vous que toutes les déclarations d’API sont compatibles avec la version 64 bits. À utiliser à la place des pointeurs et des poignées.

Merci de votre temps et de votre coopération !

Sincères salutations

Answer 2

Bonjour,

J'ai essayé toutes les solutions que vous proposiez sans succès.

Voici plus de détails sur le problème, lorsque j'ouvre le débogueur, la partie de fonction qui pose problème est celle-ci :

Function ShellWait(ByVal CheminComplet As String) As Long

Dim ProcessHandle, ProcessId As Long 

ProcessId = Shell(CheminComplet, vbNormalFocus)          <-- Plus précisement cette ligne.

ProcessHandle = OpenProcess(&H1F0000, 0, ProcessId) 

ShellWait = WaitForSingleObject(ProcessHandle, INFINITE) 

End Function

Merci d'avance pour votre aide.

Bien à vous.

Answer 3

Cette réponse a été traduite automatiquement. Par conséquent, il peut y avoir des erreurs grammaticales ou des formulations étranges.

Cher DUPONT Marcellin,

Bonne journée! Merci d’avoir posté dans la communauté Microsoft. Nous sommes heureux de vous aider.

D’après vos descriptions, il semble que vous rencontriez un problème « Erreur d’exécution '53' : Fichier introuvable » lorsque vous essayez d’injecter des factures dans BOB50 via un fichier Excel. J’aimerais vous aider, nous pouvons travailler ensemble pour réduire la situation et avancer vers une voie de résolution.

D’après mes recherches, cette erreur peut également se produire s’il y a un problème avec le fichier Solver32.dll, qui est utilisé par Excel pour certaines fonctions. Vous pouvez essayer de mettre à jour vers la dernière version d’Office, voir si cela peut résoudre les problèmes avec ce fichier.

Si vous utilisez un script pour automatiser le processus, assurez-vous que le script utilise le bon chemin d’accès au fichier. Par exemple, le fait de remplacer le fichier activeworkbook.pathpar Application.ActiveWorkbook.FullName permet de s’assurer que le chemin d’accès correct est utilisé, quel que soit le nom de fichier

D’après mes recherches, la suppression du fichier linkCreation.dotm des dossiers spécifiés peut résoudre le problème. Ce fichier est lié à Adobe Acrobat et peut provoquer des conflits avec Excel

Si vous continuez à éprouver des problèmes, je comprends à quel point cette situation peut être frustrante et je m’excuse sincèrement pour la gêne occasionnée.

Pourriez-vous s’il vous plaît fournir plus de détails sur les étapes spécifiques que vous prenez et tout message d’erreur supplémentaire que vous recevez. Cela aidera à diagnostiquer le problème avec plus de précision.

Dans l’attente de votre réponse. Veuillez comprendre que notre réponse initiale ne résout pas toujours le problème immédiatement. Cependant, avec votre aide et des informations plus détaillées, nous pouvons travailler ensemble pour trouver une solution.

Merci de votre temps et de votre coopération !

J’espère que vous passez une bonne journée.

Sincères salutations