精选优质文档-倾情为你奉上VBS操作Excel常见方法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内容 . 3、如果是XP系统,可以使用如下代码 Dim objFileDlg Set objFileDlg = CreateObject(UserAccounts.CommonDialog) objFileDlg.Filter = Excel File (*.xls) |*.xls If objFileDlg.ShowOpen Then msgbox 您选择的文件是: & objFileDlg.FileName & vbCrLf End If VBS控制Excel的一些常见方法: (一