[VBA-E] Undo après action bouton ne fonctionne pas

**TicTacToe** · 26/04/2006, 11h21

Bonjour

Dans une feuille Excel, j'ai créé un bouton pour effectuer des actions sur des cellules. J'ai donc du code associé à ce bouton pour effectuer ces actions. Tout est OK de ce coté là.

Par contre, Après action sur ce bouton, le Undo Excel ne fonctionne pas...
dommage

Y-a-t-il une solution à effectuer dans ma procédure associée à mon bouton, pour rendre le Undo opérationnel ?

Merci d'avance !

**ouskel'n'or** · 26/04/2006, 11h24

Je crois bien me souvenir que le undo, (vba97) ne concerne que la dernière action effectuée. Ce n'est pas ton problème ?
Tu dis. En attendant, je regarde ce que j'ai.

A+

**ouskel'n'or** · 26/04/2006, 11h28

Voilà, j'ai retrouvé
Tu dois définir CanUndo = true
J'ai ça dans une form, j'espère que ça existe pour un bouton dans une feuille de calcul

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
Private Sub BoutonAnnuler_Click()
    If GrilleDeSaisie.CanUndo = True Then
            GrilleDeSaisie.UndoAction
        Else
            MsgBox "Annulation impossible ici.", 0, "Grille de Saisie"
    End If
End Sub

Tu dis

A+

**ouskel'n'or** · 26/04/2006, 11h37

Autant pour moi. La syntaxe que je t'ai donnée fonctionne pour une form, pas pour une feuille de calcul.
Ce srait "Application.undo" mais qui ne fonctionne pas.
J'ai vu ça dans l'aide :

Cette méthode n'annule que la dernière opération commandée par l'utilisateur avant l'exécution de la macro et doit figurer en première ligne dans la macro. Elle ne peut être utilisée pour annuler des commandes Visual Basic.

Bref, je te laisse lire et ensuite supprimerai mes réponses

A+

**AlainTech** · 26/04/2006, 11h39

Faut pas les supprimer!

C'est intéressant à savoir.

**TicTacToe** · 26/04/2006, 12h03

Merci pour les infos rapides, mais je crois que ce n'est pas ce que je cherche, j'ai du mal m'exprimer.

Après le click sur le bouton 'MonBouton', j'execute une série d'actions qui modifient mes cellules de ma feuilles. -> ca c'est OK.

Ensuite, ce que je souhaiterais, c'est que l'utilisateur puisse faire marche arrière après avoir cliqué sur ce bouton -> retrouver sa feuille telle qu'elle était avant le click bouton.

(Ceci bien sur en cliquant sur le bouton Undo standard de Excel, ou à la rigueur si cela est indispensable sur un bouton propriétaire qui est à créer).

Merci pour les réponse en tout cas

!

**ouskel'n'or** · 26/04/2006, 12h15

Tu as la réponse là "Elle ne peut être utilisée pour annuler des commandes Visual Basic."
Désolé de ne pouvoir être plus constructif.
Maintenant, tu as la solution de copier ta feuille, d'utiliser "Calculation" pour le définir en manuel, et ensuite lancer "Calculate" pour la seule feuille copiée que tu supprimeras une fois que tu n'en auras plus besoin.
Une solution plus simple ? J'ai pas

A+

Salut Alain, donc j'efface pas ?

**TicTacToe** · 26/04/2006, 12h53

Merci

Tu as la réponse là "Elle ne peut être utilisée pour annuler des commandes Visual Basic."

J'avais bien vu ceci, mais c'était dans le contexte d'un Undo Excel appelé via une macro si j'ai bien compris. (donc autrement dit, exectement comme si j'appuyais sur le bouton Undo Excel manuellement).
La macro vérifie si le document est bien "UndoAble" en plus du Undo.

Il spécifie que ce Undo (donc celui d'Excel) ne fait pas de Undo sur les actions cellules via Macro (mon cas).

En conclusion, la citation ne fait que confirmer ce que j'ai constaté (pas de undo sur actions via macro).

Mais il ne dit pas que c'est impossible à implémenter ??!!
ou alors j'ai rien compris

Merci en tout cas de l'interet