Bonjour à tous,
J'ai développé un code qui me permettait de forcer le copier/coller par valeur lorsque l'utilisateur faisait un coller normal. Mais étant donné que c'est une macro customisée qui est appelée, il n'y a plus d'annulation (Ctrl+Z) possible par l'utilisateur de la feuille excel. Avez-vous une idée de comment le résoudre? (Je doute que ce soit possible.. A moins de passer par un autre système que le mien, auquel je n'aurais pas penser)
Voici le code:
Merci pour votre aide
J'ai développé un code qui me permettait de forcer le copier/coller par valeur lorsque l'utilisateur faisait un coller normal. Mais étant donné que c'est une macro customisée qui est appelée, il n'y a plus d'annulation (Ctrl+Z) possible par l'utilisateur de la feuille excel. Avez-vous une idée de comment le résoudre? (Je doute que ce soit possible.. A moins de passer par un autre système que le mien, auquel je n'aurais pas penser)
Voici le code:
Code:
' Fonction appelée lors d'un Workbook_Open()
' Add special commands when c/c restrictions enabled
Sub AddSpecialPasteCommand()
Application.OnKey Key:="^v", Procedure:="MyCopyByValue"
Application.CommandBars("Edit").FindControl(ID:=22).OnAction = "MyCopyByValue"
Application.CommandBars("Cell").FindControl(ID:=22).OnAction = "MyCopyByValue"
End Sub
' Function that replaces the normal copy with a copy by value, when c/c disabled
Sub MyCopyByValue()
On Error Resume Next
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End SubMerci pour votre aide