浏览文件并将其粘贴到从组合框中选择的工作表中

Question

我有一个包含工作表名称的组合框。

现在我想浏览文件并将其粘贴到在组合框中选择的工作表中

谁能帮我解决这个 VBA

Sub Get_Data_From_File()
Dim FileToOpen As Variant
Dim OpenBook as Workbook
    FileToOpen = Application.GetOpenFilename(Title:="Browse for your File & Import Range", FileFilter:="Excel Files (*.xls*),*xls*")
    If FileToOpen <> False Then
        Set OpenBook = Application.Workbooks.Open(FileToOpen)
        OpenBook.Sheets(1).Range("A1:E20").Copy
        ThisWorkbook.Worksheets("SelectFile").Range("A10").PasteSpecial xlPasteValues
        OpenBook.Close False
    End If
End 

I need to modify this code to refer combobox section can anyone help me with this