Discussion :

[granchef]

Bonjour,
j'en arrive à mes limites de capacité d'abstraction, à l'aide!
Jusqu'à présent, je gérais les tableaux multidimensionnels ainsi

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Dim tablo(25,3,2,2) as string

La lisibilité du code : catastrophique!

Et les types définis par l'utilisateurs sont arrivés à mes yeux.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Type Informations_Eleves
   Nom as String
   Prenom as String
   PresenceHebdo(53) as String
End Type
 
Sub toto
 
Dim Infos_Eleves as Informations_Eleves
 
Infos_Eleves(0).Nom="Pion"
Infos_Eleves(0).Prenom="Tartan"
Infos_Eleves(0).PresenceHebdo(1)="NON"
Infos_Eleves(0).PresenceHebdo(2)="OUI"
'Etc...
end sub

C'est beaucoup plus simple à reprendre à froid.

Comment faire :
Tartan Pion Jour1 Cours1 Sem1 = "OUI"
Tartan Pion Jour1 Cours2 Sem1 = "OUI"
...
Jour allant de 1 à 5, Cours de 1 à 3 par ex.

Je galère avec :
le concept de Type dans le Type : Type A B as integer C as integer En Type Puis Type C D as String E as A(qqchose)
le concept de multidimensionnalité dans le Type : nomType(1, 2).Choix= "Choix1,2"

Mais loin s'en faut pour que ma matière grise me donne les clefs pour coomprendre!
Je suis même preneur juste de la doc. appropriée si vous n'avez pas le temps.

A vous lire,
Anthony.

[Philippe Tulliez]

Bonjour,

Je suis même preneur juste de la doc. appropriée si vous n'avez pas le temps.

• Conceptualisation des variables tableau en VBA et Application à l'optimisation du code sous Excel
• Utiliser les variables tableaux en VBA Excel

[granchef]

Le tuto de Sylriroad m'a plusieurs fois été d'un grand secours. Les tableaux de type sont toutefois peu mentionnés (même si on suit le lien vers l'autre tuto car les tableaux de type sont basiques).
Le tuto de Didier Gonard est un monstre de pédagogie mais ne m'a pas été utile, comme dit en 1ère ligne de mon poste, j'ai l'habitude d'utiliser tableaux à pleins de dimensions.
Ma question portait sur une documentation détaillée des types définis par l'utilisateur utilisés à des fins de tableaux multi-dimensions (les 2 livres que je possède sur vba sont très succins).

La réponse au pb posé est très simple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Infos_Eleves(0).jour(0).cours(0)="OUI" 
Infos_Eleves(0).jour(0).cours(1)="OUI" 'etc

Ce qui me "gênais" c'est que je repars sur des indices numériques qui ne signifient rien.
Y-a-t'il moyen de faire qqchose dutype tableaux associatif : Infos_Eleves(x).Lundi.Francais="OUI" ou Infos_Eleves(x).Jour("Lundi").Cours("Francais")="OUI"?

[Philippe Tulliez]

Bonjour,
Je ne sais pas si j'ai saisi ta dimande mais si tu veux indicer les bornes de tes variables tableaux, personnellement, j'utiliserais les constantes énumérées

Détail dans le tutoriel Utiliser les variables en VBA Excel et particulièrement le chapitre VI-B. Enum

Petit exemple rapide

En tête de module

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Option Explicit
Enum Mois
  Janvier = 1
  Février = 2
  Mars = 3
  Aril = 4
End Enum
Enum Semaine
  Lundi = 1
  Mardi = 2
End Enum

Une procédure test

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Sub tt()
  Dim CA(1 To 12, 1 To 7)
  CA(Mois.Février, Semaine.Lundi) = 1000
  MsgBox CA(2, 1)
  ' ou bien évidemment
  MsgBox  CA(Mois.Février, Semaine.Lundi)
End Sub

Sinon, il existe un tutoriel de Pierre Fauconnier sur les modules de classe ou il aborde les types des données Création et utilisation de classes personnalisées en VB 6.0 et VBA (partie 1)

[EDIT]
le type de données est également évoqué dans le chapitre IX. Les types de données définis par l'utilisateur du tutoriel référencé en début de ce fil

[granchef]

Exactement ce qu'il me fallait ( je connaissais, ai testé sur qqes outils puis ai arrêt, me disant que ça ne servait pas énormément ces énumérations.
Comme souvent, bien m'a pris de penser ainsi.
Merci!

[Philippe Tulliez]

Merci pour ton retour.