Sub kniga() Dim x As Single, y As Single x = 3 If x 0 And x < 2 Then y = Sqr(x * x -...

Question

Sub kniga() Dim x As Single, y As Single x = 3 If x <> 0 And x < 2 Then y = Sqr(x * x - 1) - x Else: If x > 5 Then y = 2 * x If x < 5 And x > 2 Then y = ошибка End If End Sub Пишет else without if если что это vba

Comments

я выставил новый вопрос с условиемм

---

тут нельзя редачить

---

Вы приложили какой-то код, который написан с ошибкой(ами), который не понятно что должен делать. Нет ни условия, ни вопроса.

---

это эксель

---

какой язык?

Answer 1

Ответ:

Однострочная конструкция:

• If <условие> Then <Делаем чего-нибудь>

Многострочная конструкция:

• If <условие> Then
•   <Делаем чего-нибудь одно>
•   <Делаем чего-нибудь другое>
• Else
•   <Делаем чего-нибудь иное одно>
•   <Делаем чего-нибудь иное другое>
• End if

Comments

Шаблон я и так знаю

---

Да-да, "чего-нибудь одно" тоже своими руками писал.
В задаче синтаксические ошибки, я написал правильный шаблон, если Вы сами не можете исправить, поясните как и что должно быть, так как по вашему неправильно написанному коду это не понятно.

---

чего-нибудь одно

---

ага

---

И с нета не копировал - сам писал ; (