Bonjour
Je souhaite pouvoir ouvrir un fichier excel situé dans un répertoire à partir du mois sélectionné dans une liste.
L'utilisateur sélectionnera le mois ce qui permettra d'ouvrir le fichier correspondant.
Le problème est que je ne sais pas par quel bout commencer:
- Comment créer la liste avec tous les mois
- Comment à partir de la valeur (mois) sélectionnée, ouvrir le fichier (.xlsx) correspondant
Un exemple à adapter
Avec un fichier maître également situé de le même répertoire et un format de fichier du style :
Toto11.xlsx (où 11 = le mois)
Un userform de sélection du mois (sous la forme : 01 / 02 / .../11/12) dans un combobox
et un pgm sur la validation du mois
a = ActiveWorkbook.Path
Application.DisplayAlerts = False
b="Toto"
c = a & "\" & b & combobox1 & ".xlsm"
Workbooks.Open Filename:=c
Un début, pour alimenter une combobox placée sur une feuille de calcul par la liste des mois de l'année, regarde le code ci-dessous, à placer dans le module "thisworkbook", se déclenche à l'ouverture du classeur :
Code:
Option Explicit
Private Sub Workbook_Open()
Dim i As Byte
For i = 1 To 12
Feuil1.ComboBox1.AddItem MonthName(i)
Next i
End Sub