Kuidas uurida rakke makro abil
Kas soovite lahtreid hinnata ja määrata, mitu lahtrit on vahemikus täidetud ja mitu mitte? Järgmisel joonisel on näide:
A1: B7 marker sisaldab mõnda tühja lahtrit ja mõnda täidetud lahtrit. Kui soovite seda makros hinnata, saate kasutada järgmist programmi koodi:
AlamarvestusedTäidetud lahtrid ()
Pimendusnumber sama pikk
Hämardatud arv2 nii pikk
Hämardatud ala vahemikuna
Dim a String
Määra ala = Valik
Number = rakendus. ArvA (pindala)
Loendus 2 = piirkond. Lahtrid. Loend - arv
a = MsgBox ("Praeguses valikus on" _
& Number & lahtrid täidetud ja & number2 _
& "Lahtrid tühjad.", VbOKOnly, "hinnata lahtreid")
End Sub
Makro määrab funktsiooni KrahvA mitte-tühjade lahtrite arvu lugemiseks vahemikus. Tulemus salvestab muutuja number. Täidetud rakkude arvu määramiseks lahutatakse see väärtus uuritud rakkude koguarvust. Makro salvestab selle väärtuse Number2.
Pärast käivitamist määrab programmi kood aktiivse märgistuse täidetud ja tühjade lahtrite arvu ning kuvab tulemuse aknas:
Kui soovite praeguse valiku asemel töödelda teie valitud vahemikku, kohandage väärtuse määramine muutujaga piirkonnas kl. Seda kasutatakse makroga koos atribuudiga Valik ühendatud. Kui soovite selle asemel ise vahemikku määratleda, asendage see seatud-Muutujale määramine piirkonnas järgmise avaldise abil:
Määra vahemik = vahemik ("A1: B5")
Vahemiku spetsifikatsioon viitab alati aktiivsele töölehele. Kui soovite käsitleda mõnda muud töölehte, pange selle ette VahemikKäsk viited meetoditele Töövihikud ja Lehed fikseeritud.
