comment empêcher la selection de plusieurs feuilles
2 réponses
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.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Frédéric Sigonneau
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
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.
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
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.
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
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
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
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.
Bonjour,
Merci beaucoup.
"Frédéric Sigonneau" <nospam@nospam> a écrit dans le message de news:
eJo7QK1hIHA.4712@TK2MSFTNGP04.phx.gbl...
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
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.
"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
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.