Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Option Explicit Private Sub cmdGoTo_Click() If cboSheets.ListIndex <> -1 Then Application.Goto Worksheets(cboSheets.Value).Range("A1") Unload Me End If End Sub Private Sub UserForm_Initialize() Dim I As Long For I = 1 To Worksheets.Count cboSheets.AddItem Worksheets(I).Name Next I End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Paste Table from Excel VBA to the PowerPoint 2010||18||56|
|Pull data from a another spreadsheet tab||3||31|
|Embed XL WS and Objects into a PPTX||8||34|
|VBA to trim leading and trailing spaces in all sheets of active workbook.||2||19|
Join the community of 500,000 technology professionals and ask your questions.