Attributions Utilisateurs

Re : Attributions Utilisateurs

Re,

pour ce qui est marqué sur le Userform, il faut simplement le supprimer lorsque vous êtes dans l'éditeur de visual basic. (Alt + F11, sélectionner l'userform dans la colonne de gauche, cliquer sur le textbox et suppr😉

pour les feuilles de niveau 2 c'est dans cette macro qu'il faut agir (voir les écrits en rouge):

Private Sub MaMacro(Niveau As Byte)
Dim i As Integer
Dim LeMois As String
Dim MyYear
Select Case Niveau
Case 1 'c'est en dessous de cette ligne que vous devez rajouter les feuilles que vous voulez laisser voir par le niveau 2.
du genre: with (le nomdelafeuille)
.visible = True
.activate
end with
With F2050
.Visible = True
.Activate
End With
With F2051
.Visible = True
.Activate
End With

MaSecondeMacro Me.Txb_ID_Util 'Transmission d'arguments pour Pias
Unload Me

Case 2
For i = 3 To Sheets.Count
Sheets(i).Visible = True
Next i
MyYear = Date
LeMois = Format(Month(MyYear) + 1, "mmmm")


For i = 3 To Sheets.Count
If UCase(Sheets(i).Name) = UCase(LeMois) Then
Sheets(i).Activate
GoTo 2
End If
Next i
2 MaSecondeMacro Me.Txb_ID_Util 'Idem (vu que le USF reste Ouvert je n'en ai pas besoin, mais pour le fun
Unload Me
Case 3
Call Admin 'Appel de la macro Admin en Module1
End Select
End Sub

le fichier est maintenant trop lourd ?????
va falloir : - soit être patient à l'utilisation
- soit repenser l'ensemble de utilisation d'Excel (voir si on ne peu pas faire autrement ( gérer plusieurs classeurs !!!) mais là ça dépasse mes compétences !!))
- soit passer à un outil de traitement de base de données.(genre access, que je ne connais suffisement pour vous aider.)

bonne après midi, je serais de retour ce soir tard.

Re : Attributions Utilisateurs

RE,
merci.
C'es vraiment bien.
A bientôt

Re : Attributions Utilisateurs

Bonsoir,
Je n'arrive pas à retrouver l'userform de l'interface.
Il doit être masqué par la macro
J'aimerais pouvoir changer le "GO TO USERFORM"
Merci svp

Re : Attributions Utilisateurs

Re,

décidément, nous ne parlons pas le même langage, car j'ai du mal à saisir votre nouveau PB.
auriez vous la gentillesse de reformuler SVP;

Re : Attributions Utilisateurs

Excusez moi,
Je ne retrouve pasla feuille Interface quand j'affiche l'éditeur de macro.
J'aimerais adapter mon dossier, et changer le "Go to Userform".
Merci

Re : Attributions Utilisateurs

Re,

désolé....
ça y est j'ai pigé votre blème,
alors, on repasse par Alt + F11
dans la colonne de gauche on sélectionne la feuille interface, clique droit et afficher l'objet.

pour modifier le "GO TO USERFORM" , c'est un bouton de la boite à outil de controle ....
donc affichage/barre d'outil/boite à outil de controle/ puis cliquer sur l'équerre en haut à gauche de cette barre d'outil.
clique droit sur le bouton et objet bouton de commande/édition.

après ceci, @plus

Re : Attributions Utilisateurs

Oui, mais....

Si OLYMP paie l'apéro. Jacques, je te prends au passage et on fait un dépannage surprise...

Des fois, je ne suis pas tout...(c'est bien, et ensuite rien ne fonctionne...., relire au dessus)

Re : Attributions Utilisateurs

Re le fil,

jeanpierre sans vouloir te parler d'alzeimer, nous ne sommes plus à l'apéro, maintenant c'est le dijo, ou le cocktail en boite !!!

je sais dans quelques temps c'est peut être moi qui perdrait le fil 😀😀

Re : Attributions Utilisateurs

Re,

dis moi mon bon jeanpierre, je viens d'acquérir un disque dur externe pour ne plus pleurer en cas de crash de mon pc.
que me conseil tu de faire,
- faire une image du pc et de ses 5 partitions
- copier simplement toutes les partitions sur le HDD externe
- utiliser l'utilitaire de vindowse ???

Re : Attributions Utilisateurs

Merci,
Je dois être fatigué. Je pu le faire.
Merci

Re : Attributions Utilisateurs

Bonjour MacPoy, quand tu dis:

Case 1 'c'est en dessous de cette ligne que vous devez rajouter les feuilles que vous voulez laisser voir par le niveau 2.
du genre: with (le nomdelafeuille)

j'ai essayé mais je n'arrive pas à ajouter une feuille appelée "Boulons" par exemple, peux-tu m'écrire la ligne STP.

Merci

Re : Attributions Utilisateurs

Bonjour, Jeanpierre,

J'ai essayé ton exemple, qui fonctionne bien, mais la feuille "Données" reste cachée ?

Comment changer le mot de passe ?

Re : Attributions Utilisateurs

bonjour le forum, les participants au fil,

degap05

Case 1 'c'est en dessous de cette ligne que vous devez rajouter les feuilles que vous voulez laisser voir par le niveau 2.
du genre: with (le nomdelafeuille)

j'ai essayé mais je n'arrive pas à ajouter une feuille appelée "Boulons" par exemple, peux-tu m'écrire la ligne STP.

Cliquez pour agrandir...

dans Excel une feuille porte 2 noms.
Ex: Feuil1 et entre paranthèse le nom de son onglet (Boulons)
en VBA suivant que l'on utilise Feuil1 ou Boulons l'appel de la feuille ne s'écrit pas pareil. ( pour un même résultat !!)
exemple pour activer la feuille :
Sheets("Boulons").Activate ou
Feuil1.Activate
c'est pour cela que je remplace toutes les appellation Feuil1, feuil2 ,,,,, etc
par un nom plus significatif
donc dans votre cas (en supposant que l'onglet Boulons s'appel : feuil1)

Case 1
with Feuil1
.visible = True
.activate
end with

ou

Case 1
with sheets("Boulons")
.visible = True
.activate
end with

pour l'histoire de la feuille données, je me replonge dans le classeur et vous tient au courant.

bonne journée

Re : Attributions Utilisateurs

Re,

dans la version du classeur que je possède, il n'y à pas de feuille données !!
donc elle ne peut être visible 😕

Re : Attributions Utilisateurs

Bonjour et bon dimanche,

Je te joins l'exemple que tu as fourni.

Pour la feuille "données", elle se trouve sur l'exemple de "jeanpierre"🙁 je crois........

Merci encore