limiter déplacements souris

limiter déplacements souris - VB/VBA/VBS - Programmation

Marsh Posté le 01-10-2005 à 16:31:31    

Salut !
 
J'ai un classeur composé de trois feuilles. Dans la feuille 1 je voudrais limiter les déplacements de la souris à certaines cellules ou plages de cellules, et lui interdire par conséquent l'accès aux autres cellules. Comment faire, par exemple, pour limiter ses déplacements aux plages A1:A30, C1:C30 et E1:E30 ?  
 
Il est important, pour la bonne utilisation de mon classeur, que ces restrictions n'affectent que le feuille 1, et que les déplacements de la souris restent libres dans les deux autres feuilles du même classeur.  
 
Merci au vrai pro qui fournira la solution complète à ce (très difficile) problème.

Reply

Marsh Posté le 01-10-2005 à 16:31:31   

Reply

Marsh Posté le 01-10-2005 à 16:32:49    

Excuse moi ... Mais si tu bloques la souris ... On fera comment pour changer de page?


---------------
Si la vérité est découverte par quelqu'un d'autre,elle perd toujours un peu d'attrait
Reply

Marsh Posté le 01-10-2005 à 16:41:04    

Si tu relis bien mon post, surtout la dernière phrase, tu remarqueras que je demande l'aide et le conseil d'un pro. Je ne m'adresse pas à aux benêts qui ne comprennent même pas la question que je pose et qui m'en posent d'autres pour me faire perdre mon temps.

Reply

Marsh Posté le 02-10-2005 à 11:27:12    

Bonjour,
 
Je ne pense pas que tu puisses limiter les déplacements de la souris au niveau d'excel... De plus si tu limites à A1:A30 tu ne pourras plus aller en C1:C30 ou changer d'onglet voir même ne plus rien faire d'autre !
 
Si tu ne veux pas que les utilisateurs aillent ailleurs que dans les cellules vouluent mieux vaut locker les autres cellules...
 
Fred
 

Reply

Marsh Posté le 02-10-2005 à 11:48:09    

Roidag a écrit :

Si tu relis bien mon post, surtout la dernière phrase, tu remarqueras que je demande l'aide et le conseil d'un pro. Je ne m'adresse pas à aux benêts qui ne comprennent même pas la question que je pose et qui m'en posent d'autres pour me faire perdre mon temps.


 
Tu remarqueras que le "benet" en question n'est pas celui qui pose une question qu'il est apperemment le seul a comprendre. Le benet n'est pas celui qui envoie chier les gens qui tentent de l'aider (en perdant LEUR temps) a resoudre un probleme que l'auteur du message a meme pas ete foutu d'expliquer jusqu'au bout .
 
Sur ce au revoir


Message édité par esox_ch le 02-10-2005 à 11:48:28

---------------
Si la vérité est découverte par quelqu'un d'autre,elle perd toujours un peu d'attrait
Reply

Marsh Posté le 02-10-2005 à 11:54:13    

Voici une macro pour le faire :
 
ActiveSheet.Unprotect
    ActiveSheet.Protection.AllowEditRanges.Add Title:="Plage1", Range:=Range( _
        "A1:A30" )
    ActiveSheet.Protection.AllowEditRanges.Add Title:="Plage2", Range:=Range( _
        "C1:C30" )
    ActiveSheet.Protection.AllowEditRanges.Add Title:="Plage3", Range:=Range( _
        "E1:E30" )
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True
 
Juste ca à mettre dans l'open du workbook.
 
Par défaut il n'y à pas de mot de passe.
Donc aller dans outil protection de la feuille ( Oter = Pas de password ) Puis en mettre un !
 
ainsi à chaque ouverture du classeur les utilisateurs ne pourons modifier que les cellule que tu veux....
 
Fred

Reply

Marsh Posté le 03-10-2005 à 15:41:43    

Roidag c'est pas du tout professionnel ce que tu fais  
Bon travail a tous et pour esox_ch je remercie a sa place.

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed