Rebonjour, et désolé de reposter un message aussi vite, mais je ne trouve nul part la solution à mon problème :

Voilà peut-on récuperer le nom ou la valeur d'une "sheets" ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 If calendar.Month = 1 Then Sheets(1).Select
    If calendar.Month = 2 Then Sheets(2).Select
    If calendar.Month = 3 Then Sheets(3).Select
    If calendar.Month = 4 Then Sheets(4).Select
    If calendar.Month = 5 Then Sheets(5).Select
    If calendar.Month = 6 Then Sheets(6).Select
    If calendar.Month = 7 Then Sheets(7).Select
    If calendar.Month = 8 Then Sheets(8).Select
    If calendar.Month = 9 Then Sheets(9).Select
    If calendar.Month = 10 Then Sheets(10).Select
    If calendar.Month = 11 Then Sheets(11).Select
    If calendar.Month = 12 Then Sheets(12).Select
Ce qui me pourrais améliorer cet bout de code !

Il faut recupérer la valeur par le sheets(x) ou par l'activesheet ?


C'est possible une ligne genre calendar.month = sheets.value ou activesheet.value ? (je sais que .Value ne marche pas mais un truc du genre existe?)