OVH Cloud OVH Cloud

Bloquage de cellules

18 réponses
Avatar
Monsieur-Patate
Bonjour, je post car je cherche à bloquer toutes les cellules d une feuille
sauf 2! Attention je connais déjà le système de protection mais ce n est pas
ce que je recherche en fait je souhaiterais que sur la feuille on ne puisse
allerque sur ces 2 cellules sans meme pouvoir sélectionner les autres. J'ai
besoin de cela pour que l'utilisateur de mon outil arrive directement au bon
endroit pour entrer les donnéés lorsqu'il ouvre la feuille et qu'il puisse
naviguer entre ces 2 cellules directement avec la touche Tab.
Voilà j 'éspère avoir eté à peu près clair!
Merci pour vos suggestions :-D

10 réponses

1 2
Avatar
Mich
bonjour Monsieur patate :)
A chaud comme ca je ne vois pas trop...

Pourquoi tu ne passe pas par un user form dans lequel il y aurait 2 champs
(correpondant à tes deux cellules). Par défaut, l'accés à la feuille serait
impossible pour tes utilisateurs et ils seraient donc contraints de
travailler uniquement sur les 2 champs proposés...
Peut-être que d'autres intervenants auront une autre idée?
bon courage,
Mich

"Monsieur-Patate" wrote:

Bonjour, je post car je cherche à bloquer toutes les cellules d une feuille
sauf 2! Attention je connais déjà le système de protection mais ce n est pas
ce que je recherche en fait je souhaiterais que sur la feuille on ne puisse
allerque sur ces 2 cellules sans meme pouvoir sélectionner les autres. J'ai
besoin de cela pour que l'utilisateur de mon outil arrive directement au bon
endroit pour entrer les donnéés lorsqu'il ouvre la feuille et qu'il puisse
naviguer entre ces 2 cellules directement avec la touche Tab.
Voilà j 'éspère avoir eté à peu près clair!
Merci pour vos suggestions :-D


Avatar
Rai
Bonjour,

La dernière fois que j'ai parlé à Monsieur-Patate, c'était en jouant avec mes enfants ... mais Excel ne l'intéressait pas franchement ;oD

Assez plaisanté.

Si tu utilises la fonction de protection de la feuille, tu as aussi le choix d'interdire toute sélection de cellule verrouillée.
Outils / Protection / Protèger la feuille
puis décocher la case 'sélectionner les cellules verrouillées"

En quoi cela ne conviendrait pas à ta demande ?

Cordialement

Rai

"Monsieur-Patate" a écrit dans le message de news:
Bonjour, je post car je cherche à bloquer toutes les cellules d une feuille
sauf 2! Attention je connais déjà le système de protection mais ce n est pas
ce que je recherche en fait je souhaiterais que sur la feuille on ne puisse
allerque sur ces 2 cellules sans meme pouvoir sélectionner les autres. J'ai
besoin de cela pour que l'utilisateur de mon outil arrive directement au bon
endroit pour entrer les donnéés lorsqu'il ouvre la feuille et qu'il puisse
naviguer entre ces 2 cellules directement avec la touche Tab.
Voilà j 'éspère avoir eté à peu près clair!
Merci pour vos suggestions :-D


Avatar
bartez
à mon avis le plus simple c'est de Dévérouiller tes 2 cellules
puis faire :

'Protéger la feuille
ActiveSheet.Protect Password:="Mon_mot_de_Pass", DrawingObjects:=True,
Contents:=True, Scenarios:=True

'Permettre seulement l'accès aux cellules dévérouillées
ActiveSheet.EnableSelection = xlUnlockedCells

@+ bartez

"Monsieur-Patate" a écrit dans
le message de news:
Bonjour, je post car je cherche à bloquer toutes les cellules d une
feuille

sauf 2! Attention je connais déjà le système de protection mais ce n est
pas

ce que je recherche en fait je souhaiterais que sur la feuille on ne
puisse

