Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Изменение значения ячейки при определенной комбинации - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Изменение значения ячейки при определенной комбинации (Формулы/Formulas)
Изменение значения ячейки при определенной комбинации
temnoo Дата: Четверг, 25.04.2019, 10:05 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 57
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
При нажатии три раза (или какая то другая комбинация клавиш) на определенную ячейку, например F3 должно происходить следующее:
1. Обнуляется значение ячейки F3
2. Копируется ячейка N2 (фиксированная ячейка)
3. Значение ячейки N2 умножается на -1 (что бы получить значение с обратным знаком)
4. Значение вставляется в ту ячейку на которую происходит тройной клик (в нашем случае F3)
Файл прикрепил.
К сообщению приложен файл: 3902518.xlsx (15.9 Kb)
 
Ответить
СообщениеПри нажатии три раза (или какая то другая комбинация клавиш) на определенную ячейку, например F3 должно происходить следующее:
1. Обнуляется значение ячейки F3
2. Копируется ячейка N2 (фиксированная ячейка)
3. Значение ячейки N2 умножается на -1 (что бы получить значение с обратным знаком)
4. Значение вставляется в ту ячейку на которую происходит тройной клик (в нашем случае F3)
Файл прикрепил.

Автор - temnoo
Дата добавления - 25.04.2019 в 10:05
Kostya_Ye Дата: Четверг, 25.04.2019, 12:56 | Сообщение № 2
Группа: Проверенные
Ранг: Обитатель
Сообщений: 271
Репутация: 228 ±
Замечаний: 0% ±

Excel 2016
Привязка к нажатию правой кнопки мыши.
Код вставить в модуль листа
[vba]
Код
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)

If Intersect(Target, Me.Range("F3")) Is Nothing Then
Else
    Target.Value = Me.Range("N2").Value
    Me.Range("N2").Value = -1 * Me.Range("N2").Value
    Cancel = True
End If

End Sub
[/vba]

По вашему описанию значение меняется только в ячейке F3, для остальных позиций на листе это не нужно ?
 
Ответить
СообщениеПривязка к нажатию правой кнопки мыши.
Код вставить в модуль листа
[vba]
Код
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)

If Intersect(Target, Me.Range("F3")) Is Nothing Then
Else
    Target.Value = Me.Range("N2").Value
    Me.Range("N2").Value = -1 * Me.Range("N2").Value
    Cancel = True
End If

End Sub
[/vba]

По вашему описанию значение меняется только в ячейке F3, для остальных позиций на листе это не нужно ?

Автор - Kostya_Ye
Дата добавления - 25.04.2019 в 12:56
temnoo Дата: Четверг, 25.04.2019, 13:01 | Сообщение № 3
Группа: Пользователи
Ранг: Участник
Сообщений: 57
Репутация: 0 ±
Замечаний: 20% ±

Excel 2007
правой кнопки мыши

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


Сообщение отредактировал temnoo - Четверг, 25.04.2019, 13:28
 
Ответить
Сообщение
правой кнопки мыши

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

Автор - temnoo
Дата добавления - 25.04.2019 в 13:01
Kostya_Ye Дата: Четверг, 25.04.2019, 14:08 | Сообщение № 4
Группа: Проверенные
Ранг: Обитатель
Сообщений: 271
Репутация: 228 ±
Замечаний: 0% ±

Excel 2016
temnoo,
Ctrl-C, Ctrl-V ?
 
Ответить
Сообщениеtemnoo,
Ctrl-C, Ctrl-V ?

Автор - Kostya_Ye
Дата добавления - 25.04.2019 в 14:08
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Изменение значения ячейки при определенной комбинации (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!