[VBA] procédure sheets.select

Résolu
andy_kaufmann Messages postés 37 Date d'inscription   Statut Membre Dernière intervention   -  
andy_kaufmann Messages postés 37 Date d'inscription   Statut Membre Dernière intervention   -
salut,

je suis sur un petit programme VBA sur excel.
j'ai une macro qui doit m'ouvrir une feuille de calcul. jusqu'à là ça va... genre sheets("sheet1").select

le problème c'est que le nom de la feuille à ouvrir est variable, j'en ai une 50taine... l'information est dans un textbox (txt_feuille).

le code sheets(txt_feuille).select ne fonctionne pas.

quelqu'un peut-il m'aider à ce sujet.
Configuration: Windows XP
Firefox 2.0.0.6

2 réponses

  1. Utilisateur anonyme
     
    Bonjour,

    Si le textbox est sur la feuille de calcul et nom sur un userform :

    Dim Valeur As String

    Valeur = ActiveSheet.OLEObjects("txt_feuille").Object.Value
    Workbooks.Open Filename:=Valeur

    si au contraire le textbox est sur un userform :

    Dim Valeur As String

    UserForm1.Show
    Valeur = UserForm1.txt_Feuille.Text
    Workbooks.Open Filename:=Valeur
    Range("A1").Select

    Lupin
    2