allerque sur ces 2 cellules sans meme pouvoir sélectionner les autres.
J'ai

besoin de cela pour que l'utilisateur de mon outil arrive directement au
bon

endroit pour entrer les donnéés lorsqu'il ouvre la feuille et qu'il puisse
naviguer entre ces 2 cellules directement avec la touche Tab.
Voilà j 'éspère avoir eté à peu près clair!
Merci pour vos suggestions :-D


Avatar
E KERGRESSE
Bonjour,

Une piste. Je pense que tu pourrais utiliser la macro évènementielle
Worksheet_Selectionchange selon le modèle ci-dessous :

Private sub Worksheet_SelectionChange(ByVal ZZ as Range)
If Intersect(ZZ,Range("X1:X2")) is nothing then
On error resume next
Activesheet.Range("X1").select
Exit sub
End if

End sub

X1 et X2 sont tes deux cellules dans lesquelles tu veux obliger à saisir.

Si l'utilisateur sélectionne une autre cellule que X1 ou X2, alors la macro
renvoi sur la cellule X1

Il faut aussi qu'à l'ouverture de ta feuille, tu pointes sur X1 ou X2.

Cordialement.

"Monsieur-Patate" a écrit dans
le message de news:
Bonjour, je post car je cherche à bloquer toutes les cellules d une
feuille

sauf 2! Attention je connais déjà le système de protection mais ce n est
pas

ce que je recherche en fait je souhaiterais que sur la feuille on ne
puisse

allerque sur ces 2 cellules sans meme pouvoir sélectionner les autres.
J'ai

besoin de cela pour que l'utilisateur de mon outil arrive directement au
bon

endroit pour entrer les donnéés lorsqu'il ouvre la feuille et qu'il puisse
naviguer entre ces 2 cellules directement avec la touche Tab.
Voilà j 'éspère avoir eté à peu près clair!
Merci pour vos suggestions :-D


Avatar
Joël GARBE
Bonjour,

Pour "débloquer" les cellules : Menu Format, Cellule Onglet Protection et
décocher "Verrouillée"

Ensuite, dans le module privée de la feuille :

Private Sub Worksheet_Activate()
activesheet.protect
activesheet.enableselection=1
End Sub

Tiens-nous au courant ;-)

Bon week-end !

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Monsieur-Patate" a écrit dans
le message de news:
Bonjour, je post car je cherche à bloquer toutes les cellules d une
feuille
sauf 2! Attention je connais déjà le système de protection mais ce n est
pas
ce que je recherche en fait je souhaiterais que sur la feuille on ne
puisse
allerque sur ces 2 cellules sans meme pouvoir sélectionner les autres.
J'ai
besoin de cela pour que l'utilisateur de mon outil arrive directement au
bon
endroit pour entrer les donnéés lorsqu'il ouvre la feuille et qu'il puisse
naviguer entre ces 2 cellules directement avec la touche Tab.
Voilà j 'éspère avoir eté à peu près clair!
Merci pour vos suggestions :-D


Avatar
RaMA
Bonjour

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.ScrollArea = "OnlyCellAuthorized" 'plage de mes 2 cellules
ainsi nommées
End Sub

Salutations
RaMa


--
.
"Monsieur-Patate" a écrit dans
le message de news:
Bonjour, je post car je cherche à bloquer toutes les cellules d une
feuille
sauf 2! Attention je connais déjà le système de protection mais ce n est
pas
ce que je recherche en fait je souhaiterais que sur la feuille on ne
puisse
allerque sur ces 2 cellules sans meme pouvoir sélectionner les autres.
J'ai
besoin de cela pour que l'utilisateur de mon outil arrive directement au
bon
endroit pour entrer les donnéés lorsqu'il ouvre la feuille et qu'il puisse
naviguer entre ces 2 cellules directement avec la touche Tab.
Voilà j 'éspère avoir eté à peu près clair!
Merci pour vos suggestions :-D


