Touche Impr Ecran

G

Giancarlo

Guest
Bonjour, je cherche à empêcher l'utilisateur d'utiliser la touche impr
écr dans excel. J'arrive à bloquer les autres touches mais pas celle
là. Je sais que cela n'empêchera pas des experts de passer outre, mais
cela me garantit que de simples utilisateurs e pourront pas imprimer
les données.
J'ai essayé le code suivant :
Sub BlocageTouches()
Application.OnKey "{PRTSC}", "Sorry"
End Sub
Sub Sorry()
MsgBox "Désolé, vous n'êtes pas autorisé à réaliser cette action!"
End Sub
Mais il ne fonctionne pas.
J'ai essayé aussi :
Private Sub ClearClipBoard(KeyCode As MSForms.ReturnInteger)
If KeyCode = 44 Then
OpenClipboard 0
EmptyClipboard
CloseClipboard
End If
End Sub

Private Sub CommandButton1_KeyUp(ByVal KeyCode As
MSForms.ReturnInteger, _
ByVal Shift As Integer)

ClearClipBoard KeyCode
End Sub

Private Sub TextBox1_KeyUp(ByVal KeyCode As MSForms.ReturnInteger, _
ByVal Shift As Integer)

ClearClipBoard KeyCode
End Sub
Mais je ne vois pas comment l'appliquer à l'applicatio Excel
(Onglets...)et je n'arrive pas à le faire fonctionner sur un
formulaire.
Help...
Merci par avance.
 

Discussions similaires

Réponses
29
Affichages
1 K

Membres actuellement en ligne

Statistiques des forums

Discussions
314 078
Messages
2 105 468
Membres
109 375
dernier inscrit
anderson2