Fonction et variables tableaux

Bonjour,

Je voulais savoir comment faire pour qu'une fonction renvoie une variable tableau ?

Pour simplifier voici le genre de chose que j'aurais besoin de faire

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

Sub test()   Dim monTab(3) as String   Call monTab   Call uneFonction(monTab, "blabla...")   End Sub     Function monTab()   monTab(0)="test" monTab(1)="nimporte quoi" monTab(2)="autre chose"   End Function

---

Biensur dans les faits ma variable tableau est à deux dimensions et de grande taille. Je pourrais aussi utiliser une autre fonction et utiliser monTab comme sa variable ByRef mais bon ça m'arrange moins.

Bref le problème c'est que le code que je viens de vous écrire ne marche pas et que je reçois le message "Erreur d'exécution : Espace pile insuffisant".

J'en profite pour poser une autre question annexe :
si monTab est bien une variable tableau et que je veux l'utiliser dans une autre fonction est-ce que cette fonction devra être définie ainsi :

Code:

---

1 2 3

Function uneAutreFunction(monTab as String) '.... End Function

---

ou alors qqch comme ça :

Code:

---

1 2 3

function uneAutreFunction(monTab(3) as String) '.... End Function

---

Désolé si mes questions ne sont pas d'un niveau bien élevé mais bon là je bloque et je n'ai pas vraiment trouvé les réponses que je voulais sur les tutos ou sur google.

Merci d'avance pour votre aide précieuse !

Une fonction ne s'appelle pas avec call

mais en l'appelant directement

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

Sub test()     y = monTab   MsgBox (y(0))     End Sub     Function monTab() Dim x(0 To 2)   x(0) = "test" x(1) = "nimporte quoi" x(2) = "autre chose"   monTab = x   End Function

---

d'accord merci.
Du coup quand j'ai besoin dans mon main d'une fonction/procédure qui ne renvoie rien (mais juste modifie mon tableau excel par ex) est-ce que je dois utiliser "function" ou "private sub" ?

dans ton code tu ne définie pas le type de variable de y dans la procedure test, c'est volontaire ?

en fait je n'arrive pas à trouver sur le tuto ou le FAQ de vba du site developpez.com des explications sur les différences entre function, sub, private, public, call... en Visual Basic. Pourtant je suis certain que ça doit se trouver

je vais pas vous cacher que ça fait quelques mois que je code en VBA, je commence à réussir à faire pas mal de choses (et qui marche) mais je voudrais maintenance essayer d'améliorer mon code, de l’optimiser et le rendre plus. Et c'est pas évident je trouve (de faire des beaux codes propres). Par exemple jusqu'à présent j'appelais toutes les "function" avec Call (et ça marchait).

Alors simple:

Un sub est une procédure, elle fait des choses et ne renvoit rien, elle peut avoir des arguments et changer des variables globales

Une fonction est une fonction elle renvoit une variable ou pas, elle peut ou pas avoir d'arguments, elle est utilisable sur les fiches excel.

Une fonction ou une routine publique peut être appellée dans tout ton projet la fonction ou routine privée ne peut être appellée que dans le mondule

pour appeller une procédure toto() :

Code:

---

Call toto

---

Pour appeller une fonction toto(a,b,c) as variant

Code:

---

x = toto(a,b,c)

---

Si ta fonction ne renvoit rien, pourquoi fais tu une fonction ?

Si tu la calles, où vient se mettre ta variable ? à moins que tu bouges des variables globales...

Merci pour ton aide.

Du coup dans quel cas utiliser une function plutot qu'une procédure si on ne veut rien renvoyer ?

Autre question, dans les quelques lignes de code que tu m'as écrit, quand tu écris y=monTab, c'est quoi le type de y ? si on ne le définit pas et qu'on regarde avec la fonction varType on voit que c'est du array of variant mais si on souhaitait le définir ça serait quoi (si on travail en option explicit) ?

Dans aucun...

C'est un array de strings

du coup je ne comprends pas pourquoi ça ne marche pas si je mets

Code:

---

dim y(3) as string

---

ça ne marche qu'avec

Code:

---

dim y as variant

---

parce que les fonctions qui renvoient des array renvoient des variants... Laisse le en variant... au pire tu perds quoi 0,1 microseconde ? et 16 bits ?

Salut,

Citation:

---

Du coup dans quel cas utiliser une function plutot qu'une procédure si on ne veut rien renvoyer ?

---

Si tu veux qu'une fonction soit visible ou utilisable même si invisible (Private Function) depuis une feuille Excel, ou non, utilise une fonction ou non.
Une sub ne te permet pas de l'appeler depuis une feuille de calcul.

Et elle fera quoi si elle ne renvoit rien la fonction depuis le worksheet ? Renvoyer un #N/A ?

un simple msgbox dans une fonction montre qu'on peux se servir d'une fonction pour afficher un message par exemple. La fonction renvoie quand même une valeur sur feuille car le variant prends plusieurs valeurs par défaut suivant le sous-type auto-sélectionner par VBA, mais en Double (généralement le cas sur feuille), elle renvoie 0.

P.S.: D'ailleurs, la méthode UserForm.Show fonctionne également.