Message d'erreur "Run-time error '32809' à l’exécution d'une macro.

Anonyme

Bonjour,

Depuis quelques jours j'ai un problème sur l'un de mes serveurs.

Sur celui ci est installé Office Pro Plus 2010 (32-bit).

A l'ouverture du classeur la procédure Private Sub Workbook_Open() va écrire des données dans différentes feuilles. Mais à la première occurrence il y a un arrêt avec un message d'erreur (cf plus bas).

Afin de facilité la lecture de la macro et les différents caractères utilisés j'ai écris dans un module la simple sélection d'une feuille :

Sub Macro1()

Worksheets("16-ST04-CS (FW Positions)").Select

Worksheets("03-MT54x-CS(BS SEC External)").Select

End Sub

La première ligne de commande fonctionne correctement. La feuille 16-ST04-CS (FW Positions) est sélectionnée.

La seconde ligne de commande provoque une erreur :

Run-time error '32809':

Application-defined or object-defined error

Les deux feuilles sont bien présentes dans le groupe VBAProject / Microsoft Excel Objects.

Elles portent toutes deux des noms différents de feuil1,2,3 ...

F16_ST04 pour la première et F03_External_CS pour la seconde.

Le problème ne se présente pas sur d'autres postes, cependant ce sont des fichiers qui sont exécuté automatiquement sur le serveur qui est le seul a être allumé la nuit.

Si quelqu'un a une idée d'où peut venir le problème, ca serait bienvenue.

merci d'avance.

Alex.

Question verrouillée. Cette question a été migrée à partir de la Communauté Support Microsoft. Vous pouvez voter pour indiquer si elle est utile, mais vous ne pouvez pas ajouter de commentaires ou de réponses ni suivre la question.

0 commentaires

24 réponses

DanielCo 107.1K Points de réputation

2015-03-04T18:42:04+00:00

Ferme tous les programmes Office, clique sur le bouton "Démarrer", entre "%temp% dans la fenêtre, appuie sur Entrée et supprime le maximum de fichiers. Tu dois faire une manip équivalente sur tous les ordis posant problème sauf que les fichiers temporaires sont peut-être situés autre part avec XP.

Daniel
Cette réponse a-t-elle été utile ?

2 personnes ont trouvé cette réponse utile.

0 commentaires Aucun commentaire
Anonyme

2015-03-04T09:38:03+00:00

Bonsoir,

> Mes macros, qui fonctionnaient parfaitement, affichent le message "erreur d'execution 32809".

Quelle est la ligne en erreur ?

Daniel

Merci Daniel de te pencher sur ce problème.

Voici la ligne en erreur :

ActiveSheet.Unprotect

Je ne suis pas un pro en VBA, mais ça me parait pas spécialement problématique comme code.

Sylvain
Cette réponse a-t-elle été utile ?

1 personne a trouvé cette réponse utile.

0 commentaires Aucun commentaire
Anonyme

2014-12-16T14:24:11+00:00

| C) ==> Cela fonctionne correctement sur de nouvelles feuilles.

**** Je suppose que cette feuille était corrompue!!!

       Est-ce que tu avais autre chose que des données dans cette feuille? Liste de validation, Contrôles émanant de la barre d'outils "formulaire" ou "contrôle" ?

**** Au niveau du code, il est possible de faire des copies de données d'une feuille à l'autre sans avoir à sélectionner les feuilles.

Exemple : Copier seulement les "données" de la plage A1:G25 de la feuil1 vers la cellule G10 de la feuil2

'--------------------------------------------

Dim T As Variant

With Worksheets("Feuil1")

         T = .Range("A1:G25")

End With

With Worksheets("Feuil2")

         .Range("G10").Resize(Ubound(t,1),Ubound(t,2)) = T

End With

'--------------------------------------------
Cette réponse a-t-elle été utile ?

0 commentaires Aucun commentaire
Anonyme

2014-12-16T13:50:22+00:00

Bonjour,

Sur le poste de travail où tu as ce problème, as-tu essayé ceci :

A ) Supprime tous les fichiers et répertoires du répertoire Temp.

     Tu ouvres la fenêtre Exécuter : Raccourci clavier : Win + R

     Tu tapes la commande %Temp%

     Tu sélectionnes et supprimes tout le contenu du répertoire.

B ) As-tu tenté une réparation de Microsoft Office du poste de travail?

    Panneau de configuration / Fonctionnalités et programmes / tu sélectionnes la version "Microsoft Office" / Modifier / Réparer...

C ) Dans le code exemple que tu as soumis, qu'est-ce qui se passe si tu ajoutes une nouvelle feuille et que tu remplaces dans la procédure, le nom de la feuille par celui de la nouvelle feuille? As-tu toujours le même problème?

Bonjour,

Merci pour la réponse rapide.

A) ==> Aucun effet

B) ==> J'ai effectuer la réparation mais il faut faire un reboot du serveur. Et je ne pourrai pas la faire avant demain. Sans redémarrer le problème persiste.

C) ==> Cela fonctionne correctement sur de nouvelles feuilles.

BàV

Alessandro.
Cette réponse a-t-elle été utile ?

0 commentaires Aucun commentaire
Anonyme

2014-12-16T12:25:16+00:00

Bonjour,

Sur le poste de travail où tu as ce problème, as-tu essayé ceci :

A ) Supprime tous les fichiers et répertoires du répertoire Temp.

     Tu ouvres la fenêtre Exécuter : Raccourci clavier : Win + R

     Tu tapes la commande %Temp%

     Tu sélectionnes et supprimes tout le contenu du répertoire.

B ) As-tu tenté une réparation de Microsoft Office du poste de travail?

    Panneau de configuration / Fonctionnalités et programmes / tu sélectionnes la version "Microsoft Office" / Modifier / Réparer...

C ) Dans le code exemple que tu as soumis, qu'est-ce qui se passe si tu ajoutes une nouvelle feuille et que tu remplaces dans la procédure, le nom de la feuille par celui de la nouvelle feuille? As-tu toujours le même problème?
Cette réponse a-t-elle été utile ?

0 commentaires Aucun commentaire