Comment puis-je utiliser un argument tableau facultatif dans une procédure VBA?

Question

J'ai une procédure privée dans un script VBA pour MS Access:

Private Sub drawLineDiagram(chartSpace As Variant, title As String, caption As String, x_val() As Variant, y_val() As Variant, Optional y_val2() As Variant = ????)

Comme vous le voyez, je veux avoir un dernier paramètre en option pour un tableau de valeurs.

Quel type de paramètre par défaut dois-je attribuer? Si je le fais avec une valeur entière optionnelle et l'assigner par ex. 0 tout va bien.

Si je le fais avec un tableau comme indiqué ci-dessus et que j'assigne un tableau, la ligne est marquée rouge => comme une erreur (et elle ne sera pas compilée).

Answer 1

Si vous avez besoin d'un tableau facultatif dans VBA, déclarez-le comme Variant sans spécificateur de tableau, mais accédez-y en tant que tableau. De cette façon, vous obtenez un Variant (variable unique) qui contient un tableau de Variant s, par opposition à un tableau de Variant s. Aucune valeur par défaut est nécessaire:

Private Sub drawLineDiagram(chartSpace As Variant, title As String, caption As String, x_val As Variant, y_val As Variant, Optional y_val2 As Variant) 

Par souci de cohérence, également déclarer comme plaine Variant s les deux autres paramètres.

Si vous détestez l'IDE, ne l'utilisez pas. Utilisez le bloc-notes. Puis collez le code écrit.

Answer 2

L'IDE peut-être pas d'une grande utilité, mais l'aide (pour une fois) contient la réponse:
ParamArray
en option. Utilisé uniquement comme dernier argument dans arglist pour indiquer que l'argument final est un tableau facultatif d'éléments Variant. Le mot-clé ParamArray vous permet de fournir un nombre arbitraire d'arguments. ParamArray ne peut pas être utilisé avec ByVal, ByRef ou Optional.

Answer 3

Peut-être que vous voulez un tableau de paramètres:

Dans la déclaration de procédure, définir la liste des paramètres de la manière normale. Tous les paramètres sauf le dernier doivent être requis (non optionnel (Visual Basic)).

Faites précéder le dernier nom de paramètre avec des mots-clés ByVal ParamArray. Ce paramètre est automatiquement facultatif. N'incluez pas le mot-clé Optional.

- How to: Define a Procedure with an Indefinite Number of Parameters