Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action.
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.
|Problems moving Excel files from local drive to server||4||26|
|copy a docm-file from a fixed folder location into the folder of the currently active workbook using VBA||4||23|
|Command button to lock and unlock sheet to protect formulas in Excel||6||22|
|Emoji's work fine in Word 2016, but not in Outlook 2016 ?||29||35|