[VBA] procédure sheets.select

Résolu
andy_kaufmann Messages postés 36 Date d'inscription   Statut Membre Dernière intervention   -  
andy_kaufmann Messages postés 36 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.

2 réponses

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