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

ouverture sélective de UF

  • Initiateur de la discussion Initiateur de la discussion paul87
  • 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 !

paul87

XLDnaute Impliqué
Bonjour à tous , Bonjour le Forum
je souhaiterai réaliser une ouverture sélective de UF..en fonction de la cellule dans laquelle on click...
de plus et en fonction de la cellule choisie, l'un ou l'autre des combobox serait inactif ou bloqué..pas de selection possible (dans le UF 1)
Pour l'instant et dans le fichier de brouillon que j'ai joint, je n'arrive que à l'ouverture du UF1 et pas de blogage du combobox en fonction de la sélection.
Si quelqu'un pouvait m'aiguiller..
Merci
 

Pièces jointes

Re : ouverture sélective de UF

Salut Paul


modifie ton code en y ajoutant (en bleu)

Code:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
[COLOR="Blue"]ici tu doit tester le contenu de la cellule qui se trouve à gauche de ton activecell
si c'est "TESTA", tu met à "False" la proriété 'visible' de la combo2
si c'est "TESTB", tu fais la même chose dans ta combo1
mais n'oublie pas de les remettre "visible=true" pour la prochaine utilisation[/COLOR]
UserForm1.Show
End Sub
 
Re : ouverture sélective de UF

Bonjour
J'ai modifier la macro de la feuille "test" comme suit:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 4 Then
If Cells(Target.Row, Target.Column - 1).Value = "Test A" Then
UserForm1.ComboBox2.Visible = False
UserForm1.ComboBox1.Visible = True
Else
UserForm1.ComboBox1.Visible = False
UserForm1.ComboBox2.Visible = True
End If
UserForm1.Show
Else
UserForm2.Show
End If
End Sub
A+ François
 
Re : ouverture sélective de UF

Re bonjour,
Merci a vous phlaurent55 et fanfan38,
après quelques adaptation sur mon appli finale, ça marche à merveille...
c'est top..!!! Nickel!!
Grand merci a Vous
Ce Forum est vraiment FOR MI DA BLE...!!!!!
 
- 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

C
Réponses
4
Affichages
2 K
C
A
Réponses
0
Affichages
762
Alghorn
A
B
Réponses
6
Affichages
3 K
Banshor
B
O
Réponses
3
Affichages
820
K
Réponses
0
Affichages
3 K
K
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…