xls表格批量导入到xls表格

excel2.获取 (“Excel.Application”)
excel2.写属性 (“Visible”, 真)
workbooks2 ＝ excel1.读对象型属性 (“Workbooks”, )
workbooks2.方法 (“open”, 取运行目录 () ＋ “\” ＋ 到文本 (组合框1.现行选中项) ＋ “日台账结存.xlsx”)
excel表格对象2 ＝ excel2.读对象型属性 (“Activesheet”, )
' 行 ＝ excel表格对象2.读对象型属性 (“UsedRange”, ).读对象型属性 (“Rows”, ).读数值属性 (“Count”, )
excel单元格对象2 ＝ excel2.读对象型属性 (“Cells”, )