Простая математика

Многие грешили на Excel, что при использовании формул в ячейке была прописана формула, и при копировании этой ячейки вставлялась формула, а не значение. Надо было вставлять данные как значение, а многи не знают даже как это делается.

VBA решает этот вопрос без проблем, потому что мы сразу будем заносить значение в ячейку, а не формулу.

Ну что ж, давайте посмотрим как вычислить элементарное.

Сложение

Сложим две ячейки. При использовании вычислительной техники нельзя забывать одно правило. Если по простому на бумаге все формулы пишут обычно в таком виде:

A + B = C

То вычислительная техника такой записи не поймёт, тут необходимо первым делом указывать переменную, в которой будет конечный результат. Выглядеть это должно так:

C = A + B

Так вот, наше сложение двух ячеек будет смотреться так:

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) + Cells(1, 3)

        End Sub

Это вырвжение говорит о том, что результат сложения ячеек В1 и С1 записывается в ячейке А1.

Сложим несколько ячеек:

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) + Cells(1, 3) + Cells(1, 4)

        End Sub

Возможно ли прибавить некоторую цифру к получившейся сумме? Конечно можно:

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) + 8

        End Sub

Вычитание

Вычитание аналогично как исложение:

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) - Cells(1, 3)

        End Sub

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) - Cells(1, 3) - Cells(1, 4)

        End Sub

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) - 6

        End Sub

Умножение

Умножение аналогично как исложение и вычитание:

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) * Cells(1, 3)

        End Sub

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) * Cells(1, 3) * Cells(1, 4)

        End Sub

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) * 4

        End Sub

Деление

Деление всё аналогично:

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) / Cells(1, 3)

        End Sub

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) / Cells(1, 3) / Cells(1, 4)

        End Sub

        Sub Primer()

            Cells(1, 1) = Cells(1, 2) / 2

        End Sub

Возникает один вопрос: А можно ли смешать эти действия?
Можно.

        Sub Primer()

            Cells(1, 1) = (Cells(1, 2) + Cells(1, 3)) * 2 - Cells(1, 4) / 6

        End Sub

При работе с арифметическими операциями не забываем только это правило:

C = A + B

Ещё один важный момент при работе с переменными - это описание переменных. Об этом в уроке ниже.