Discussion :

[jmfmarques]

Voilà qui me parait parlant quant à ce que l'on obtient en utilisant comme telle (avec parenthèses, donc) une fonction et ce que l'on obtient si on ne s'en sert que comme procédure (sans l'utilisation des parenthèses) :

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
18
19
20
21
22
23
Private Sub Command1_Click()
  a = "aaa"
  allons a
  MsgBox "a = " & a & vbCrLf & "j'ai appelé sans parenthèses et vois que a a été transformé par toto"
  a = "aaa"
  allons (a)
  MsgBox "a = " & a & vbCrLf & "j'ai appelé avec parenthèses et vois que a a conservé sa valeur"
  a = "aaa"
  allons (a)
  MsgBox "a = " & a & vbCrLf & "j'ai appelé avec parenthèses et vois que a a conservé sa valeur" & vbCrLf & vbCrLf _
         & " =" & allons (a) & "=  est par contre et en plus le renvoi de la fonction toto, ici utilisée réellement" _
         & " comme fonction, avec emploi des parenthèses"
  allons a
          MsgBox "a = " & a & vbCrLf & "j'ai appelé sans parenthèses et vois que a est modifié" & vbCrLf & vbCrLf _
         & " =" & allons (a) & "=  est par contre le renvoi de la fonction toto, ici utilisée réellement" _
         & " comme fonction, avec emploi des parenthèses"
         
End Sub
Private Function allons(toto)
  toto = "transformé par toto" 'on transforme ici toto qui modifiera a si appelé sans parenthèses
                            ' et ne le modifiera pas sui appelé avec parenthèses
                            allons = "nous y sommes en plein"
End Function

[zazaraignée]

J'ai fait un saut quantique (sans tout lire) à la fin du thread...

Bonjour donc

Pour retourner un tableau dans une fonction j'utilise plutôt une procédure avec un tableau en paramètre par adresse. Exemple

Code :

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

1
2
3
Private Sub maProcedure (ByRef monParam() As monType)
    ' le code
End Sub

[jmfmarques]

[zazaraignée]

J'en ai volontairement sauté un bon bout. Qu'ais-je manqué qui te fais bidonner?

[Edit]: Je vois que bbil avais donné la même astuce un peu plus haut. La preuve que parfois, vaut mieux tout lire...

Allez, je vous laisse entre vous. Vous vous débrouillez très bien sans moi.

À demain.

[jmfmarques]

rien zaza (bonjour) rien....
Tu connais les boucles sans fin ?
on est en train d'en faire une....

[Catbull]

J'ai fait un saut quantique (sans tout lire) à la fin du thread...

Bonjour donc

Pour retourner un tableau dans une fonction j'utilise plutôt une procédure avec un tableau en paramètre par adresse. Exemple

Code :

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

1
2
3
Private Sub maProcedure (ByRef monParam() As monType)
    ' le code
End Sub

C'est la solution communément adoptée car la moins gourmande en ressources.