empecher la saisie !

[Sébastien]

Bonsoir le forum


J ai realise une petite 'appli' avec des Usf en plein ecran, un des but majeurs est que l utilisateur n est pas acces aux tableaux directement et surtout qu il ne puisse rien y saisir.

Or j ai besoin qu il puisse le consulter, j ai donc fait une macro qui permet de masquer l usf et de supprimer tout ce qui n est pas dans le tableau : barre d outil , ligne de formule,etc, et je re cree une barre d outil avec un bouton pour revenir dans l usf.

Le probleme est que je ne sais pas comment empecher la saisie pendant cette consultation.

Je voudrais egalement savoir comment bloquer la position d usf( ne puisse etre deplacer)

Merci d avance et Bon WE

Sébastien

 

[Zon]

Salut,

Pour empecher la saisie pourquoi ne pas protéger la feuille en question ?

worksheets(nomf).protect 'Lemotdepasse'

A+++

 

[JeanMarie]

Bonsoir

Il y a aussi Application.Interactive = False. Atention il faut obligatoirement remettre Application.Interactive = True à la fin de la sub. Au risque de ne plus avoir la possibilité de saisir des données dans la feuille.

@+Jean-Marie

 

[Sébastien]

Bonsoir
Merci à tous les deux d avoir repondu rapidement.
La solution de jean marie me plait plus, je l essayerais des lundi.
Par contre n est on pas oblige de sauvegarder et fermer le fichier pour avoir la protection avec la methode de zon, car j ai deja essayer et ce n avait pas ete tres concluant, a moins de j ai loupe un petit truc.

A +

Seb