Avatar
Monsieur-Patate
Merci beaucoup à tout le monde rien que pour votre acceuil déjà et aussi pour
vos propositions car g trouvé ce que je voulais. C la solution de Rai qui me
convient parfaitement!! Encore merci et à bientot maintenant que g découvert
ce petit firum je v plus le lâcher :-P
Avatar
jps
comment ça ce petit forum, monsieur patate?
évidemment que dans l'immensité de la planète internautique, il ne pèse pas
grand'chose mais de par l'esprit des chaouches qui en font les beaux jours,
c'est -n'ayons pas peur des mots- le plus grand (dans la mesure où tu fais
abstraction de tous ces pollueurs que je ne cesse de fustiger tant ils
balancent des HS à tire larigot)
jps

"Monsieur-Patate" a écrit dans
le message de news:
Merci beaucoup à tout le monde rien que pour votre acceuil déjà et aussi
pour

vos propositions car g trouvé ce que je voulais. C la solution de Rai qui
me

convient parfaitement!! Encore merci et à bientot maintenant que g
découvert

ce petit forum je v plus le lâcher :-P


Avatar
RaMA
Bonsoir JPS
lit bien cet extrait du TLF
http://atilf.atilf.fr/Dendien/scripts/tlfiv5/visusel.exe?11;s54746290;r=1;nat=;sol=0;

Salutations
RaMa

--
.
"jps" a écrit dans le message de
news: OplvQ$
comment ça ce petit forum, monsieur patate?
évidemment que dans l'immensité de la planète internautique, il ne pèse
pas
grand'chose mais de par l'esprit des chaouches qui en font les beaux
jours,
c'est -n'ayons pas peur des mots- le plus grand (dans la mesure où tu fais
abstraction de tous ces pollueurs que je ne cesse de fustiger tant ils
balancent des HS à tire larigot)
jps

"Monsieur-Patate" a écrit dans
le message de news:
Merci beaucoup à tout le monde rien que pour votre acceuil déjà et aussi
pour

vos propositions car g trouvé ce que je voulais. C la solution de Rai qui
me

convient parfaitement!! Encore merci et à bientot maintenant que g
découvert

ce petit forum je v plus le lâcher :-P





Avatar
jps
heu......pour cela, raoul

Il le fit venir et lui dit : « Vieux dégoûtant! va, je connais ton vice.
Vends-moi ton corps (pour quand tu seras mort, s'entend) service pour
service. » Vous devez bien penser que notre saligaud accepta tout de suite.
Ayant de l'or, il but à tire-larigot un jus moins insolite.

mais comment as-tu deviné que j'avais tenu ce langage à pierre CFI lors de
notre séjour à saulieu?
jps

"RaMA" a écrit dans le message de
news:ui%
Bonsoir JPS
lit bien cet extrait du TLF

http://atilf.atilf.fr/Dendien/scripts/tlfiv5/visusel.exe?11;s54746290;r=1;nat=;sol=0;


Salutations
RaMa

--
.
"jps" a écrit dans le message de
news: OplvQ$
comment ça ce petit forum, monsieur patate?
évidemment que dans l'immensité de la planète internautique, il ne pèse
pas
grand'chose mais de par l'esprit des chaouches qui en font les beaux
jours,
c'est -n'ayons pas peur des mots- le plus grand (dans la mesure où tu
fais


abstraction de tous ces pollueurs que je ne cesse de fustiger tant ils
balancent des HS à tire larigot)
jps

"Monsieur-Patate" a écrit
dans


le message de news:
Merci beaucoup à tout le monde rien que pour votre acceuil déjà et
aussi



pour
vos propositions car g trouvé ce que je voulais. C la solution de Rai
qui



me
convient parfaitement!! Encore merci et à bientot maintenant que g
découvert

ce petit forum je v plus le lâcher :-P









1 2