Excel exécute une routine via un VBS en arrière plan depuis quelques jours.

Question

Bonjour,

Pourquoi depuis 3 jours le clic sur un VBS démarre une routine sur Excel en arrière-plan et l'on ne sait et ne voit pas quand elle est terminée voir même qu"elle n'en fin pas . D'ordinaire, elle dure 1 heure maxi, démarrée au matin 6h30 quand je veux rouvrir le même classeur l'AM il me l'ouvre en lecture seule.

Avec W10 il n'y a pas le même service qu'avec XP . On a l'impression de travailler avec un truc à moitié fini.

le vbs:

Dim xlApp, xlBook
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("G:\PMU\ClasGenyc.xlsm")
xlApp.Run "Toufai"
'xlBook.Save
'xlBook.Close
'xlApp.Quit
Set xlBook = Nothing
Set xlApp = Nothing

Answer 1

Problème résolu

Answer 2

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

Bonjour Fredo P.,

Merci de partager les détails sur le problème de script que vous rencontrez - c’est  toujours frustrant quand des modifications apparemment simples ne fonctionnent pas comme prévu. Je comprends à quel point cette situation doit être perplexe ,      d’autant plus que vous avez tout vérifié plusieurs fois. Allons  au  fond des  choses ensemble.

Voici une approche étape par étape pour résoudre le problème :

1. Vérifier le chemin d’accès au fichier
   • Vérifiez que le chemin d’accès au fichier existe et qu’il est accessible. Ouvrez le fichier G:\PMU\ClasGenyC.xlsm directement à partir de l’Explorateur  Windows pour vous assurer que le chemin d’accès  est correct.
   • Assurez-vous qu’il n’y a  pas de fautes de frappe cachées ,  d’espaces supplémentaires ou de caractères dans le chemin d’accès au fichier  dans le script.
2. Vérifier les autorisations
   • Assurez-vous que votre compte utilisateur dispose d’un accès complet au fichier et au  dossier où le classeur est stocké. Faites un clic droit sur le fichier et vérifiez l’onglet « Propriétés » > « Sécurité ».
3. Inspecter la syntaxe du script
   • Examinez attentivement le script pour vous assurer qu’il  n’y a  pas d’erreurs  de syntaxe ou d’incohérences .  Par exemple :  

vbscript Copier Dim ApplicationExcel Set ApplicationExcel = CreateObject("Excel.Application")

    Assurez-vous que les noms de variables et les objets sont cohérents.

4. Tester le script avec le débogage
   • Exécutez le script étape par étape et ajoutez MsgBox pour vous aider à identifier l’erreur . Par exemple :

vbscript Copier MsgBox "Attempting to open: " & "G:\PMU\ClasGenyC.xlsm" 5. Problème d’enregistrement du bloc-notes

- Si la modification du script dans le Bloc-notes crée des erreurs inattendues :

    - **Assurez l’encodage :** lors de l’enregistrement du fichier, choisissez « Enregistrer sous » et sélectionnez l’encodage  correct (par exemple, ANSI ou UTF-8) pour éviter les modifications de formatage involontaires .
    - **Essayez un autre éditeur de texte :** envisagez d’utiliser un éditeur spécialisé comme Notepad++ ou VS Code, qui pourrait mieux gérer les scripts .

6. Vérifier l’hôte de script Windows
   • Assurez-vous que l’hôte de script Windows (WSH) de votre système fonctionne  correctement. En cas  de problèmes avec WSH, il peut être utile de le réinstaller ou de le réparer .
7. Vérifier les paramètres Excel
   • Ouvrez Excel et assurez-vous que les macros sont activées  pour le classeur. Vérifiez si  les paramètres de sécurité bloquent l’exécution du  script.
8. Utiliser des chemins d’accès absolus aux fichiers
   • Vérifiez que le script utilise le chemin d’accès absolu au fichier et évitez les raccourcis ou les chemins relatifs , sauf si vous êtes certain qu’ils fonctionnent.

Si le problème persiste :

• Envisagez d’exécuter le script sur un autre système pour vérifier les problèmes spécifiques au  système.
• Demandez de l’aide à votre équipe d’assistance informatique ou à un forum spécialisé dans les macros VBScript et Excel . Vous pouvez suivre les étapes ci-dessous pour contacter notre expert en Excel : support en direct Excel pour les formules. https://support.microsoft.com/en-us/office/get-expert-help-24-7-ff8c3819-3d0d-47ff-a150-5070c88f6eb3 Voici le lien pour nos partenaires de chat Excel avec Microsoft pour corriger vos formules gratuitement. Tout ce que vous avez à faire est de cliquer sur l’image et elle vous dirigera vers un site Web où vous pourrez continuer et vous y connecter. Vous pouvez également bénéficier d’une aide supplémentaire en organisant une session de réunion Zoom par l’un de leurs représentants.

  ---

  https://techcommunity.microsoft.com/t5/excel/welcome-to-the-excel-community/m-p/7715

