Forum Discussion
Form Control Buttons to Take me to a specific areas of a worksheet.
Hello, I'm hoping someone can help. I'm looking to place forms control buttons, that when clicked, will take the viewer to an area of a worksheet. For example: I have a large report that I s...
Here are three small VBA examples that you can use, depending on what you intend to do.
‘ 1. Button with VBA & Hyperlink:
Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink Address:="https://www.Nikolino.de", NewWindow:=True
End Sub
‘ 2. Button with VBA form control
Sub ButtonClick ()
Worksheets("Sheet1").Select
End Sub
‘ 3. Button with VBA Active X control
Private Sub CommandButton1_Click()
Application.Goto Sheets("Sheet1").Range("C25")
End Sub
As a VBA alternative, formatting a cell to look like a button and then pasting the hyperlink into the cell would be the most elegant solution and save resources. But that also depends on your plans.
Hope I was able to help you :).
I know I don't know anything (Socrates)
Was the answer useful? Mark them as helpful!
This will help all forum participants.
Hello NikolinoDE,
I tried applying the 3rd option to my worksheet because it seems to be the best option for what I want to accomplish. However, it doesn't seem to be working. What I want to do is be to click a button located at the top of the worksheet that will take me directly to a section of the worksheet that the button refers to. I've added a screen shot of what I'm looking to do. I was able to add the code to the button with no errors, however, the button doesn't do anything. I've also included he VBA coding to the button for reference. Also, when I tried renaming the button "10x10", I was given an error message: Not a legal object name: "10x10".
I tried applying the 3rd option to my worksheet because it seems to be the best option for what I want to accomplish. However, it doesn't seem to be working. What I want to do is be to click a button located at the top of the worksheet that will take me directly to a section of the worksheet that the button refers to. I've added a screen shot of what I'm looking to do. I was able to add the code to the button with no errors, however, the button doesn't do anything. I've also included he VBA coding to the button for reference. Also, when I tried renaming the button "10x10", I was given an error message: Not a legal object name: "10x10".
- Application.Goto Sheets("Sheet1").Range("C17")
- Thank you for your reply. I added the code as suggested and when the button is clicked a Run-time error '9': Subscript out of range error is returned.
