Кредит на изображението: mavoimages/iStock/Getty Images
Научаването как да използвате функцията "Roundup" на Excel от вградения език за програмиране VBA или Visual Basic за приложения, ви помага да стартирате всяка функция на Excel от VBA. Това умение е полезно, защото Excel има много функции, които VBA няма и които може да се наложи да приложите от VBA програма. Обърнете внимание, че функцията VBA, която ви позволява да използвате функцията „Roundup“, няма да ви предупреди за неправилен синтаксис или аргумент, както би било при използване на стандартния интерфейс на работен лист.
Предназначение
Функцията "Roundup" на Excel закръглява число нагоре до броя цифри, които сте посочили. Например, стартирането на "Roundup (2.2, 0)" казва на Excel, че искате да закръгли числото 2.2 до следващото цяло число. "0" във втория аргумент казва на Excel, че не искате никакви цифри след десетичната запетая, което е еквивалентно на това да кажете, че искате целочислен отговор.
Видео на деня
VBA кръгла функция
VBA няма вградена функция "Roundup". Най-близката функция, която има, е функцията "Кръгли", която закръгля нагоре или надолу в зависимост от това дали крайната цифра в числото, което закръглявате, е по-голяма или по-малка от 5. Например, въвеждането на "Round (2.2, 0)" в прозореца "Immediate" на VBA води до 2, вместо 3, до което функцията "Roundup" на Excel би закръгляла.
Свойство "Формула".
Въпреки че VBA няма собствена функция "Roundup", той може да използва функцията "Roundup" на Excel. За да инструктирате VBA да направи това, задайте свойството "Formula" на виртуалния обект "Range" на функцията "Roundup". Следващият пример ви показва как да направите това. Отворете средата за разработка на VBA, като натиснете "Alt" и "F11" едновременно от Excel. Щракнете с мишката в прозореца "Незабавно", след което въведете следното изявление: "Обхват ("A1").Формула = "=Roundup (2.2, 0)"." Върнете се в Excel, като използвате току-що описаното натискане на клавиша "Alt-F11". Ще видите резултата "3" в клетка A1, което показва, че вашето изявление е приложило успешно функцията "Roundup" на Excel.
Интерактивен пример
Можете да направите интерактивна VBA програма, която приема от потребител аргументите за функцията "Roundup" и показва резултата от тази функция. След като отворите средата за разработка на VBA, поставете следната програма в прозореца:
Public Sub roundUpANumber() Dim a1, a2, s a1 = CDbl (InputBox("Въведете числото, което искате да закръглите")) a2 = CInt (InputBox("Въведете броя на десетичните знаци, до които бихте искали да закръглите числото, което току-що въведохте.")) s = "=Roundup(" & a1 & "," & a2 & ")" Range("A1").Формула = s Range("A1") .Изчислете MsgBox (Обхват("A1"). Стойност) Край под
Стартирайте програмата, като щракнете върху един от нейните изрази, след което щракнете върху командата "Изпълни" в менюто "Изпълни". Когато Excel ви подкани за аргументите на функцията, въведете ги и натиснете „Enter“. Вашата програма ще покаже резултата от функцията "Roundup" за въведените от вас аргументи.
