Windows

3 способа открыть приложения и развернуть Windows с помощью скрипта VB [Windows]

3 способа открыть приложения и развернуть Windows с помощью скрипта VB [Windows]

Если есть одна вещь, которую я люблю делать, это писать сценарии VB. Будь то файл сценария Windows или сценарий VBA внутри приложения, сценарии предоставляют возможность добавлять функциональность в приложения, где большинство других людей находят ограничения и препятствия.

Одна из самых распространенных функций, которые я обнаружил во многих своих сценариях, — это максимизация окна. Это может быть запуск приложения из сценария Windows или запуск документа Excel или Word в полноэкранном режиме для отображения в конференц-зале или в виде приложения в некотором роде.

Прелесть скриптов в том, что вам не нужно быть программистом, чтобы делать это, и вам не нужно устанавливать какое-либо специальное программное обеспечение. Если вы используете компьютер с Windows или какое-либо приложение с внутренним интерфейсом VBA, вы можете использовать эти функции. В этой статье я приведу три примера того, как вы можете максимизировать окна с помощью сценариев VB, но вы можете взять то, что я собираюсь показать вам здесь, и использовать его в любом другом сценарии, который вы, возможно, создаете.

Запуск приложений в максимизированном режиме

Прежде чем мы начнем, я быстро покажу вам, как вы можете запустить любое приложение в развернутом режиме, написав быстрый скрипт, который запускает эту программу с помощью оболочки Windows.

В команде Shell «Выполнить» есть параметр, в котором вы можете указать приложению, в каком режиме его запускать, и оно будет работать максимально. Вот как выглядит сценарий.

  <Работа>
  <script language = "VBScript"> 
  Вариант Явный
  При ошибке возобновить следующее 
  Дим WshShell
  Дим Ретваль
  Dim myPath 
  set WshShell = CreateObject ("WScript.Shell")    retVal = WshShell.Run ("C: \ temp \ firefox", 3) 
  WScript.Quit 
  </ Скрипт> 
  </ Работа> 

Вы можете заменить любую программу в строке, где у меня в настоящее время есть Firefox, и если приложение позволяет это. Это запустится развернуто. Некоторые приложения этого не делают. Например, эта техника работает для Firefox, но у Chrome, похоже, свой собственный разум. Несмотря на это, этот скрипт будет работать с большинством приложений.

Открытые документы развернуты в Word

Чтобы развернуть любой документ Word, используя не более чем командную кнопку в Word, вам нужно включить режим разработчика. Для этого нажмите кнопку Windows и выберите « Параметры Word» в нижней части раскрывающегося списка. В меню «Параметры» выберите « Показать вкладку разработчика на ленте ».

скрипт для максимизации окна

Теперь вы можете выбрать пункт меню «Разработчик» и использовать « режим разработки », в котором вы можете кодировать удивительные функции в ваших документах Word. Чтобы создать кнопку, которая позволяет развернуть документ в полноэкранном режиме, просто включите режим конструирования, нажмите кнопку с раскрывающимся списком «Формы» и нажмите на объект кнопки.

окно максимизации скрипта

Поместите кнопку в любое место в вашем документе. Щелкните правой кнопкой мыши на кнопке, выберите « CommandButton Object» и нажмите « Просмотреть код» . Теперь есть две вещи, которые вы можете сделать, чтобы максимизировать окно. Вы можете либо заставить само приложение Windows максимизировать таким образом.

  Application.WindowState = wdWindowStateMaximize 

Или вы можете сделать весь документ полноэкранным и полностью удалить панели инструментов заголовка.

  ActiveWindow.View.FullScreen = True 

При этом весь документ отображается в полноэкранном режиме с включенной только линейкой (если вы нажмете кнопку линейки в левом верхнем углу). Чтобы выйти из полноэкранного режима, просто нажмите клавишу Escape.

окно максимизации скрипта

Для чего это можно использовать? Хорошо, если у вас нет Microsoft Powerpoint, вы можете использовать эту функцию, чтобы использовать Word в качестве аналогичного инструмента отображения. Чтобы перейти на следующую страницу, просто прокрутите документ вниз.

Если вы не хотите использовать командную кнопку и предпочитаете, чтобы документ автоматически открывался в этом режиме, просто используйте приведенный выше код в функции Document_Open (). Вы можете получить доступ к этой функции в редакторе кода, выбрав « Документ » в левом раскрывающемся списке вверху окна кода и « Открыть » в правом раскрывающемся списке.

Открытые таблицы развернуты в Excel

То, что вы можете делать с VBA в Word, вы обычно можете делать и в Excel, за исключением того, что все будет немного по-другому. Вы можете включить панель инструментов разработчика так же, как в Word выше, но когда вы добавите кнопку, вы увидите, что Excel хочет, чтобы вы применили макрос. Все, что вам нужно сделать, это назвать новый макрос и нажать кнопку « Новый ». Это поместит вас в редактор кода.

окно максимизации скрипта

Здесь вы наберете код, чтобы развернуть электронную таблицу и убрать полосы прокрутки.

сценарий максимизировать

Если вы не привыкли к кодированию в VBA, вы заметите, что многие объекты, на которые вы можете ссылаться в своем коде, перечислены слева. Вы можете выполнить ряд действий на определенных листах и ​​книгах, а также на множестве объектов внутри этих листов. В этом случае вы ссылаетесь на само приложение Excel.

  Application.DisplayFullScreen = True 
  Application.CommandBars («Панель меню рабочего листа»). Enabled = False 

Вы можете выполнить ряд действий на определенных листах и ​​книгах, а также на множестве объектов внутри этих листов. В этом случае вы ссылаетесь на само приложение Excel. Этот код преобразует окно Excel в полноэкранный режим, а затем полностью удаляет строку меню в верхней части экрана.

скрипт для максимизации окна

Как и в Word, вы можете выйти из этого режима с помощью клавиши Escape, а также можете использовать тот же код на экране. Вы также можете использовать этот код в функциях Workbook_Open () или Worksheet_Activate (), чтобы включить полноэкранный режим без кнопки. Тем не менее, вы хотите выполнить свой сценарий, магия зависит от вас!

Поэтому запустите Notepad или MS Office и попробуйте эти сценарии. Задумывались ли вы о каком-то творческом использовании для запуска максимизированных приложений? Поделитесь своим опытом в разделе комментариев ниже.

Изображение предоставлено: Shutterstock

Похожие посты
Windows

Драйверы для Windows 10

Windows

Лучшие приложения для фотографии на вашем Windows Phone

Windows

Команды командной строки для панели управления апплетами

Windows

Официальное приложение SmugMug теперь доступно для Windows Phone