Բաց թողնել հիմնական բովանդակությունը

Ինչպե՞ս գործարկել VBA մակրո, երբ բացվում կամ փակվում է աշխատանքային գիրքը:

Շատ դեպքերում մենք կարող ենք օգտագործել VBA կոդը `այն գործառնություններին հասնելու համար, որոնք Excel- ի ներկառուցված գործառույթները չեն աջակցում: Բայց երբևէ փորձե՞լ եք գործարկել VBA մակրոը աշխատանքային գրքի բացման կամ փակման յուրաքանչյուր ժամանակ: Այս հոդվածում ես ձեզ կասեմ, թե ինչպես գործարկել VBA կոդը ամեն անգամ աշխատանքային գիրքը բացելիս կամ փակելիս:

Գործարկել VBA կոդը, երբ փակվում կամ բացվում է աշխատանքային գիրքը


Գործարկել VBA կոդը, երբ փակվում կամ բացվում է աշխատանքային գիրքը

1. Միացնել աշխատանքային գիրքը, սեղմել Alt + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

2. Կրկնակի սեղմում Wրագրի այս աշխատանքային գիրքը - VBAProject պատուհանը բացել Այս աշխատանքային գիրքը (ծածկագիր) պատուհան.
փաստաթղթի գործարկման կոդը բացելիս կամ փակելիս 1

2. Կոդի պատուհանում ընտրեք Աշխատանքային տետր ձախ բացվող ցուցակից: Նկատեք, որ, լռելյայն, բաց կցուցադրվի աջ անկման ցուցակում, եթե ոչ, փոխեք այն բաց.
փաստաթղթի գործարկման կոդը բացելիս կամ փակելիս 2

3. Դրանից հետո պատճենեք ձեր սեփական կոդը առանց առաջին և վերջին տողի և տեղադրեք դրանց միջև Private Sub Workbook_Open() և End Sub ինչպես ցույց է տրված նկարում
փաստաթղթի գործարկման կոդը բացելիս կամ փակելիս 3

4. Այնուհետեւ կտտացրեք Փրկել Կոդը պահելու համար կոճակը ՝ բացվող հիշեցման երկխոսության դաշտում կտտացրեք Ոչ.
փաստաթղթի գործարկման կոդը բացելիս կամ փակելիս 4

5 Հետո ա Պահել As երկխոսություն է դուրս գալիս, ֆայլը պահեք որպես Excel մակրոներով աշխատունակ գիրք և ընտրեք թղթապանակ ֆայլը տեղադրելու համար:
փաստաթղթի գործարկման կոդը բացելիս կամ փակելիս 5

6: սեղմեք Փրկել կոճակ Այժմ կոդը գործելու է մինչ աշխատանքային գիրքը բաց է:

Եթե ​​ցանկանում եք գործարկել կոդը ամեն անգամ աշխատանքային գիրքը փակելու ժամանակ, ընտրեք Ապաակտիվացնել աջից բացվող ցուցակից Կոդ պատուհանը և պատճենեք այն կոդը, որի միջև կաշխատեք և կպցրեք Private Sub Workbook_Deactivate() և End Sub.

Գրասենյակի արտադրողականության լավագույն գործիքները

🤖 Kutools AI օգնականՀեղափոխություն կատարել տվյալների վերլուծության հիման վրա՝ Խելացի կատարում   |  Ստեղծեք ծածկագիր  |  Ստեղծեք հատուկ բանաձևեր  |  Վերլուծել տվյալները և ստեղծել գծապատկերներ  |  Invoke Kutools-ի գործառույթները...
Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
Super Փնտրել: Բազմաթիվ չափանիշների VLookup    Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar    Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները    Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
Լավագույն 15 գործիքների հավաքածու12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50+ Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...

Նկարագրություն


Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hello,

I have used this VBA code with some success. I find that when I am working on more than one workbook at a time, each time I switch the focus from the macro enabled workbook to another workbook, the macro is run. I don't want it to run until I actually manually "CLOSE" the file. Do you now how I can accomplish that?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations