Skip i'r prif gynnwys

Sut i redeg macro VBA pan fydd yn agored neu'n cau llyfr gwaith?

Mewn llawer o achosion efallai y byddwn yn defnyddio'r cod VBA i gyflawni'r gweithrediadau nad yw swyddogaethau adeiledig Excel yn eu cefnogi. Ond a ydych erioed wedi ceisio rhedeg y macro VBA ym mhob amser o agor neu gau'r llyfr gwaith. Yn yr erthygl hon, dywedaf wrthych sut i redeg y cod VBA wrth agor neu gau'r llyfr gwaith bob tro.

Rhedeg cod VBA pan fydd yn agos neu'n agored llyfr gwaith


Rhedeg cod VBA pan fydd yn agos neu'n agored llyfr gwaith

1. Galluogi'r llyfr gwaith, gwasgwch Alt + F11 allweddi i agor y Microsoft Visual Basic ar gyfer Ceisiadau ffenestr.

2. Cliciwch ddwywaith Llyfr Gwaith hwn yn y Prosiect - VBAProject cwarel i agor y Y Llyfr Gwaith hwn (Cod) ffenestr.
cod rhedeg doc pan fydd ar agor neu'n cau 1

2. Yn y ffenestr cod, dewiswch Llyfr Gwaith o'r gwymplen chwith. Sylwch, yn ddiofyn, bod y agored yn cael ei arddangos yn y gwymplen dde, os na, newidiwch hi i agored.
cod rhedeg doc pan fydd ar agor neu'n cau 2

3. Yna copïwch eich cod eich hun heb y llinell gyntaf a'r llinell olaf a'i gludo rhwng Private Sub Workbook_Open() ac End Sub fel y dangosir isod screenshot.
cod rhedeg doc pan fydd ar agor neu'n cau 3

4. Yna cliciwch Save botwm i achub y cod, yn y dialog atgoffa popping, cliciwch Na.
cod rhedeg doc pan fydd ar agor neu'n cau 4

5 Yna a Save As deialog pops allan, cadwch y ffeil fel Llyfr Gwaith Macro-alluogedig Excel a dewis ffolder i osod y ffeil.
cod rhedeg doc pan fydd ar agor neu'n cau 5

6. Cliciwch Save botwm. Nawr bydd y cod yn rhedeg tra bydd y llyfr gwaith ar agor.

Os ydych chi am redeg y cod wrth gau llyfr gwaith bob tro, dewiswch Dadactifadu o'r gwymplen dde yn y Côd ffenestr, a chopïwch y cod y byddwch chi'n rhedeg ac yn pastio rhyngddo Private Sub Workbook_Deactivate() ac End Sub.

Offer Cynhyrchiant Swyddfa Gorau

🤖 Kutools AI Aide: Chwyldro dadansoddi data yn seiliedig ar: Cyflawniad Deallus   |  Cynhyrchu Cod  |  Creu Fformiwlâu Personol  |  Dadansoddi Data a Chynhyrchu Siartiau  |  Invoke Swyddogaethau Kutools...
Nodweddion Poblogaidd: Darganfod, Amlygu neu Adnabod Dyblygiadau   |  Dileu Rhesi Gwag   |  Cyfuno Colofnau neu Gelloedd heb Colli Data   |   Rownd heb Fformiwla ...
Super-edrych: VLookup Meini Prawf Lluosog    VLookup Gwerth Lluosog  |   VLookup Ar Draws Taflenni Lluosog   |   Edrych Niwlog ....
Rhestr gwympo Uwch: Creu Rhestr Gollwng yn Gyflym   |  Rhestr Gollwng Dibynnol   |  Rhestr Gollwng Aml-ddewis ....
Rheolwr Colofn: Ychwanegu Nifer Penodol o Golofnau  |  Symud Colofnau  |  Toglo Statws Gwelededd Colofnau Cudd  |  Cymharwch Ystodau a Cholofnau ...
Nodweddion dan Sylw: Ffocws ar y Grid   |  Golwg Dylunio   |   Bar Fformiwla Mawr    Rheolwr Llyfr Gwaith a Thaflen   |  Llyfrgell Adnoddau (Testun Auto)   |  Dewiswr Dyddiad   |  Cyfuno Taflenni Gwaith   |  Amgryptio/Dadgryptio Celloedd    Anfon E-byst trwy Restr   |  Hidlo Super   |   Hidlo Arbennig (hidlo mewn print trwm/italig/strikethrough...) ...
15 Set Offer Gorau12 Testun offer (Ychwanegu Testun, Dileu Cymeriadau,...)   |   50 + Siart Mathau (Siart Gantt,...)   |   40+ Ymarferol Fformiwlâu (Cyfrifwch oedran yn seiliedig ar ben-blwydd,...)   |   19 mewnosod offer (Mewnosod Cod QR, Mewnosod Llun o'r Llwybr,...)   |   12 Trosi offer (Rhifau i Eiriau, Trosi arian cyfred,...)   |   7 Uno a Hollti offer (Rhesi Cyfuno Uwch, Celloedd Hollt,...)   |   ... a mwy

Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser.  Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...

Disgrifiad


Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer

  • Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
  • Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
  • Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!
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