Прибавление к числу в ячейках вводимых чисел на другом

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Прибавление к числу в ячейках вводимых чисел на другом (Макросы/Sub)

olleganise

Дата: Воскресенье, 17.02.2019, 21:50 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Прибавление к числу в ячейках одного листа вводимых чисел на другом новом листе с такой же таблицей
Как это сделать?

Сообщение отредактировал olleganise - Воскресенье, 17.02.2019, 21:51

Ответить

Pelena

Дата: Воскресенье, 17.02.2019, 22:03 | Сообщение № 2

Группа: Админы

Ранг: Местный житель

Сообщений: 19405

Репутация: 4555 ±

Замечаний: ±

Excel 365 & Mac Excel

Файл с примером помог бы в понимании проблемы

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

vikttur

Дата: Воскресенье, 17.02.2019, 22:05 | Сообщение № 3

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2941

Репутация: 526 ±

Замечаний: 0% ±

В модуль листа, из которого берутся данные
[vba]

Код

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Range("B3"), Target) Is Nothing Then
        With Worksheets("Лист2").Range("B3")
            .Value = .Value + Target.Value
        End With
    End If
End Sub

[/vba]

Ответить

olleganise

Дата: Пятница, 22.02.2019, 18:38 | Сообщение № 4

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Pelena, Вот пример. Мне хочется, чтобы после создания нового листа с именем числа создания. при внесении в соответствующие графы этой таблицы на листе 1 к имеющимся данным приплюсовывалось или (если это необходимо ) вычиталось число.

К сообщению приложен файл: 17-1-.xlsm (27.7 Kb)