Составить программу для начисления премии работникам предприятия в зависимости от стажа - VB
Формулировка задачи:
Здравствуйте.
Написал прогу на VBA для начисления премии работникам предприятия в зависимости от стажа работы.
Что я сделал не так???
Не понимаю.
Помогите мне пожалуйста понять.
Решение задачи: «Составить программу для начисления премии работникам предприятия в зависимости от стажа»
textual
Листинг программы
Public Sub ОператорElseIf()
Dim Стаж As Integer
Dim Премия As Currency
Dim Данные As Object
Set Данные = Sheets("Данные")
Стаж = Данные.Range("C4").Value
If Стаж < 5 Then
Премия = 500
ElseIf Стаж <= 10 Then
Премия = 1000
ElseIf Стаж <= 15 Then
Премия = 2000
Else
Премия = 5000
End If
End Sub