Exceli VBA töövihik

Exceli faili nimetatakse töövihikuks ja igal töövihikul on lehed või lehed, mida nimetatakse töölehtedeks. Töölehed on ala, kus me kirjutame ja koostame andmetabeli. Ja töövihik sisaldab N arvu selliseid töölehti, millel võivad olla erinevad andmed. VBA-s saame kasutada töövihiku funktsiooni, isegi ilma exceli töövihikus midagi tegemata. Neile Excelis saadaolevatele funktsioonidele saame VBA-s juurde pääseda käsuridaga „ Rakendus . Töövihikud ”.

Kasutades excelis võrdusmärki (“=”), aktiveeritakse Excelis kõik sisestusfunktsioonid. Ja „ WorksheetFunction with dot (.) ” Kasutamine aktiveerib ja võimaldab Exceli funktsioone kasutada, nagu allpool näidatud.

Kuidas kasutada töövihje objekti Excel VBA-s?

Allpool on toodud erinevad näited töövihiku Objekti kasutamiseks Excelis VBA.

Selle VBA töövihiku Exceli malli saate alla laadida siit - VBA töövihiku Exceli mall

VBA töövihik - näide nr 1

Selles näites näeme, kuidas VBA töövihiku objekti abil töövihikut avada.

Selleks toimige järgmiselt.

1. samm: minge VBA aknasse ja avage uus moodul loendi Lisamise menüü abil, nagu allpool näidatud.

Kui klõpsate menüüs Lisa valikul Moodul, saate mooduli, kuhu kirjutame koodi.

2. samm: alustage funktsiooni VBA töövihiku alamkategooria kirjutamist mis tahes soovitud nimel või parem hoidke funktsiooni nime sama nimega, mida see täidab, nagu allpool näidatud.

Kood:

 Alam VBATööraamat1 () lõpp alam

3. samm: kasutage koodis nüüd töövihikute funktsiooni. See võimaldab töövihikut kasutada. Selle avamiseks kasutage käsku Ava pärast punkti (.) Panemist nagu allpool näidatud.

Funktsioonil Open endal on nii palju võimalusi ja viise suvalise töövihiku avamiseks, nagu on näidatud allolevas süntaksis.

Mis tahes töövihiku avamiseks vajame selle faili asukohta. Siin on juba salvestatud Exceli töövihik nimega “ Test File ” kuskile juurdepääsetavasse kõvakettale.

4. samm: Nagu ülaltoodud süntaksi puhul, vajame failinime stringina, mis tähendab märke. Nii et oleme kopeerinud ja kleepinud asukoha allpool ümberpööratud komadega. See on koht, kuhu saame panna mis tahes asukoha või failiaadressi, kus seda oleme hoidnud.

Kood:

 Alam VBAWorkbook1 () Workbooks.Open Filename: = "D: \ Test File.xlsx" End Sub

5. samm: nüüd tahame näidata faili nime, mis avatakse käsu Workbook.Open abil. Kasutame rakendust MsgBox koos rakendusega ActiveWorkbook.Name . Näitame nüüd avatud ja aktiivse töövihiku nime.

Kood:

 Alam VBAWorkbook1 () Workbooks.Open Filename: = "D: \ Test File.xlsx" MsgBox (ActiveWorkbook.Name & "Opened Now.") End Sub

6. samm: kompileerige sammhaaval kogu kood ja käivitage see, klõpsates nuppu Esita.

Näeme, et fail nimega „ Test File ” on nüüd avatud ja saime hüpikteate, mis ütleb, et „Test File is Opened Now” .

VBA töövihik - näide nr 2

See on veel üks näide, kus näeme, kuidas VBA WorkBook objekti kasutada, et seda kasutada mis tahes exceli töövihiku jaoks. Selleks toimige järgmiselt.

1. samm: alustage alamkategooria kirjutamist mis tahes nimega või parimate tavade jaoks peaks see toimingu nimel olema.

Kood:

 Alam VBAWorkbook2 () lõpp Alam

2. samm. Salvestatud testfaili avamiseks suvalises kohas järgige näites 1 kirjeldatud protseduuri. Alati on soovitatav salvestada juurdepääsetav fail. Selle käsuga avame faili mainitud aadressilt.

Kood:

 Alam VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" End Sub

3. samm: nüüd kasutame koos töövihiku funktsiooniga failinime ja teeme selle teksti või lisage sellele mõni tekst. Selleks valime käsu Sheet (1) abil lehe, kuhu soovite teksti sisestada. Sulgudes olevat numbrit 1 kasutatakse lehe järjestuse, mitte lehe nime jaoks ning vahemiku valimiseks lahtrist A1 kuni A5, nagu allpool näidatud.

