Ši pamoka paaiškins, kas yra nuoroda ir kaip jas naudoti VBA redaktoriuje
Jei dirbate naudodami „Excel VBA“ ir norite dirbti su objektais, pasiekiamais kitoje programoje, pavyzdžiui, „Microsoft Word“, turite pridėti nuorodą į tos programos objektų biblioteką.
Pridėkite nuorodą į savo VBA projektą
VBE lange spustelėkite Įrankiai meniu, tada spustelėkite Nuorodos…
Slinkite žemyn per nuorodų sąrašą, kad surastumėte norimą naudoti nuorodą. Šiuo atveju „Microsoft Word 16.0“ objektų biblioteka.
Spustelėkite GERAI.
Objektų bibliotekos peržiūra
Pridėję nuorodą į duomenų bazę, galite naudoti objektus, susietus su programa, į kurią nurodėte. The OBJEKTŲ BIBLIOTEKA Šią programą galite naudoti „Excel“.
Spustelėkite Objektų naršyklė mygtuką ant Standartinis įrankių juosta.
ARBA
Spustelėkite Peržiūrėti meniu ir pasirinkite Objektų naršyklė.
Pasirinkite Žodis iš išskleidžiamojo sąrašo
Dabar galėsite peržiūrėti visus objektus, jų metodus ir ypatybes, kuriuos dabar galite naudoti naudodami „Excel VBA“ kodą.
Nuorodos naudojimas „Excel“ procedūroje
Sukūrę nuorodą, galite naudoti objektus iš objektų bibliotekos savo VBA kode „Excel“. Toliau nurodyta procedūra sukurs naują „Word“ dokumentą ir „Word“ bus matoma jūsų ekrane.
| 123456789101112 | Sub CreateWordDocument ()Dim wdApp kaip Word.ApplicationDim wdDoc kaip Word.Dokumentas'atviras žodisNustatykite wdApp = New Word.Application“sukurkite dokumentąNustatykite wdDoc = wdApp.Documents.Add'įveskite kai kuriuos dalykuswdApp.Selection.TypeText "Labas rytas Melanie!"“Rodyti žodį ekranewdApp.Visible = TiesaPabaiga Sub |
Ankstyvas ir vėlyvas įrišimas
Nuorodos į objektų biblioteką įtraukimas į projektą vadinamas Ankstyvas įrišimas. Tai leidžia visus tos objektų bibliotekos objektus naudoti programiškai jūsų VBA projekte. Kadangi jau pridėjote nuorodą į „Microsoft Word“ objektų biblioteką atlikdami aukščiau nurodytą procedūrą, mes galime tiesiogiai kreiptis į „Word“ programą ir „Word“ dokumentą, kai deklaruojame kintamuosius „wdApp“ ir „wdDoc“ naudodami Naujas metodas.
Tačiau vis tiek galite naudoti kitos programos objektų biblioteką, nepridėdami nuorodos į ją savo kode. Jums reikės deklaruoti kintamuosius wdApp ir wdDoc kaip objektus, o tada naudoti „CreateObject“ metodas, o ne Naujas metodas sukurti naują „Microsoft Word“ egzempliorių.
| 123456789101112 | Sub CreateWordDocument ()Dim wdApp kaip objektasDim wdDoc kaip objektas'atviras žodisNustatykite wdApp = CreateObject ("Word.Application")“sukurkite dokumentąNustatykite wdDoc = wdApp.Documents.Add“įveskite tekstąwdApp.Selection.TypeText Text: = "Labas rytas Melanie!"“Rodyti žodį ekranewdApp.Visible = TiesaPabaiga Sub |
Vėlyvojo įrišimo naudojimas yra naudingas, jei kuriama programa bus naudojama keliuose įrenginiuose. Jei vartotojas turi kitokią „Microsoft Office“ versiją nei jūs, gali būti, kad kompiuteryje nėra teisingo objektų bibliotekos failo. Pvz., Jei naudojate „Excel“ 16 versiją, bet jie naudoja „Excel“ 15 versiją, gali būti, kad trūksta nuorodos.
Tai galite lengvai išspręsti pašalindami varnelę šalia trūkstamos nuorodos, tada slinkite žemyn, kad surastumėte teisingą nuorodą, ir pažymėkite ją.
