Вычислить НДС стандартными функциями Excel достаточно просто, однако иногда боишься ошибиться в важном документе. Чтобы этого избежать в надстройке VBA-Excel добавлена формула =НДС. С помощью нее можно определить величину налога на добавленную стоимость или вычесть НДС из суммы.
Функция =НДС(ЧИСЛО; ТОЛЬКО_НДС; СТАВКА) имеет следующие аргументы:
Далее пример, демонстрирующий как просто определить величину НДС с помощью этой функции.
Чтобы определить сумму без НДС достаточно задать еще один аргумент ТОЛЬКО_НДС = 0.
Если ставка НДС отличается от 18%, то проблема решается еще одним дополнительным аргументом - СТАВКА.
Public Function НДС(ByVal ЧИСЛО As Double, Optional ByVal ТОЛЬКО_НДС As Boolean = True, Optional ByVal СТАВКА As Double = 0.18) If ТОЛЬКО_НДС = True Then НДС = ЧИСЛО - ЧИСЛО / (1 + СТАВКА) Else НДС = ЧИСЛО / (1 + СТАВКА) End If End Function