Преминаване към основното съдържание
Поддръжка
Влизане с Microsoft
Влезте или създайте акаунт.
Здравейте,
Изберете друг акаунт.
Имате няколко акаунта
Изберете акаунта, с който искате да влезете.

Може да искате записаният от вас макрос да се изпълнява автоматично, когато отворите определена работна книга. Следващата процедура използва пример, за да ви покаже как работи това. Може също да искате да изпълнявате макросите автоматично при стартиране на Excel.

Преди да започнете, уверете се, че в лентата е показан разделът Разработчик. За повече информация вижте Показване на раздела "Разработчик".

За да използвате примера по-долу, отворете нова работна книга.

Важно: Кодът на VBA не може да бъде отменен, така че не забравяйте да тествате кода в празна работна книга или копие на съществуваща работна книга. Ако кодът не прави това, което искате, можете да затворите работната книга, без да записвате промените.

  1. Щракнете върху > за разработчицина Visual Basic.

    Групата "Код" в раздела "Разработчик"

  2. Във VBA Project Explorer от лявата страна разгънете папката VBA Project за вашата работна книга, след което щракнете двукратно върху модула ThisWorkbook . Ако не виждате Project Explorer, можете да отидете на Преглед > Project Explorer или да натиснете Ctrl+R.

    Този модул на работна книга в редактора на Visual Basic (VBE)
  3. В прозореца на модула, който се отваря вдясно, вмъкнете следния код:

    Private Sub Workbook_Open()
    
    ' Put your code here
    
    End Sub
  4. Поставете записания код в процедурата Sub между редовете Sub и End Sub .

    Затворете редактора на Visual Basic (не е необходимо да записвате нищо).

  5. Запишете работната книга като работна книга на Excel Macro-Enabled (*xlsm) и я затворете.

Следващия път, когато отворите работната книга, кодът, който сте добавили към процедурата за Workbook_Open , ще се изпълни автоматично.

Преди да започнете, уверете се, че в лентата е показан разделът Разработчик. За да направите това:

  1. В менюто щракнете върху Предпочитания заExcel >... > лентата & лентата.

  2. В категорията Персонализиране на лентата , в списъка Основни раздели отметнете квадратчето Разработчик .

  3. Щракнете върху Запиши.

За да използвате примера по-долу, отворете нова работна книга.

Важно: Кодът на VBA не може да бъде отменен, така че не забравяйте да тествате кода в празна работна книга или копие на съществуваща работна книга. Ако кодът не прави това, което искате, можете да затворите работната книга, без да записвате промените.

  1. Щракнете върху > за разработчицина Visual Basic.

  2. Във VBA Project Explorer от лявата страна разгънете папката VBA Project за вашата работна книга, след което щракнете двукратно върху модула ThisWorkbook .

  3. В прозореца на модула, който се отваря вдясно, вмъкнете следния код:

    Private Sub Workbook_Open()
    
    ' Put your code here
    
    End Sub
  4. Поставете записания код в процедурата Sub между редовете Sub и End Sub .

    Затворете редактора на Visual Basic (не е необходимо да записвате нищо).

  5. Запишете работната книга като работна книга на Excel Macro-Enabled (*xlsm) и я затворете.

Следващия път, когато отворите работната книга, кодът, който сте добавили към процедурата за Workbook_Open , ще се изпълни автоматично.

Имате нужда от още помощ?

Винаги можете да попитате експерт в техническата общност на Excel или да получите поддръжка в Общността за отговори от.

Нуждаете ли се от още помощ?

Искате ли още опции?

Разгледайте ползите от абонамента, прегледайте курсовете за обучение, научете как да защитите устройството си и още.

Общностите ви помагат да задавате и отговаряте на въпроси, да давате обратна връзка и да получавате информация от експерти с богати знания.

Беше ли полезна тази информация?

Доколко сте доволни от качеството на езика?
Какво е повлияло на вашия потребителски опит?
Като натиснете „Подаване“, вашата обратна връзка ще се използва за подобряване на продуктите и услугите на Microsoft. Вашият ИТ администратор ще може да събира тези данни. Декларация за поверителност.

Благодарим ви за обратната връзка!

×