Я пытаюсь использовать файл VBS, чтобы открыть файл Excel. Мне нравится эта идея, потому что она позволяет минимизировать рабочую книгу при запуске. Ни один код, который я пробовал в событии Workbook Open, не делает этого успешно. Запуск занимает 7-10 секунд (частично из-за большого количества кода, больше из-за того, что мой компьютер стар)
Основной интерфейс рабочей книги - пользовательская форма. Цель состоит в том, чтобы открыть с видимой пользовательской формой и свернуть рабочую книгу, но при необходимости ее можно нажать одним нажатием кнопки на пользовательской форме. Лента также скрыта, чтобы дать больше недвижимости, но доступна при нажатии другой кнопки при необходимости. Как я уже сказал, с любым кодом, который я использую, рабочая книга не будет go невидимой до завершения запуска.
Я обнаружил идею использования VBS здесь в старом потоке, и мне показалось, что Работа. Но когда книга отображается, лента отключена. Даже ручная вставка строки для отображения ленты ничего не делает. Если я открою рабочую книгу прямо из папки файла, лента будет доступна при необходимости. Поэтому я не думаю, что проблема присуща .xlsm.
Добавьте сюда, что я ничего не знал о коде VBS - просто нашел его здесь и попробовал. Я использую следующий код:
Option Explicit
Dim xlApp, xlBook
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Open("C:\Users\Nick\Desktop\2020\2020", 0, False)
Есть ли в этом коде что-то, что отключает ленту, или что-то, что мне нужно добавить, чтобы en смог это сделать? Я не знаю, что означает ноль. Я попытался заменить его на 1, а затем на 2, но ничего не изменилось.