OVH Cloud OVH Cloud

Constante à deux dimensions

4 réponses
Avatar
Xavier POWAGA
Bonjour à tous,
voilà je butte sur un petit problème, je ne sais pas comment déclarer une
constante à deux dimensions
je m'explique, je voudrais que la constante "Cordonnée" ait deux valeurs
(1;2)
ainsi Coordonnée(0)=1
Coordonnée(1)=2
j'ai essayé avec
Public Const Coordonnée As Integer = (1;2) mais, walou, j'arrive pas à
trouver la bonne syntaxe.
Ce n'est peut être pas possible ?

merci de vos idées

4 réponses

Avatar
Jacky
Bonjour,

Essaie avec
'-------
Dim Coordonnée(1) As Integer
Coordonnée(0) = 1
Coordonnée(1) = 2
----------
Un petit coup de F1 sur Dim pour plus d'explications.
--
Salutations
JJ


"Xavier POWAGA" a écrit dans le message de news:
45d6fcda$0$4942$
Bonjour à tous,
voilà je butte sur un petit problème, je ne sais pas comment déclarer une
constante à deux dimensions
je m'explique, je voudrais que la constante "Cordonnée" ait deux valeurs
(1;2)
ainsi Coordonnée(0)=1
Coordonnée(1)=2
j'ai essayé avec
Public Const Coordonnée As Integer = (1;2) mais, walou, j'arrive pas à
trouver la bonne syntaxe.
Ce n'est peut être pas possible ?

merci de vos idées



Avatar
Xavier POWAGA
Merci pour ta réponse et effectivement cela marche si je mets le code dans
le module où ce trouve la procédure qui utilise ces données.
toutefois j'aurais souhaité déclarer ces valeurs dans un module spécifique
(appellé "Constantes") et qu'elles soient utilisables par n'importe quelle
procédures du projet et à partir de n'importe quel module

cela marche pour les constantes du type:
Public Const Coordonnéeunedimension As intéger = 247

par contre je sais pas faire pour une coordonnée à deux dimensions avec
PUBLICc. La solution du "DIM" a seulement une portée MODULE et je souhaite
une portée PROJET.

merci


"Jacky" a écrit dans le message de news:
eeLYT$
Bonjour,

Essaie avec
'-------
Dim Coordonnée(1) As Integer
Coordonnée(0) = 1
Coordonnée(1) = 2
----------
Un petit coup de F1 sur Dim pour plus d'explications.
--
Salutations
JJ


"Xavier POWAGA" a écrit dans le message de news:
45d6fcda$0$4942$
Bonjour à tous,
voilà je butte sur un petit problème, je ne sais pas comment déclarer une
constante à deux dimensions
je m'explique, je voudrais que la constante "Cordonnée" ait deux valeurs
(1;2)
ainsi Coordonnée(0)=1
Coordonnée(1)=2
j'ai essayé avec
Public Const Coordonnée As Integer = (1;2) mais, walou, j'arrive pas à
trouver la bonne syntaxe.
Ce n'est peut être pas possible ?

merci de vos idées







Avatar
MichDenis
As-tu essayé une variable de type personnalisé ?

DAns le haut d'un module Standard :

Type Denis
Toto As Integer
Toti As Integer
End Type
Public X As Denis

DAns le ThisWorkbook de ton classeur : l'événement open
attribue la valeur désirée pour chaque élément de la variable :

Après avoir typé le point suivant le X , tu reçois une liste
comprenant les 2 items de la variable Toti, et Toto

.----------------------------
Private Sub Workbook_Open()
X.Toti = 1
X.Toto = 2
End Sub

.----------------------------


Et dans n'importe quel module tu peux appeler
le contenu d'un des items de la variable
'------------------------
Sub test()
MsgBox X.Toti
End Sub
'------------------------

Évidemment, il est conseillé d'utiliser des expressions significatives
pour ton projet que ceux mentionnés dans l'exemple.





"Xavier POWAGA" a écrit dans le message de news:
45d6fcda$0$4942$
Bonjour à tous,
voilà je butte sur un petit problème, je ne sais pas comment déclarer une
constante à deux dimensions
je m'explique, je voudrais que la constante "Cordonnée" ait deux valeurs
(1;2)
ainsi Coordonnée(0)=1
Coordonnée(1)=2
j'ai essayé avec
Public Const Coordonnée As Integer = (1;2) mais, walou, j'arrive pas à
trouver la bonne syntaxe.
Ce n'est peut être pas possible ?

merci de vos idées
Avatar
Xavier POWAGA
merci, ça marche

"MichDenis" a écrit dans le message de news:

As-tu essayé une variable de type personnalisé ?

DAns le haut d'un module Standard :

Type Denis
Toto As Integer
Toti As Integer
End Type
Public X As Denis

DAns le ThisWorkbook de ton classeur : l'événement open
attribue la valeur désirée pour chaque élément de la variable :

Après avoir typé le point suivant le X , tu reçois une liste
comprenant les 2 items de la variable Toti, et Toto

.----------------------------
Private Sub Workbook_Open()
X.Toti = 1
X.Toto = 2
End Sub

.----------------------------


Et dans n'importe quel module tu peux appeler
le contenu d'un des items de la variable
'------------------------
Sub test()
MsgBox X.Toti
End Sub
'------------------------

Évidemment, il est conseillé d'utiliser des expressions significatives
pour ton projet que ceux mentionnés dans l'exemple.





"Xavier POWAGA" a écrit dans le message de news:
45d6fcda$0$4942$
Bonjour à tous,
voilà je butte sur un petit problème, je ne sais pas comment déclarer une
constante à deux dimensions
je m'explique, je voudrais que la constante "Cordonnée" ait deux valeurs
(1;2)
ainsi Coordonnée(0)=1
Coordonnée(1)=2
j'ai essayé avec
Public Const Coordonnée As Integer = (1;2) mais, walou, j'arrive pas à
trouver la bonne syntaxe.
Ce n'est peut être pas possible ?

merci de vos idées