ludomontbaze
Messages postés37Date d'inscriptionvendredi 13 avril 2007StatutMembreDernière intervention20 juin 2008
-
1 juin 2007 à 08:09
JM247L
Messages postés443Date d'inscriptionmardi 27 mars 2007StatutMembreDernière intervention 1 mars 2011
-
1 juin 2007 à 17:50
Bonjour a tous,
je travaille sous vba Excel et je voudrai interdire l'utilisation des onglets dans le classeur car l'utilisateur ne doit pas utiliser certaines feuilles.
j'utilise ce code:
Worksheets("param1").Visible = True
Worksheets("param1").Visible = false
mais quand la feuille n'est pas visible, on ne peut pas modifier les valeurs de cette feuille et cela ne me va pas.
jrivet
Messages postés7392Date d'inscriptionmercredi 23 avril 2003StatutMembreDernière intervention 6 avril 201260 1 juin 2007 à 08:36
Salut,
Worksheets("Feuil2").Visible = False
'Ceci donne peu etre une erreur
'Worksheets("Feuil2").Select
'Mais cela NON
Worksheets("Feuil2").Range("A1").Value = "TOTO3"
, ----
[code.aspx?ID=41455 By Renfield]
IL n'est pas nécessaire de selectionner une feuille pour atteindre et modifier ses cellules
cs_lermite222
Messages postés492Date d'inscriptionjeudi 5 avril 2007StatutMembreDernière intervention 2 juillet 20124 1 juin 2007 à 16:29
bonjour,
et en mettant ta macro dans l'événement Workbook_Open
Tu n'aura plus d'erreur,
Pour que les valeur change si tu change de classeur il y a aussi Activate et Deactivate.
A+
louis
JM247L
Messages postés443Date d'inscriptionmardi 27 mars 2007StatutMembreDernière intervention 1 mars 20112 1 juin 2007 à 17:48
Bonsoir,
Pourquoi ne pas afficher la feuille quand le code le necessite et la caché ensuite en affectant "xlVeryHidden" a visible de manière à ce que le menu Excel ne puisse permettre à l'utilisateur d'afficher cette feuille
Une autre possibilité est de gérer les accés aux onglets par une code associé aux feuilles interdites dans l'évenement Worksheet_Activate
Private Sub Worksheet_Activate()
Worksheets("Feuil2").Select
End Sub
La gestion des personnes autorisées se fera par "Environ("UserName")
Bonne fin de semaine
JML