win cmd在Excel中打开特定电子表格的内容是什么？

Question

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

Answer 1

1. 将以下代码粘贴到文本编辑器中（NotePad，WordPad，Word 等）
2. 使用“vbs”扩展名保存文件，例如
   ExcelSheet2.vbs
3. 将此行strFileName = "c:\temp\testa.xlsx"更改为您的 所需的Excel文件路径
4. 然后，您可以通过输入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

Answer 2

或者，您可以从命令行打开工作簿，并将以下代码添加到工作簿以激活“Sheet2”

Private Sub Workbook_Open()

    ThisWorkbook.Sheets("Sheet2").Activate

End Sub

您需要确保工作簿位于受信任位置，并且安全设置允许宏运行。 @ brettdj的解决方案非常优越，但这是另一种选择。