Bonjour à toutes et tous
Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai
plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger"
avec la souris scroll.
Merci beaucoup.
Patrick.
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
Philippe.R
Bonsoir Patrick,
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'limite la zone activable à celle spécifiée entre parenthèses pour la feuille 1 Worksheets(1).ScrollArea = "a1:n30" End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002
"Crel" a écrit dans le message de news:%
Bonjour à toutes et tous Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger" avec la souris scroll. Merci beaucoup. Patrick.
Bonsoir Patrick,
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'limite la zone activable à celle spécifiée entre parenthèses pour la feuille 1
Worksheets(1).ScrollArea = "a1:n30"
End Sub
"Crel" <nospam-mouedra@club-internet.fr> a écrit dans le message de
news:%239hi8dVdDHA.2296@TK2MSFTNGP09.phx.gbl...
Bonjour à toutes et tous
Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai
plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger"
avec la souris scroll.
Merci beaucoup.
Patrick.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'limite la zone activable à celle spécifiée entre parenthèses pour la feuille 1 Worksheets(1).ScrollArea = "a1:n30" End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002
"Crel" a écrit dans le message de news:%
Bonjour à toutes et tous Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger" avec la souris scroll. Merci beaucoup. Patrick.
michdenis
Bonjour Crel,
Moi, j'utiliserais la procédure suivante :
Modifie le nom de la feuille selon tes besoins '------------------ Private Sub Workbook_Open() Worksheets("Feuil1").ScrollArea = "a1:J30" End Sub '------------------
Salutations!
"Crel" a écrit dans le message de news:% Bonjour à toutes et tous Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger" avec la souris scroll. Merci beaucoup. Patrick.
Bonjour Crel,
Moi, j'utiliserais la procédure suivante :
Modifie le nom de la feuille selon tes besoins
'------------------
Private Sub Workbook_Open()
Worksheets("Feuil1").ScrollArea = "a1:J30"
End Sub
'------------------
Salutations!
"Crel" <nospam-mouedra@club-internet.fr> a écrit dans le message de news:%239hi8dVdDHA.2296@TK2MSFTNGP09.phx.gbl...
Bonjour à toutes et tous
Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai
plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger"
avec la souris scroll.
Merci beaucoup.
Patrick.
Modifie le nom de la feuille selon tes besoins '------------------ Private Sub Workbook_Open() Worksheets("Feuil1").ScrollArea = "a1:J30" End Sub '------------------
Salutations!
"Crel" a écrit dans le message de news:% Bonjour à toutes et tous Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger" avec la souris scroll. Merci beaucoup. Patrick.
Crel
Merci beaucoup Phillipe, c'est très sympa de ta part. Patrick.
"Philippe.R" a écrit dans le message de news:
Bonsoir Patrick,
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'limite la zone activable à celle spécifiée entre parenthèses pour la feuille 1
Worksheets(1).ScrollArea = "a1:n30" End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002
"Crel" a écrit dans le message de news:%
Bonjour à toutes et tous Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger"
avec la souris scroll. Merci beaucoup. Patrick.
Merci beaucoup Phillipe, c'est très sympa de ta part.
Patrick.
"Philippe.R" <A_S_rauphil@wanadoo.fr> a écrit dans le message de news:
u2JvhMWdDHA.1728@TK2MSFTNGP09.phx.gbl...
Bonsoir Patrick,
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'limite la zone activable à celle spécifiée entre parenthèses pour la
feuille 1
"Crel" <nospam-mouedra@club-internet.fr> a écrit dans le message de
news:%239hi8dVdDHA.2296@TK2MSFTNGP09.phx.gbl...
Bonjour à toutes et tous
Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai
plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la
"bouger"
Merci beaucoup Phillipe, c'est très sympa de ta part. Patrick.
"Philippe.R" a écrit dans le message de news:
Bonsoir Patrick,
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'limite la zone activable à celle spécifiée entre parenthèses pour la feuille 1
Worksheets(1).ScrollArea = "a1:n30" End Sub
-- Amicales Salutations
Retirer A_S_ pour répondre. XL97 / XL2002
"Crel" a écrit dans le message de news:%
Bonjour à toutes et tous Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger"
avec la souris scroll. Merci beaucoup. Patrick.
Crel
Merci beaucoup Denis, Patrick.
"michdenis" a écrit dans le message de news:
Bonjour Crel,
Moi, j'utiliserais la procédure suivante :
Modifie le nom de la feuille selon tes besoins '------------------ Private Sub Workbook_Open() Worksheets("Feuil1").ScrollArea = "a1:J30" End Sub '------------------
Salutations!
"Crel" a écrit dans le message de news:%
Bonjour à toutes et tous Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger" avec la souris scroll. Merci beaucoup. Patrick.
Merci beaucoup Denis,
Patrick.
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
ObjtilXdDHA.1932@TK2MSFTNGP10.phx.gbl...
Bonjour Crel,
Moi, j'utiliserais la procédure suivante :
Modifie le nom de la feuille selon tes besoins
'------------------
Private Sub Workbook_Open()
Worksheets("Feuil1").ScrollArea = "a1:J30"
End Sub
'------------------
Salutations!
"Crel" <nospam-mouedra@club-internet.fr> a écrit dans le message de
news:%239hi8dVdDHA.2296@TK2MSFTNGP09.phx.gbl...
Bonjour à toutes et tous
Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai
plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger"
avec la souris scroll.
Merci beaucoup.
Patrick.
Modifie le nom de la feuille selon tes besoins '------------------ Private Sub Workbook_Open() Worksheets("Feuil1").ScrollArea = "a1:J30" End Sub '------------------
Salutations!
"Crel" a écrit dans le message de news:%
Bonjour à toutes et tous Je désire bloquer la page, en fait, une page d'accueil sur laquelle j'ai plusieurs boutons macro, afin qu'un utilisateur n'arrive pas à la "bouger" avec la souris scroll. Merci beaucoup. Patrick.
