WORD VBA将项目从excel文件添加到用户表单列表框中

Question

如何将项目加载到word userform1列表框1中来自桌面文件名book1 sheet1 table1(4列A-D(中的excel文件

Answer 1

MyListBox.List = Application.Workbooks.Open("C:Users" & environ("Username") & "DesktopBook1.xlsx").Worksheets("Sheet1").ListObjects("Table1").DataBodyRange.Columns(1).Resize(,4).Value