VBA Utilisation instruction Const

[xbb12]

Bonjour à toutes et tous,

voici l'exposé de mon petit problème...

Je souhaiterai que la valeur integer de ma Const corresponde à la valeur inscrite dans une cellule (par exemple la Cellule "A1" de la "Feuil1")

Cela ferait un truc du genre :

Const MaConst as integer = sheets("Feuil1").range("A1").value

Evidemment cela ne marche pas !
Merci par avance pour votre aide.

et Bonne Année !

 

[skoobi]

Re : VBA Utilisation instruction Const

Bonjour xbb12, bienvenue sur XLD,

Ce que tu écris ne peut pas marché car comme la cellule A1 peut varié, bin il faut l'affecter à une variable et non à une constante.
Tu ne peux que mettre un nombre et rien d'autre:
Const MaConst as integer = 5
par exemple.

 

[xbb12]

Re : VBA Utilisation instruction Const

Merci Skoobi !

C'est effectivement le principe d'une constante que de ne pas varier...
Aurais-tu cependant une solution version variable ?

Merci encore

 

[skoobi]

Re : VBA Utilisation instruction Const

Re,

utilise Dim pour déclarer des variables:

Dim MaVar As Integer
MaVar = sheets("Feuil1").range("A1").value

 

[xbb12]

Re : VBA Utilisation instruction Const

En fait je reviens vers ma solution d'origine, mais en fait je souhaite déclare ma variable une seule fois pour l'ensemble de mon projet/module.

Et là...ça ne marche pas !

Merci pour ta réactivité Skoobi 😉

 

[skoobi]

Re : VBA Utilisation instruction Const

Dans ce cas il faut la déclarer Public et tout en haut d'un module:

Public MaVar As Integer

 

[xbb12]

Re : VBA Utilisation instruction Const

Oui oui Skoobi, c'est ainsi qu'elle est déclarée mais pour lui attribuer la valeur de la cellule "A1", suis-je obligé de le faire dans une Sub ?

re-merci !
à+

 

[skoobi]

Re : VBA Utilisation instruction Const

Oui, il le faut.

 

[xbb12]

Re : VBA Utilisation instruction Const

Merci Skoobi et désolé pour le dérangement !
@+

Longue vie à ce forum

 

[skoobi]

Re : VBA Utilisation instruction Const

Pas de soucis 😉