Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Droit d'accès à partir d'un Combobox

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Leskwal
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
Trier par date Trier par votes
Re : Droit d'accès à partir d'un Combobox

Re à tous

J'ai appliqué vos propositions sur mon application.

Ça marche pas exactement comme je veux, les boutons ne s'activent pas comme je le souhaite.
A la différence de l'exemple où il n'y a que 3 boutons mon appli en à 5.

Ce que je ne comprends pas :

Code: 
Set r = [Utilisateurs_Log].Find("*-*", After:=r, SearchDirection:=xlPrevious)

CommandButton1.Enabled = InStr(r, "TECHNICIENS") = 0
CommandButton2.Enabled = InStr(r, "ASSISTANTES") = 0

Pourrais-je avoir la traduction Francisée pour comprendre la logique ? 😀

Merci d'avance

Pascal
 
Vote positif 0 Vote négatif
Re : Droit d'accès à partir d'un Combobox

Bonsoir Leskwal,

Mettre la propriété Enabled des 5 boutons à True.

Puis cette macro dans l'USF Boutons_a_activer :

Code: 
Private Sub UserForm_Initialize()
Set r = [Utilisateurs_Log].Find("*-*", After:=r, SearchDirection:=xlPrevious)
If InStr(r, "TECHNICIENS") Then
  CommandButton1.Enabled = False
  CommandButton4.Enabled = False
ElseIf InStr(r, "ASSISTANTES") Then
  CommandButton1.Enabled = False
  CommandButton3.Enabled = False
  CommandButton5.Enabled = False
End If
End Sub

A+
 

Pièces jointes

Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

  • Question Question
XL 2019 Lenteur pour charger une ComboBox à l'ouverture d'un classeur
2
Réponses
19
Affichages
696
job75
  • Question Question
Autres XL2024. Pour PatrickToulon, clic droit dans VBE.
Réponses
4
Affichages
193
jeff1494
D
  • Résolu(e)
XL 2016 Alimenter une combobox sur une feuille de calcul
Réponses
11
Affichages
381
dgil37
D
D
  • Résolu(e)
XL 2016 macro effacer en plusieurs en fonction d'un autre cellule
Réponses
13
Affichages
297
job75
F
  • Question Question
XL 2019 Demande aide formule afficher montant le plus grand.
Réponses
2
Affichages
152
Fidmo
F
C
  • Résolu(e)
Microsoft 365 bouton pour un userform
Réponses
14
Affichages
581
C'est Génial
C
  • Résolu(e)
XL 2019 Comment modifier ces codes VB de sorte que le clic droit sur un commentaire présent, permette l'édition et non cette erreur (capture) ?
Réponses
6
Affichages
250
anthoYS
A
  • Question Question
XL 2010 Filtrer un Combobox en VBA excel
2 3
Réponses
43
Affichages
3 K
Dranreb
C
  • Question Question
Microsoft 365 graphique genre camembert à partir d'un minitableau (matrice)
Réponses
10
Affichages
441
chris427
C
L
  • Résolu(e)
Microsoft 365 Erreur d'exécution 1004 : la méthode select de la classe Worksheet a échoué
Réponses
7
Affichages
260
LaurentVasseur
L
B
  • Question Question
Microsoft 365 Cadrillage automatique
Réponses
13
Affichages
430
bsalv
B
J
  • Résolu(e)
XL 2021 Filtre combobox
Réponses
5
Affichages
416
Dranreb
  • Question Question
XL 2016 Cumul des heures par numéro de semaine.
Réponses
4
Affichages
198
halecs93
K
  • Résolu(e)
Microsoft 365 Export automatique
2
Réponses
15
Affichages
447
klemasson
K
J
  • Question Question
Microsoft 365 Sélectionner plage nommée via un comboBox
Réponses
3
Affichages
408
fanfan38
M
  • Question Question
Microsoft 365 Création tableur menus repas
Réponses
8
Affichages
294
mb71
M
  • Résolu(e)
Microsoft 365 Saisie d'un userform vers listes
Réponses
10
Affichages
306
jcf6464
  • Question Question
XL 2016 A partir USERFORM remplir plusieurs onglets
Réponses
10
Affichages
468
fanfan38
F
  • Question Question
XL 2016 Recherchev élaboré
Réponses
4
Affichages
220
laurent950
  • Résolu(e)
XL 2021 Pb Sommeprod
Réponses
13
Affichages
306
Phoenix23
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…