Excel 2010 VBA

Cluses74 Messages postés 243 Statut Membre -  
via55 Messages postés 14391 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
j'explique mon problème

1 - je sélectionne les feuilles de mon classeur à l'aide d'une combobox1
2 - j'aimerai afficher la valeur d'une cellule d'une feuille sélectionnée par la combobox1
3 - afficher la valeur de cette cellule N4 dans une textbox13
D'avance merci à celui qui me répondra et me donnera le bon code

2 réponses

  1.
    via55 Messages postés 14391 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    Bonjour

    Textbox13.value=Sheets("lenomdelafeuille").range("N4")
    devrait aller

    Cdlmnt
    Via
    0
    1. Cluses74 Messages postés 243 Statut Membre
       
      merci de cette réponse mais comment afficher les noms des 20 feuilles car ce code si j'ai bien compris n 'est valable que pour une feuille de classeur et non pour l'ensemble de mon classeur
      Mais encore merci de cette réponse
      0
  2. via55 Messages postés 14391 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    A l'initialisation de ton Userform (événement Initialize) tu la remplis avec les nom ds feuilles avec une boucle : 
    For i = 1 To sheets.Count
        ComboBox1.AddItem sheets(i).Name
    Next i

    puis dans l'évenement Textbox13_Change : 
    Textbox13.value=Sheets(ComboBox1.value).range("N4")

    Cdlmnt
    Via

    0