控件代码求助
设置一个控件按键，点击按键，选择桌面上的excel,然后打开选中的excel,复制粘贴里面的数据到指定的sheet中。这个应该怎么写，请大神们赐教，非常感谢!
程序代码：
With Application.FileDialog(msoFileDialogFilePicker)
.InitialFileName = ThisWorkbook.Path & "\"
.AllowMultiSelect = True
.Filters.Clear
.Filters.Add "Excel Files", "*.xls*"
.Show
End With
