Что такое win cmd для открытия определенной таблицы в Excel? - PullRequest
3 голосов
/ 13 января 2012

Я знаю, что вы можете открыть файл Excel из строки win cmd.Но как бы вы открыли конкретную электронную таблицу в этом файле, используя win cmd?

Ответы [ 2 ]

5 голосов
/ 14 января 2012
  1. Вставьте следующий код в текстовый редактор (Блокнот, WordPad, Word и т. Д.)
  2. Сохраните файл с расширением "vbs", например
    ExcelSheet2.vbs
  3. Измените эту строку strFileName = "c:\temp\testa.xlsx" на нужный путь к файлу Excel
  4. Затем вы можете запустить это из командной строки, введя путь к вашему VBS-файлу

Код содержит ошибкуобработка в случае неправильного пути к файлу или отсутствия второго листа.

[ Обновлено: добавлена ​​дополнительная обработка ошибок для проверки того, что второй лист скрыт]

sample

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
0 голосов
/ 14 января 2012

В качестве альтернативы вы можете открыть книгу из командной строки и добавить приведенный ниже код в книгу, чтобы активировать «Лист2» ​​

Private Sub Workbook_Open()

    ThisWorkbook.Sheets("Sheet2").Activate

End Sub

Необходимо убедиться, что книга находится в надежном месте, а настройки безопасности позволяют запускать макрос. Решение @ brettdj намного лучше, но это альтернатива.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...