|
Как с двух разных ячеек изменять значение в третьей?
|
|
|
Predator92 |
Дата: Вторник, 02.06.2020, 17:02 |
Сообщение № 1 |
|
|
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 124
Репутация:
0
±
Замечаний:
20% ±
Excel 2016 | |
Доброе время суток! подскажите можно ли как то просто сделать чтобы с двух не связанных ячеек менять значение в третьей ячейке?
объясните пожалуйста а лучше наглядный пример!
Спасибо за понимание друзья!
Доброе время суток! подскажите можно ли как то просто сделать чтобы с двух не связанных ячеек менять значение в третьей ячейке?
объясните пожалуйста а лучше наглядный пример!
Спасибо за понимание друзья!Predator92
|
| |
| Ответить
|
|
Nic70y |
Дата: Вторник, 02.06.2020, 17:10 |
Сообщение № 2 |
|
|
Группа: Друзья
Ранг: Экселист
Сообщений: 9122
Репутация:
2415
±
Замечаний:
0% ±
Excel 2010 | |
что значит менять?
присваивать значение последней измененной, несвязанной или что-то другое?
что значит менять?
присваивать значение последней измененной, несвязанной или что-то другое?Nic70y
ЮMoney 41001841029809
|
| |
| Ответить
|
|
Predator92 |
Дата: Вторник, 02.06.2020, 17:19 |
Сообщение № 3 |
|
|
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 124
Репутация:
0
±
Замечаний:
20% ±
Excel 2016 | |
Predator92, скидываю файл надеюсь поймете!
Predator92, скидываю файл надеюсь поймете!Predator92
|
| |
| Ответить
|
|
Predator92 |
Дата: Вторник, 02.06.2020, 17:21 |
Сообщение № 4 |
|
|
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 124
Репутация:
0
±
Замечаний:
20% ±
Excel 2016 | |
Predator92, Вот чтобы так было!
|
| |
| Ответить
|
|
Nic70y |
Дата: Вторник, 02.06.2020, 17:24 |
Сообщение № 5 |
|
|
Группа: Друзья
Ранг: Экселист
Сообщений: 9122
Репутация:
2415
±
Замечаний:
0% ±
Excel 2010 | |
ну я угадал
[vba]Код Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("f9, f16")) Is Nothing Then
Range("h12") = Target
End If
End Sub
ну я угадал
[vba]Код Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("f9, f16")) Is Nothing Then
Range("h12") = Target
End If
End Sub
К сообщению приложен файл:
18.xlsm
(16.0 Kb)
ЮMoney 41001841029809
|
| |
| Ответить
|
|
Predator92 |
Дата: Вторник, 02.06.2020, 17:27 |
Сообщение № 6 |
|
|
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 124
Репутация:
0
±
Замечаний:
20% ±
Excel 2016 | |
Predator92, он не открывается!
|
| |
| Ответить
|
|
Nic70y |
Дата: Вторник, 02.06.2020, 17:30 |
Сообщение № 7 |
|
|
Группа: Друзья
Ранг: Экселист
Сообщений: 9122
Репутация:
2415
±
Замечаний:
0% ±
Excel 2010 | |
у меня открывается.
скопируйте макрос с сообщения,
правой кнопкой мыши по листу в своем файле - исходный текст -
откроется модуль - вставьте
сохраните файл с поддержкой макросов
у меня открывается.
скопируйте макрос с сообщения,
правой кнопкой мыши по листу в своем файле - исходный текст -
откроется модуль - вставьте
сохраните файл с поддержкой макросовNic70y
ЮMoney 41001841029809
Сообщение отредактировал Nic70y - Вторник, 02.06.2020, 17:31 |
| |
| Ответить
|
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
