Fonction avec variables présentées sous forme de liste déroulante [Résolu]

[bernardmichel]

Bonjour,

J'ai réalisé une fonction toute simple, basée sur un "SELECT CASE". Du fait qu'il y a beaucoup de "CASE", j'aimerais, lorsque j'appelle la fonction que le choix des différentes "CASE" me soit proposé, dans le même style que l'on peut le trouver, par exemple dans la fonction

Code :

DoCmd.Close acForm, Me.Name, acSaveNo

Dans laquelle un choix est proposé en lieu et place de "acForm" (acDefault, acDiagram, ac... etc) ou encore en lieu et place de "acSaveNo" (acSaveNo, acSaveYes, etc..)

Ma fonction actuelle est la suivante:

Code :

Public Function LitIni(ByVal strRetour As String) As String

Je souhaite donc que cette fonction me propose - en lieu et place du simple "strRetour" - la liste des valeurs que peut prendre mon "SELECT CASE"

Un grand merci par avance !

[samuelsiffert]

Salut,

Il me semble avoir lu un fil de discussion à ce sujet... mais impossible de le retrouver.

Tu pourrais essayer en utilisant un type énuméré (mot clé Enum) .

Code :

1
2
3
4
5
6
7
8
Private Enum Retour
    acValeur1="test1"
    acValeur2="test2"
    acValeur3="test3"
End Enum

Public Function LitIni(ByVal strRetour As Retour) As String

Je peux pas tester je suis en AC-97...

[bernardmichel]

Merci, je tente... et te redis

[bernardmichel]

Impeccable !
J'avais complètement switché "Enum" !
Grand merci à toi