文件名称:(转)VBS导excel.txt
文件大小:9KB
文件格式:TXT
更新时间:2017-02-09 18:08:20
VBS
dim oExcel,oWb,oSheet Set oExcel= CreateObject("Excel.Application") Set oWb = oExcel.Workbooks.Open("E:\其他\新装电话表.xls") Set oSheet = oWb.Sheets("Sheet1") MsgBox oSheet.Range("B2").Value '#提取单元格B2内容 '.....