Funkcija za pregledovanje Excel in VBA

Dela na prenosnem računalniku v kavarni

Zasluga slike: mavoimages/iStock/Getty Images

Učenje uporabe Excelove funkcije "Roundup" iz vgrajenega programskega jezika VBA ali Visual Basica za aplikacije vam pomaga zagnati katero koli Excelovo funkcijo iz VBA. Ta veščina je uporabna, ker ima Excel veliko funkcij, ki jih VBA nima in jih boste morda morali uporabiti iz programa VBA. Upoštevajte, da vas funkcija VBA, ki vam omogoča, da se dotaknete funkcije "Roundup", ne bo opozorila na napačno sintakso ali argument, kot bi pri uporabi standardnega vmesnika delovnega lista.

Namen

Excelova funkcija "Roundup" zaokroži število navzgor na število števk, ki jih določite. Na primer, izvajanje "Roundup (2.2, 0)" pove Excelu, da želite, da zaokroži število 2,2 na naslednje celo število. "0" v drugem argumentu pove Excelu, da ne želite nobenih števk za decimalno vejico, kar je enako, kot če bi rekli, da želite celoštevilski odgovor.

Video dneva

Okrogla funkcija VBA

VBA nima vgrajene funkcije "Roundup". Najbližja funkcija, ki jo ima, je funkcija "Okrogla", ki zaokrožuje navzgor ali navzdol, odvisno od tega, ali je končna številka v številu, ki ga zaokrožujete, večja ali manjša od 5. Če na primer vnesete "Round (2.2, 0)" v okno VBA "Immediate", bo rezultat 2 namesto 3, na katerega bi funkcija Excel "Roundup" zaokrožila navzgor.

Lastnost "Formula".

Čeprav VBA nima lastne funkcije "Roundup", lahko uporablja Excelovo funkcijo "Roundup". Če želite naročiti VBA, naj to stori, nastavite lastnost "Formula" navideznega objekta "Range" na funkcijo "Roundup". Naslednji primer vam pokaže, kako to storite. Odprite razvojno okolje VBA tako, da v Excelu hkrati pritisnete "Alt" in "F11". Kliknite miško v oknu "Takoj" in vnesite naslednji stavek: "Range ("A1").Formula = "=Roundup (2.2, 0)"." Vrnite se v Excel s pritiskom na tipko "Alt-F11" pravkar opisano. V celici A1 boste videli rezultat "3", kar pomeni, da je vaša izjava uspešno uporabila Excelovo funkcijo "Roundup".

Interaktivni primer

Lahko naredite interaktivni program VBA, ki od uporabnika sprejme argumente za funkcijo "Roundup" in prikaže rezultat te funkcije. Ko odprete razvojno okolje VBA, v okno prilepite naslednji program:

Public Sub roundUpANumber() Dim a1, a2, s a1 = CDbl (InputBox("Vnesite število, ki ga želite zaokrožiti")) a2 = CInt (InputBox("Vnesite število decimalnih mest, na želite zaokrožiti število, ki ste ga pravkar vnesli.")) s = "=Roundup(" & a1 & "," & a2 & ")" Range("A1").Formula = s Range("A1") .Izračunaj MsgBox (Obseg("A1").Vrednost) Konec Sub

Zaženite program tako, da kliknete enega od njegovih stavkov, nato pa kliknete ukaz "Zaženi" v meniju "Zaženi". Ko vas Excel pozove k argumentom funkcije, jih vnesite in pritisnite "Enter". Vaš program bo prikazal rezultat funkcije "Roundup" za argumente, ki ste jih vnesli.