[VBA-E][débutant] Recuperer valeur de "sheets"
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:
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?)
