Procédure

[JDH]

Salut Forum !

Voilà J'ai plusieurs procédure.
Dans une procédure je fais appel à une autre procédure à UN endroit spécifique de la macro. J'ai fait cela avec le GoTO mais sa ne fonctionne pas
exemple :

procedure1()
__
___
__
if ____then
 GoTo Line2
End if
__
__
end sub


procedure2()
___
_____
____
Line2:
____
____
____
End sub

On m'a signalé qu'il fallai utiliser des procédures. Mais je ne VOIS vraiment pas Comment, avec des procédures, renvoyer à un endroit spécifique d'une autre procédure. J'épere que vous saisissez mon probléme et merci !!^^
++

 

[BOISGONTIER]

Re : Procédure

Bonjour,

On appelle une procédure par son nom. En général, on évite d'utiliser l'instruction goto.

procedure1()
  x=2
  y=5
  procedure2 x,y  
  ...
  ....
end sub


procedure2(param1,param2)
  ..
  If param1=xx then
     ..
  else
     ..
  end if
End sub

JB
Formation Excel VBA JB

 

[tototiti2008]

Re : Procédure

Bonjour à tous,

Donc il faut que tu découpes ta procédure 2 en 2 procédures distinctes ou que tu fasses un test avec un if comme te le propose BoisGontier

 

[MJ13]

Re : Procédure

Bonjor à tous,

Voici un exemple simple qui peut te permettre de faire des appels à des procédures avec un test d'erreur.

Je remercie d'ailleurs MichelXLD pour le kill process (je l'ai retrouvé!).

 

[JDH]

Re : Procédure

Merci pour vos réponse
OK soit je coupe ma procédure en 2 soit je fais un test avec un if

procedure1()
  x=2
  y=5
  procedure2 x,y  
  ...
  ....
end sub


procedure2(param1,param2)
  ..
  If param1=xx then
     ..
  else
     ..
  end if
End sub

J'ai pas tout comprit là...
D'abord,__j'ai comprit pq il fallait rajouter 2 variables dans la procedure1 mais pas comprit le > param1=xx then
Vaut il mieux ne pas écrire :

procedure1()
  x=2
  y=5
  procedure2 x,y  
  ...
  ....
end sub


procedure2(param1,param2)
  ..
  If param1=2  AND param2=5 then
     ..
  end if
End sub

^^
MErci de vos réponses !
+

 

[MJ13]

Re : Procédure

Bonjour,

JDH, je pense qu'il ne faut pas toujours essayer de comprendre. Le mieux c'est d'essayer, c'est comme cela qu'on apprend.

Sinon, sans fichier, c'est pas facile à expliquer!