Bonjour,
Lorsque je lance la macro
Private Sub Workbook_Open()
Sheets("12-48b").Select
Application.OnKey "{F1}", "comm"
Application.OnKey "{F3}", "points"
End Sub
Excel fait ce que je lui demande mais me met un message d'erreur quand je ne suis pas dans la feuille "12-48b".
Donc comment interdire l'affichage du message d'erreur ?
Application.OnKey "{F3}", "points" renvoie à
Sub points()
Dim cell As Range
For Each cell In Selection
cell.Replace What:="a", Replacement:=":"
Next
End Sub
Désolé c'est long. Merci de m'aider 😉
Lorsque je lance la macro
Private Sub Workbook_Open()
Sheets("12-48b").Select
Application.OnKey "{F1}", "comm"
Application.OnKey "{F3}", "points"
End Sub
Excel fait ce que je lui demande mais me met un message d'erreur quand je ne suis pas dans la feuille "12-48b".
Donc comment interdire l'affichage du message d'erreur ?
Application.OnKey "{F3}", "points" renvoie à
Sub points()
Dim cell As Range
For Each cell In Selection
cell.Replace What:="a", Replacement:=":"
Next
End Sub
Désolé c'est long. Merci de m'aider 😉