Afficher une UserForm en fonction de la valeur de "Listindex"

Afficher une UserForm en fonction de la valeur de "Listindex" - VB/VBA/VBS - Programmation

Marsh Posté le 04-02-2012 à 15:53:01    

Bonjour à tous  :) ,
 
Dans le cadre d'un projet perso VBA en école d'ingénieur je réalise la gestion d'une base de données, en l'occurence de ma DVD-thèque.
Et je souhaiterai afficher une UserForm qui représentera la fiche du film en question (année, réalisateur, etc etc).
Le "sénario" d'une partie de mon projet serai de : sélectionner dans une liste déroulante un titre de film et accéder à l'usf contenant toutes les infos utiles sur le film.
J'ai déja créer une usf ou il n'y plus que les labels à remplir.
Et mon problème vient de là !  
Je n'arrive pas à les remplir différents avec les infos.
J'ai éssayer la ligne de programmation suivante (pour un label) :  
 
Private Sub UserForm_Activate()      
          label_annee.Caption = Range("B" & [listderou_titre.ListIndex+2]).Value
End Sub
 
Et ça ne marche pas, je ne sais pas quoi faire !
Merci d'avance pour vos réponse.  :)  
 
Godfath'
 

Reply

Marsh Posté le 04-02-2012 à 15:53:01   

Reply

Marsh Posté le 04-02-2012 à 18:35:51    

bonjour,
 
au lieu d'utiliser range("B&...)
utilise plutot cells(...,2)

Reply

Marsh Posté le 04-02-2012 à 21:06:47    

faudrait peut etre mettre le nom de la feuille
=sheets("feuil1" ).cells(... ,2)
 
aucune certitude

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed