Calling a Procedure

[dave8]

Is it possible to call a label in a procedure? In other words, I want to run part of the code in a procedure rather than running the entire procedure.


Call LabelA

Public sub ProcA

do something...


LabelA:

do something with LabelA..

End sub

 

[xenou]

Probably it would be simplest to put the code in "LabelA" in a separate sub that can be called by either procedure:

Example: Both Macro1 an Macro3 here call Macro2. Macro2 is like your "LabelA"

Sub Macro1()
    '//Some Code
    Call Macro2
    '//More Code
End Sub

Sub Macro2()
    '//Code
End Sub

Sub Macro3()
    '//Some Code
    Call Macro2
    '//More Code
End Sub

 

[dave8]

Ok. Thank you.

 

[Ruddles]

As a point of interest, you could do something like this:-

[FONT=Courier New]Call ProcA("")       [COLOR=green]' runs everything[/COLOR][/FONT]
 
[FONT=Courier New]Call ProcA("LabelA") [COLOR=green]' jumps to labelA[/COLOR][/FONT]

[FONT=Courier New]Public Sub ProcA(RunWhat as String)[/FONT]
 
[FONT=Courier New]If RunWhat="LabelA" The GoTo LabelA[/FONT]
 
[FONT=Courier New]' do something...[/FONT]
 
[FONT=Courier New]LabelA:[/FONT]
 
[FONT=Courier New]' do something with LabelA[/FONT]
 
[FONT=Courier New]End Sub[/FONT]

I've never done this in {cough} years of programming - just because it's possible doesn't make it sensible. Xenou's suggestion is much better.