Discussion :

[mikeactuaire]

Bonjour à tous,


Question:

Code :

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

1
2
3
4
5
6
7
8
9
10
Call sel(xxx)   '   j'appelle la fonction sel avecxxx comme variable,
 
Function sel(m As String)
Dim doc As String
Dim n As Integer
 
MsgBox m    ' jusqu'ici tout va bien, m est bien = à xxx
Sheets("masterliste").Activate         '    lorsque j'active une autre feuille
 
MsgBox (m)    '    j'obtiens ici une erreur...

..Comment faire pour qu'il conserve la valeur de m??

Merci à vous

[Invité]

Bonjour

Pourquoi une fonction alors que tu ne retournes aucune valeur ?
Pourquoi des parenthèses autour du m de la deuxième MsgBox ?

Ton code n'est pas clair, ni tes explications, donc merci de détailler.

Philippe

[mikeactuaire]

OK je recommence:

Code :

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

1
2
3
4
5
6
7
8
Call sel(xxx)          '   j'appelle la macro sel avec xxx comme variable,
 
Sub sel(m As String)
 
MsgBox m                                  ' jusqu'ici tout va bien, m est bien = à xxx
Sheets("masterliste").Activate       '    lorsque j'active une autre feuille
 
MsgBox m                                  '    j'obtiens encore une erreur...

Je peux aussi préciser que Sub sel() est sur une feuille qui n'est pas masterliste,

[mikeactuaire]

il faut d'abord placer la macro sel dans la feuille masterfile et ensuite lorsque je vais l'appeler depuis une autre feuille je dois faire: Call feuilX.sel(xxx)

Et voilà,

Merci