[Résolu][Basic] Définition unique d'une structure

[Zippo]

Bonjour à tous,

Dans le cadre d'une appli dans BASE, mais ce doit être le même problème dans CALC, WRITER ..., j'ai créé une structure avec

Code : Tout sélectionner

Type ... End Type

que j'utilise dans plusieurs modules.
Afin que ma structure soit reconnu dans chacun de ces modules, je suis obligé de mettre sa déclaration en début de chaque d'eux.
Y a-t-il un moyen de ne déclarer qu'une fois la structure et, par une instruction, de faire appel à sa définition quand on en a besoin ?

Grand merci pour votre aide

[bm92]

Bonsoir,
C'est une des limitations des types définis par l'utilisateur, en OpenOffice Basic.
Contournement:
Créer dans le module de définition un sous-programme Function qui renvoie une donnée de ce type.

Code : Tout sélectionner

Type Personne
  Nom As String
  Prenom As String
End Type

Function unePersonne() As Variant
Dim p As Personne
unePersonne = p
End Function

Utilisation, dans un module quelconque:

Code : Tout sélectionner

Dim Jules As Variant
Jules = unePersonne

Les variables créées seront de type Variant, puisque le type Personne n'est connu que dans 1 module.
On peut évidemment ajouter des arguments dans la fonction pour initialiser en même temps la donnée créée.

[Zippo]

C'est parfait, j'ai compris le principe et ai pu l'appliquer à mon cas.

Grand merci pour le tuyau.