Bonjour à tous !
J'ai un problème pour déclarer des constantes de type entier.
En effet, je souhaite mettre dans une constante l'année en cours.
Mais je n'y arrive pas, je peux seulement la mettre dans une variable.
Je voudrais aussi mettre le contenu de la variable NombreAnnee dans une constante, mais j'ai le meme problème.
Voici mon code :
Merci d'avance pour vos conseils !
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Const Min As Integer = 1992 'car l'opération a commencé en 1992 Dim Max As Integer 'on récupère l'année courante Max = Year(Now) Dim NombreAnnee As Integer 'nombre d'année dans le tableau NombreAnnee = (Max - Min) + 1 MsgBox NombreAnnee
Partager