Excel VBA Goto command

[Robertson1995]

I have an excel VBA question about the Goto command. I have a sub that enters data based on a series of inputboxes and then the last command is to print the spreadsheet.

I also have an answer msgbox that vbYes continues to the next inputbox & vbNo exits sub. Instead of vbNo exiting sub, I would like it to goto the print commmand.

In VBA how do I use the goto command to go to a specific command at another place on the spreadsheet?

 

[jakeb3482]

If vbNo = True Then Goto jmp

...

jmp:
Print commands

the rest of the code goes here.

 

[ShawnPCooke]

In order to use GoTo to do what you're suggesting, you would need to create a label at the place where you want the program to go. For example:

LabelName:
command 1
command 2

Then, to direct the program to that label, you would use the GoTo statement.

GoTo LabelName

The more important question is why you would use the GoTo statement. I'm assuming you're using a regular old If statement to direct the program flow from your MsgBox. There's no reason you can't include the code for printing the program there, or in another subroutine, and avoid GoTo altogether.

 

[Weaver]

It's very rare that you'd need to use goto and it's an age old coders mantra that you avoid it. Since we're all about best practice, publish the code and maybe there's a better way.

 

[hminney]

It's very rare that you'd need to use goto and it's an age old coders mantra that you avoid it. Since we're all about best practice, publish the code and maybe there's a better way.

I use GOTO to skip code that is still in development rather than commenting,
eg I'm putting in Conditional Formatting, it's half written, and rather than commenting each line, I GOTO round it
but GOTO can only be used in linear code

 

[MARK858]

I use GOTO to skip code that is still in development rather than commenting,
eg I'm putting in Conditional Formatting, it's half written, and rather than commenting each line, I GOTO round it
but GOTO can only be used in linear code

You do realize that on the edit toolbar (View - Toolbars - Edit) in the VBE there are "Comment Block" and "Uncomment Block" buttons so you can select & comment multiple lines in one go (you can also customise another toolbar to have the buttons on)?

 

[6StringJazzer]

Another way to skip development code that is better than GoTo:

If False Then
   ' Development code goes here
End If

Still another way that I often use:

Dim Development As Boolean
Development = True

If Development Then
   ' Development code goes here
End If