Последние записи
- Реакция на клик по ячейке в Excel
- Как в Excel сделать так, чтобы при нажатии на ячейку менялось цифровое значение?
- Как эффективнее обрабатывать большой файл по кускам?
- Событие по изменению Edit.Text
- Как сделать картинку адаптивной, само растягивающейся к размеру монитора, чтобы размер баннера изменялся сам — подстраивался под дизайн сайта
- Прозрачность тайлсета в TPNGImage
- Как сделать VBA макрос в excel
- Поиск по столбцу 1-ого не нулевого значения (формулой в Microsoft Office Excel)
- Простановка единиц в ячейки под объектами (Microsoft Office Excel)
- Расчет затраченного времени между определенным рабочим временем (формулой в Microsoft Office Excel)
19th
Июл
Как в Excel сделать так, чтобы при нажатии на ячейку менялось цифровое значение?
Posted by obzor under VBA
Как в Excel сделать так, чтобы при нажатии на ячейку менялось цифровое значение? Есть пронумерованное поле из 16 ячеек (1, 2, 3…16), необходимо, чтобы при нажатии любой ячейки, например, 3, вместо значения 3 появлялось любое другое значение от 1 до 9.
не знаю где оно у вас, у меня в ячейках «E7:E22»
Код:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("E7:E22")) Is Nothing Then
If IsNumeric(Target.Value) Then
Randomize
Target.Value = Int((9 * Rnd) + 1)
End If
End If
End SubПохожие статьи
за 2 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru |
пеллетные котлы
Пеллетный котел Emtas
Наши форумы по программированию:
- Форум Python
- Форум PHP
- Delphi форумы
- Форумы C (Си)
- Java
- Форум WinApi
- Форум низкоуровневое программирование
- Форум VBA
- Форум Excel
- Форум OpenGL
- Форум DirectX
- Форум CAD
- Форум по операционным системам
- Форум по администрированию серверов и VDS А ещё
- Обсуждаем софт на форуме программистов