Kood:

 Alam VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" Workbooks ("Test File.xlsx"). Sheets (1) .Range ("A1: A5") = "Test" End Sub

4. samm: kasutage nüüd töövihiku valimisel sama vormingut. Kasutasime “Test File”, seega kasutame seda siin, millele järgneb punkt (.) Ja salvestage. See salvestab faili.

Kood:

 Alam VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" Workbooks ("Test File.xlsx"). Sheets (1) .Range ("A1: A5") = "Test" Workbooks ("Test" Salvesta alamkaust

5. samm: Nüüd kasutame funktsiooni Töövihikud selle nimega, millele järgneb punkt (.) Ja sulgege valitud töövihiku sulgemiseks, nagu allpool näidatud.

Kood:

 Alam VBAWorkbook2 () Workbooks.Open Filename: = "D: \ Test File.xlsx" Workbooks ("Test File.xlsx"). Sheets (1) .Range ("A1: A5") = "Test" Workbooks ("Test" Salvestage töövihikud ("Test File.xlsx"). Sulgege alammenüü lõpp

6. samm: nüüd kompileerige kood ja käivitage see. Näeme, et koodis „Test” kasutatud tekst on nüüd kõikides vahemikes lahtrites A1 kuni A5 kopeeritud.

Ja me saame hoiatussõnumi, nagu allpool näidatud.

Klõpsake nuppu OK, mis salvestab faili ja suleb selle.

VBA töövihik - näide nr 3

Vaatame veel ühte näidet, kus kasutame objekti VBA töövihik. Selles näites näeme, kuidas töövihikut parooli abil kaitsta. See on üsna kasulik, kui lehel või töövihikus on olulisi andmeid ja ka kogu koodi käivitamisel peame seda kaitsma. Nii et töövihiku kaitsmine pärast tööd muutub abivajavaks tööks, et vältida andmete kaotamist.

Selleks toimige järgmiselt.

1. samm: alustage moodulis alamkategooria kirjutamist kasutatava funktsiooni nime all, nagu allpool näidatud.

Kood:

 Alam VBAWorkbook3 () lõpp alam

2. samm: kasutage nüüd käsku ActiveWorkbook, et valida parajasti avatud töövihik, millele järgneb punkt (.), Otsige ja valige loendist käsk Kaitse allpool näidatud viisil.

3. samm: pärast käsu Kaitsmine valimist näeme töövihikus kaitsmise lubamiseks kasutatavat süntaksit, nagu allpool näidatud.

Kood:

 Alam VBAWorkbook3 () ActiveWorkbook.Protect End Sub

4. samm: valige nüüd süntaksist parool ja valige parool ning lubage rakenduse Struktuur ja aken jaoks see TÕELISEKS.

Kood:

 Alam VBAWorkbook3 () ActiveWorkbook.Kaitse salasõna: = "TestPassword", struktuur: = True, Windows: = True End Sub

5. samm: nüüd kompileerige see ja käivitage pärast seda. Näeme, et meie praegune töövihik lukustatakse, mida saab näha menüü Läbivaatus menüü Kaitsta töövihikut allpool näidatud viisil. Selle avamiseks klõpsake suvandit Töövihiku kaitsmine .

5. samm: sisestage oma koodis valitud parool „ TestPassword ” ja klõpsake nuppu OK .

Meie praegune leht saab uuesti lahti.

Excel VBA töövihiku plussid

  • VBA töövihik võimaldab meil töötada töövihikus ilma, et midagi oleks tehtud lehel.
  • Saame VBA töövihiku objekti abil täita mis tahes toiminguid, selleks peame lihtsalt valima või aktiveerima lehe koodi kaudu.

Asjad, mida meeles pidada

  • Vea vältimiseks ärge unustage alati kogu koodi või rida-realt kompileerida.
  • Fail, millel on tohutud andmed ja mitu koodirida, kasutage andmete kaotamise vältimiseks alati suletut VBA töövihik.
  • Inimestel, kes on VBA kodeerimisega alustajad, on soovitatav mitte kasutada keerulist kodeerimisstruktuuri. Selle asemel, et proovida väikeste koodikomplektidega ja rakendada selle reaalse töö stsenaariumid.

Soovitatavad artiklid

See on VBA tööraamatu juhend. Siin arutatakse, kuidas kasutada töövihiku objekti Excel VBA-s koos mõnede praktiliste näidete ja allalaaditava excelimalliga. Võite vaadata ka meie teisi soovitatud artikleid -

  1. VBA objekti juhend
  2. Kaitske Exceli töövihikut
  3. VBA vahemiku lahtrid
  4. Jagage Exceli töövihikut

Kategooria:

VBA