comment empêcher la selection de plusieurs feuilles

Le
daniel
Bonjour,
Comment empêcher la sélection de plusieurs onglets. En effet il arrive
souvent que des utilisateurs sélectionnent accidentellement plusieurs
onglets et efface des données importantes.
Par avance, merci.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Frédéric Sigonneau
Le #5228061
Dans le module ThisWorkbook du classeur où tu veux empêcher les groupes de travail :

Private Sub Workbook_SheetSelectionChange _
(ByVal Sh As Object, ByVal Target As Range)
If ActiveWindow.SelectedSheets.Count > 1 Then Sh.Select
End Sub

FS
---
Frédéric Sigonneau
http://frederic.sigonneau.free.fr

Bonjour,
Comment empêcher la sélection de plusieurs onglets. En effet il arrive
souvent que des utilisateurs sélectionnent accidentellement plusieurs
onglets et efface des données importantes.
Par avance, merci.




daniel
Le #5227871
Bonjour,
Merci beaucoup.

"Frédéric Sigonneau" a écrit dans le message de news:

Dans le module ThisWorkbook du classeur où tu veux empêcher les groupes de
travail :

Private Sub Workbook_SheetSelectionChange _
(ByVal Sh As Object, ByVal Target As Range)
If ActiveWindow.SelectedSheets.Count > 1 Then Sh.Select
End Sub

FS
---
Frédéric Sigonneau
http://frederic.sigonneau.free.fr

Bonjour,
Comment empêcher la sélection de plusieurs onglets. En effet il arrive
souvent que des utilisateurs sélectionnent accidentellement plusieurs
onglets et efface des données importantes.
Par avance, merci.




Publicité
Poster une réponse
Anonyme