ВБА Роундуп Фунцитон за заокруживање бројева у Екцелу

Преглед садржаја

Екцел ВБА РоундУп функција

Слично функцији радног листа где заокружујемо бројеве на најближе цијеле бројеве, у ВБА имамо функцију РоундУп која нам смањује децималну тачку, а синтакса функције заокруживања је сљедећа Роунд уп (Нумбер, Нумбер оф Дигитс Афтер Децимал) ) ова два аргумента у функцији су обавезна.

Када радимо са бројевима и прорачунима, разломљене бројеве добијамо након целог броја, а то је прилично уобичајено у свакодневном пословању. Обично се не оптерећујемо децималним вредностима јер то не утиче на наш крајњи резултат. У тим ситуацијама морамо бројеве заокружити на најближи цео број или непосредни цео број. Коришћењем функције РоундУп заправо можемо извршити овај задатак.

Ако сте у ВБА тражили функцију РоундУп, онда је сигурно нисте пронашли јер је то функција радног листа. Да бисмо приступили функцији РоундУп, морамо да користимо класу ВБА Ворксхеет Фунцтион.

Пре овога, сетите се синтаксе функције РоундУп.

Примери

Извршимо задатак заокруживања броја „288.5264“. Видећемо све бројеве на овом примеру.

Пример # 1 - Када је други аргумент нула

Погледајте доленаведени ВБА код.

Шифра:

Суб РоундУп_Екампле1 () Дим к Ас Доубле к = ВорксхеетФунцтион.РоундУп (288.5264, 0) МсгБок к Енд Суб
  • Када покренете горњи код, он ће претворити наведени број, тј. 288,5264, у најближи цео број, тј. 289

Пример # 2 - Када је Други аргумент 1

Погледајте доњи код да видите шта се дешава када један додамо као други аргумент.

Шифра:

Суб РоундУп_Екампле2 () Дим к Ас Доубле к = ВорксхеетФунцтион.РоундУп (288.5264, 1) МсгБок к Енд Суб
  • Овај код ће претворити дати број у једну децималну тачку, тј. 288,6

Пример # 3 - Када је Други аргумент 2

Погледајте доњи код да видите шта се дешава када два додамо као други аргумент.

Шифра:

Суб РоундУп_Екампле3 () Дим к Ас Доубле к = ВорксхеетФунцтион.РоундУп (288.5264, 2) МсгБок к Енд Суб
  • Овај код ће претворити дати број у две децимале, односно 288,53

Пример # 4 - Када је други аргумент 3

Погледајте доњи код да видите шта се дешава када три додамо као други аргумент.

Шифра:

Суб РоундУп_Екампле4 () Дим к Ас Доубле к = ВорксхеетФунцтион.РоундУп (288.5264, 3) МсгБок к Енд Суб
  • Овај код ће претворити дати број у три децимале, односно 288,527

Пример # 5 - Када је Други аргумент -1

Погледајте доњи код да бисте видели шта се дешава када као други аргумент додамо минус један.

Шифра:

Суб РоундУп_Екампле5 () Дим к Ас Доубле к = ВорксхеетФунцтион.РоундУп (288.5264, -1) МсгБок к Енд Суб
  • Овај код ће претворити дати број на најближих десет, тј. 290.

Пример # 6 - Када је Други аргумент -2

Погледајте доњи код да видите шта се дешава када као други аргумент додамо минус два.

Шифра:

Суб РоундУп_Екампле6 () Дим к Ас Доубле к = ВорксхеетФунцтион.РоундУп (288.5264, -2) МсгБок к Енд Суб
  • Овај код ће претворити дати број на најближих стотину, односно 300.

Пример # 7 - Када је Други аргумент -3

Погледајте доњи код да бисте видели шта се дешава када као други аргумент додамо минус три.

Шифра:

Суб РоундУп_Екампле7 () Дим к Ас Доубле к = ВорксхеетФунцтион.РоундУп (288.5264, -3) МсгБок к Енд Суб
  • Овај код ће претворити број у најближу хиљаду, односно 1000.

На овај начин, функцију РОУНДУП у ВБА можемо користити као део класе функције радног листа за заокруживање бројева на основу датог другог аргумента.

Занимљиви Чланци...