Erreur automation

Rebonjour,

J'ai l'erreur ci-dessous lorsque j’appuie sur le bouton : CommandButton_Delete

Message d'erreur :

image

Action lorsque je clic sur le bouton :

Private Sub CommandButton_Delete_Click()

    Application.ScreenUpdating = False

    Call Declaration.Macro
    Call Securite_Generale.Macro_Deverrouillage

    Call Form_Mouvement.Macro_SupprSaisi

    Call Securite_Generale.Macro_Verrouillage

    Application.ScreenUpdating = True

End Sub
Sub Macro_SupprSaisi()

    Application.DisplayAlerts = False   'blocage des alertes

    Sheets(feuilModelMouv).Visible = True   'Dupliquer feuil model "formulaire mouv"
    Sheets(feuilModelMouv).Copy Before:=Sheets(4)
    Sheets(feuilModelMouv).Visible = False

    Sheets(feuilMouv).Delete    'Suppression de la feuil "formulaire mouv"

    Sheets("Model_Formulaire mouvement (2)").Name = feuilMouv   'Remane de la feuil dupliquer en "formulaire mouv"

    Application.DisplayAlerts = True   'deblocage des alertes

End Sub

Lorsque je supprime :

Application.ScreenUpdating = True
Application.ScreenUpdating = False

Le problème disparaît mais je veux les garder !

Est-ce que quelqu'un a une solution pour moi, s'il vous plait !

Merci par avance ! 😉

Bonjour mj0901

Alors je vais regarder

bouledecristal

Ah mince... je ne vois rien

A+

Bonjour, essaies de mettre : "Application.ScreenUpdating = False" dans les macros que tu appels avec "Call" au lieu du bouton pour voir

si le debogage ne t'affiche pas une autre erreur.

Oui je sais que ça fonctionne cette solution. J'avais déjà essayé. Mais l'ensemble du projet est fait avec cette structure

Bouton -> Freeze de l'écran -> Appel des différentes macros -> Défreeze de l'écran

J'aimerai plus corrigé le bug que le contourner. 😋

Re,

Pour ça il nous faudrait le fichier !

Bonjour,

Cela n'a peut être rien avoir mais faites tout de même ce contrôle :
- Allez dans le menu "developpeur"
- cliquez icone "Compléments Excel"
- vérifiez si vous n'avez pas coché l'option "Euro Currency Tools"

si oui, décochez l'option et enregistrez le fichier puis réouvrez-le

Cordialement

Merci Dan pour ton retour mais ce n'est pas cocher.

Vous trouverez ci-dessous le lien de téléchargement du fichier comme demandé par BrunoM45

La commande problématique ce trouve dans la feuil "Formulaire mouvement" et sur le bouton "Valider formulaire" et "Supprimer formulaire".

Bonsoir mj0901 et merci pour le fichier

Si vous insérez un point d'arrêt (F9) sur la première ligne de "Call" et que vous exécutez le code en pas à pas

On commence déjà pas une incohérence (2 fois Declaration.Macro)

image image

Ensuite et comme nous avons le fichier
On comprend mieux l'erreur d'automation... qui du coup est logique puisque vous voulez supprimer la feuille qui à lancé la macro

image

C'est impossible directement et je ne comprends pas pourquoi vous voulez le faire

A+

Merci BrunoM45 pour tout retour !

Je supprime ma page pour remettre le formulaire à 0 (supprimer tout trace d'utilisation). Le formulaire est rempli a l'aide de "copier/coller" ce qui entraîne souvent des modifications de mise en page... chose que je ne veux pas !

Si vous avez d'autre idée je suis preneur ! J'ai déjà essayé de remplace "copier/tout type de collage" en "copier/collage de valeur" mais ça ne ma pas convaincu (j'avais des bug)

La solution est de régénère tout mon affichage...

Rechercher des sujets similaires à "erreur automation"