ouvrir un workbook en fonction d une combobox

nicroq

XLDnaute Occasionnel
Bonjour a tous et merci pour votre aide.

Voici ma problematique: j'aimerai ouvrir un fichier en fonction de ce qui est choisi dans ma combo box. Dans le fichier joint vous verrez en dans le :

Set wb1 = Workbooks.Open("C:\Documents and Settings\Bureau\XXXXX\YYYYYY\FIE_" & ComboBox1 & ".xls")

je souhaiterai que :
si le caractère 4 en partant de la gauche de la combobox est un "C" alors XXXX= "C"
si le caractère 4 en partant de la gauche de la combobox est un "P" alors XXXX= "PC"
si le caractère 8 en partant de la gauche de la combobox est un "F" alors YYYYY= "Fed"
si le caractère 8 en partant de la gauche de la combobox est un "B" alors YYYYY= "Bat"

en vous remerciant
cordialement
 

Pièces jointes

  • combobox essai.xls
    30.5 KB · Affichages: 35

Discussions similaires

Réponses
10
Affichages
380
Réponses
28
Affichages
1 K

Statistiques des forums

Discussions
312 229
Messages
2 086 426
Membres
103 206
dernier inscrit
diambote