liste déroulant dans UserForm

Odesta

XLDnaute Impliqué

• 28 Avril 2010

• #2

Re : liste déroulant dans UserForm

Bonjour
On peut tout à fait vous aider, mais il nous faudra votre fichier pour comprendre.

La valeur chercher serai surement listview1.Selected, qui renvoie l'item sélectionné, pour une liste déroulante s'appellant listview1

 

Vote positif 0 Vote négatif

M

minna

XLDnaute Nouveau

• 28 Avril 2010

• #3

Re : liste déroulant dans UserForm

Bonjour Odesta,

Finalement cette partie j'ai mis sur la feuille Excel.
Si je choisi dans la liste déroulante le Nom2, comment on peut faire disparaitre (désactiver, mettre en gris) les 4 questions qui suivent?

Merci beaucoup pour votre réponse!

 

Pièces jointes

• essaiTest.xls

  14 KB · Affichages: 85
• essaiTest.xls

  14 KB · Affichages: 85
• essaiTest.xls

  14 KB · Affichages: 83

Vote positif 0 Vote négatif

Odesta

XLDnaute Impliqué

• 28 Avril 2010

• #4

Re : liste déroulant dans UserForm

Voici une réponse
j'utilise une MFC + une macro

Cdt

Olivier

 

Pièces jointes

• minna.xls

  27 KB · Affichages: 81

Dernière édition: 28 Avril 2010

Vote positif 0 Vote négatif

M

minna

XLDnaute Nouveau

• 28 Avril 2010

• #5

Re : liste déroulant dans UserForm

Ah, merci beaucoup Olivier!

Désolé, mais est-il possible de le faire sans macro, que utilisant les formules? En effet, c'est le message de macro qui me gène, car le fichier sera réutilisée
plein fois par pas mal de gens, et j’aimerai le faire de façon le plus simple possible.

 

Vote positif 0 Vote négatif

Robert

XLDnaute Barbatruc

Repose en paix

• 28 Avril 2010

• #6

Re : liste déroulant dans UserForm

Bonjour Minna, Odesta, bonjour le forum,

Une autre proposition qui masque carrément les lignes :

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$C$3" Then Exit Sub 'si l'édition a lieu ailleurs qu'en C3, sort de la procédure
If Target.Value = "Nom2" Then 'condition : si le choix est "Nom2"
    Range("A4:A7").EntireRow.Hidden = True 'masque les lignes 4 à 7
Else 'sinon
    Range("A4:A7").EntireRow.Hidden = False 'affiche les lignes 4 à 7
End If 'fin de la condition
End Sub

Édition :

Ooops j'avais pas réactualisé, désolé mais c'est encore une macro... Sans, je ne sais pas faire.

 

Pièces jointes

• Minna_v01.xls

  19 KB · Affichages: 62

Vote positif 0 Vote négatif

M

minna

XLDnaute Nouveau

• 28 Avril 2010

• #7

Re : liste déroulant dans UserForm

Merci beaucoup Robert!

Je trouve cette macro très interesant pour un autre fichier
Mais est-il possible de le faire avec la même chose, mais en cochant dans une case ?

 

Vote positif 0 Vote négatif

F

Fo_rum

XLDnaute Accro

• 28 Avril 2010

• #8

Re : liste déroulant dans UserForm

salut

avec Validation et MFC.

 

Pièces jointes

• ValidationMfC.xls

  16 KB · Affichages: 66

Vote positif 0 Vote négatif

Odesta

XLDnaute Impliqué

• 28 Avril 2010

• #9

Re : liste déroulant dans UserForm

Ah bien, un 'truc' de plus à savoir !!! Merci

 

Vote positif 0 Vote négatif

M

minna

XLDnaute Nouveau

• 28 Avril 2010

• #10

Re : liste déroulant dans UserForm

Cool, merci beaucoup tout le monde!!!!

Je vous souhaite une très bonne journée!

 

Vote positif 0 Vote négatif