ou utilisez ce lien pour démarrer la discussion
Démarrer une nouvelle discussion

[https://techcommunity.microsoft.com/t5/microsoft-learn/ct-p/MicrosoftLearn](https://techcommunity.microsoft.com/t5/microsoft-learn/ct-p/MicrosoftLearn "techcommunity.microsoft.com")

- Cliquez sur ce lien pour publier votre préoccupation ou vos problèmes avec l’erreur de document Excel spécifique et la situation sur celui-ci. La raison pour laquelle je dois fournir cela est que vous devez avoir un consultant informatique pour un expert Excel pour vérifier votre fichier.

Sinceres salutations
Bo

Answer 3

Reboujour,

J'ai retrouvé le code de ce script qui a disparu du bureau et qui fonctionne:

Dim Xl
Dim ApplicationExcel
Dim ClasseurExcel
Set ApplicationExcel=CreateObject("Excel.Application")
Set ClasseurExcel=ApplicationExcel.Workbooks.Open("G:\PMU\ClasGenyC.xlsm")
ApplicationExcel.Visible = True
ApplicationExcel.Run "TouFai" 'va lancer la macro "TouFai" dans le fichier Excel
ApplicationExcel.Quit
Set ClasseurExcel = Nothing
Set ApplicationExcel = Nothing
WScript.Quit()
Une chose qui est pour moi est bizarre J'édite ce script avec le bloc note pour changer la lettre D en G, j'enregistre, je fais un essais et Windows m'averti qu'il ne trouve le classeur dans D, je recommence plusieurs fois , idem et au lieu de faire éditer avec le bloc note je demande autre solution et je choisi modifier dans bloc note, cette fois C la bonne.

Answer 4

Bonjour BO, désolé la propo ne résout rien, même sur le code du classeur Application.Visible=True ne rend pas visible l'exécution, j'ai le même problème sur un PC W8 avec ce même script.

Answer 5

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

Bonjour Fredo P.,

Merci d’avoir posté ici dans la communauté.

Il semble incroyablement frustrant d’avoir  une routine Excel qui s’exécute  de manière inattendue en arrière-plan pendant des jours sans  indications claires de sa progression ou de son achèvement. Vous avez raison : Windows 10 gère les processus d’arrière-plan différemment de Windows XP.  Ce qui peut rendre le dépannage  moins simple.

Voici   quelques étapes pour examiner et résoudre le problème :

1. Vérifiez l’exécution de processus Excel

Étant donné qu’Excel peut toujours s’exécuter  en arrière-plan, empêchant l’accès normal aux fichiers :    

• Ouvrez le Gestionnaire des tâches(Ctrl + Shift + Esc ).
• EXCEL.EXE  Recherchez  dans l’onglet Processus .
• Si vous le trouvez, cliquez avec le bouton droit de la souris et terminez la tâche.

2. Modifiez votre VBS pour vous assurer qu’Excel   se ferme correctement

Votre script exécute Excel , mais il se peut qu’il  ne l’arrête  pas correctement. Essayez cette modification :

VBS Copier Dim xlApp, xlBook Set xlApp = CreateObject("Excel.Application") Set xlBook = xlApp.Workbooks.Open("G:\PMU\ClasGenyc.xlsm") xlApp.Run "Toufai" xlBook.Save xlBook.Close xlApp.Quit

Do While xlApp.Workbooks.Count > 0
    xlApp.Workbooks(1).Close False
Loop

Set xlBook = Nothing
Set xlApp = Nothing

Cela garantit que tous les classeurs se ferment correctement avant de quitter Excel.

3. Vérifier les autorisations sur le fichier

Étant donné qu’Excel  ouvre votre classeur en lecture seule, il est probable qu’il soit toujours en cours d’utilisation ou verrouillé par un autre processus :

• Localiser ClasGenyc.xlsm dans Explorer.
• Cliquez avec le bouton droit de la souris → Propriétés → onglet Sécurité.
• Assurez-vous  d’avoir un contrôle totalsous votre compte utilisateur .

4. Essayez d’exécuter le script avec Excel visible

Si le script s’exécute  entièrement en  arrière-plan, il est plus difficile de suivre :

VBS Copier xlApp.Visible = True

Cela vous permet d’observer  Excel exécuter la routine.

5. Vérifiez que l’Observateur d’événements ne contient pas d’erreurs

En cas de blocage ou d’échec d’Excel   :

• Ouvrez l’Observateur d’événements(Windows + X → Event Viewer ).
• Regardez sous Windows Logs → Application pour les erreurs liées à Excel.

6. Redémarrez l’ordinateur

Parfois, un processus persistant empêche Excel de se fermer correctement . Un redémarrage complet garantit qu’aucun processus fantôme ne subsiste.       

Si vous rencontrez  toujours des problèmes, faites-le moi savoir, et nous pourrons explorer d’autres options de dépannage . J’espère que cela vous aidera !

Sinceres salutations

Bo

Communauté Microsoft