В тази статия ще създадем персонализирана функция за изчисляване на сумата от цифри в клетка.
Примерните данни за този пример се състоят от данни за продажбите. Всеки агент е продавал различен продукт. В клетка имаме брой продадени артикули, последвани от името на продукта. Искаме да намерим общия брой продадени артикули от всеки агент.
Създадохме функция „SumDigits“ за изчисляване на сумата от цифри в клетката. Тази функция приема диапазон от клетки като вход и връща сумата от цифри в клетката.
Логично обяснение
Създадохме персонализирана функция „SumDigits“ за изчисляване на сумата от цифри в клетка. В тази функция намираме дължината на низ в клетката и след това цикъл от първия знак до последния символ в низа. След това намираме и добавяме числовите стойности, намерени в низа, за да получим сумата от цифри.
Обяснение на кода
Средна (номер, i, 1)
Функцията Mid се използва за извличане на подниза от основния низ. Горният код ще извлича един символ от главния низ наведнъж.
IsNumeric (стойност)
Функцията IsNumeric се използва за проверка дали дадената стойност е числова.
Val (стойност)
Функцията Val се използва за преобразуване на низ в числова стойност.
Моля, следвайте кода по -долу
Опция Изрична функция SumDigits (номер като вариант) Dim i като цяло число за i = 1 до Len (номер) Ако е числов (среден (номер, i, 1)), тогава SumDigits = SumDigits + Val (среден (номер, i, 1)) Край Ако Следващ i Крайна функция
Ако този блог ви е харесал, споделете го с приятелите си във Facebook. Също така можете да ни следвате в Twitter и Facebook.
Ще се радваме да чуем от вас, уведомете ни как можем да подобрим работата си и да я направим по -добра за вас. Пишете ни на имейл сайта