我知道您可以从 win cmd 行打开 Excel 文件。但是如何使用 win cmd 打开该文件中的特定电子表格?

最佳答案

  • 将以下代码粘贴到文本编辑器(记事本、写字板、Word
    等)
  • 以“vbs”扩展名保存文件,例如ExcelSheet2.vbs
  • 将此行 strFileName = "c:\temp\testa.xlsx" 更改为您的
    所需的 Excel 文件路径
  • 然后您可以通过输入 vbs 文件的路径名从命令行运行它

  • 如果文件路径错误或第二张表不存在,则代码具有错误处理功能。

    [ 更新: 添加了进一步的错误处理以测试隐藏的第二张纸]
    Const xlVisible = -1
    Dim objExcel
    Dim objWb
    Dim objws
    Dim strFileName
    strFileName = "c:\temp\test.xlsx"
    On Error Resume Next
    Set objExcel = CreateObject("excel.application")
    Set objWb = objExcel.Workbooks.Open(strFileName)
    Set objws = objWb.Sheets(2)
    On Error GoTo 0
    If Not IsEmpty(objws) Then
        If objws.Visible = xlVisible Then
            objExcel.Goto objws.Range("a1")
        Else
            wscript.echo "the 2nd sheet is present but is hidden"
        End If
        objExcel.Visible = True
    Else
        objExcel.Quit
        Set objExcel = Nothing
        If IsEmpty(objWb) Then
            wscript.echo strFileName & " not found"
        Else
            wscript.echo "sheet2 not found"
        End If
    End If
    

    关于windows - 在 Excel 中打开特定电子表格的 win cmd 是什么?,我们在Stack Overflow上找到一个类似的问题:https://stackoverflow.com/questions/8854263/

    10-10 12:45