You can use readxl package to read a specific range of cells and then update the values in the selectInput gadget with shiny::updateSelectInput() function.
If you need more specific help, please provide a proper REPRoducible EXample (reprex) illustrating your issue.