Welcome to FreeSoftwareServers Confluence Wiki

https://www.excelhow.net/list-all-sheet-names-into-combobox.html

 Dim I As Long
 Me.ComboBox1.Clear
 For I = 1 To Sheets.Count
  Me.ComboBox1.AddItem Sheets(I).Name
 Next
 Me.ComboBox1.Value = ActiveSheet.Name
  • No labels