Екцел ВБА функција квадратног корена (СКР)
У ВБА имамо уграђену функцију која се назива „СКР“, ова функција враћа квадратни корен за дати број наведен у улазу. Функција Скуаре Роот захтева само један аргумент за своју функцију, тј. Нумбер.
СКРТ је функција квадратног корена и у екцелу и у ВБА. Метода за коришћење ове функције је следећа СКР (број) и користи се за израчунавање квадратног корена датог броја у екцелу; међутим, номенклатура је другачија и написана је као СКРТ у поређењу са СКР у ВБА.
Испод је синтакса функције СКР.
Број: За овај аргумент морамо навести број за који покушавамо да пронађемо квадратни корен. Број може бити директни унос броја или броја додељеног променљивој или је број са референцом на ћелију важећи.
Ова функција је доступна са обе функције радног листа као и са ВБА функцијом, али на радном листу је доступна као СКРТ.
Примери квадратног корена у програму Екцел ВБА
Пример # 1
Сада ћемо покушати да напишемо код да бисмо пронашли квадратни корен за број 64.
Прво покрените ВБА потпрограм.
Шифра:
Суб Скуаре_Роот_Екампле () Крај Суб
Дефинишите две променљиве као целобројне, једна је за чување броја, а друга за приказ резултата квадратне вредности корена.
Шифра:
Суб Скуаре_Роот_Екампле () Дим АцтуалНумбер Ас Интегер Дим СкуареНумбер Ас Интегер Енд Суб
За променљиву „АцтуалНумбер“ доделите вредност броја 64.
Шифра:
Суб Скуаре_Роот_Екампле () Дим АцтуалНумбер Ас Интегер Дим СкуареНумбер Ас Интегер АцтуалНумбер = 64 Енд Суб
За другу променљиву ћемо доделити вредност квадратног корена, унети име променљиве, ставити једнако синг и отворити СКР функцију.
Једини аргумент функције СКР је „Нумбер“, јер смо променљивој „АцтуалНумбер“ већ доделили број 64, наведимо исто име променљиве у функцији СКР.
Затим прикажи резултат у оквиру за поруку. Сада је квадратни корен број додељен променљивој "СкуареНумбер" показује исто име променљиве у пољу за поруке.
Шифра:
Суб Скуаре_Роот_Екампле () Дим АцтуалНумбер Ас Интегер Дим СкуареНумбер Ас Интегер АцтуалНумбер = 64 СкуареНумбер = Скр (АцтуалНумбер) МсгБок СкуареНумбер Енд Суб
Ок, то је све што смо завршили са кодирањем.
Покрените код помоћу екцел тастера пречице Ф5 и погледајте шта ћемо добити у оквиру за поруку.
Квадратни корен броја 64 је 8, тј. 8 * 8 = 64
Пример # 2
Још једна ствар коју морамо имати на уму приликом израчунавања скрт-а у ВБА је када је променљиви тип података цео или дугачак, резултат се заокружује на најближу целу вредност или вредност целог броја.
На пример, ако покушавате да пронађете квадратни корен за број 70, за то не постоји квадратни корен, али у ВБА се приказује као 8 само зато што је 8 најближа цела вредност квадратног корена.
Погледајте доњи код.
Шифра:
Суб Скуаре_Роот_Екампле1 () Дим АцтуалНумбер Ас Интегер Дим СкуареНумбер Ас Интегер АцтуалНумбер = 70 СкуареНумбер = Скр (АцтуалНумбер) МсгБок СкуареНумбер Енд Суб
Стварни резултат броја квадратних корена за 70 је 8,3666, али са ВБА ће се заокружити на најближу целобројну вредност 8.
Једна ствар коју можемо учинити да бисмо исправили ову грешку је да морамо променити тип података променљиве „СкуареНумбер“ у „Доубле“.
Шифра:
Суб Скуаре_Роот_Екампле1 () Дим АцтуалНумбер Ас Интегер Дим СкуареНумбер Ас Доубле АцтуалНумбер = 70 СкуареНумбер = Скр (АцтуалНумбер) МсгБок СкуареНумбер Енд Суб
Сада покрените код ручно или преко тастера Ф5 и погледајте резултат.
Као што видите, резултат је сада тачан, тј. 8.366602. То је због типа података који смо доделили променљивој „СкуареНумбер“.
Ствари које треба запамтити
- У ВБА је проналажење квадратног корена бројевне формуле СКР, а на радном листу СКРТ.
- Број који достављамо функцији СКР треба да буде позитиван број, иначе ћемо добити #НУМ! грешка.
