Как да промените стойността на клетката, като щракнете върху клетката?
Възможно ли е да променим стойността на клетката, като щракнем върху клетка в Excel? Например, когато щракнете върху конкретна клетка A1, първият път тя показва текст „Excel“, ако щракнете отново върху A1, се показва текст „Word“ и текст „Outlook“ се показва, когато щракнете върху това клетка за трети път. В този случай стойността в клетка A1 ще се повтаря от „Excel“ към „Word“ към „Outlook“ към „Excel“ …… както е показано на следната екранна снимка:
Променете стойността на клетката, като щракнете върху клетка с VBA код
Променете стойността на клетката, като щракнете върху клетка с VBA код
За да завършите тази задача в Excel, следният VBA код може да ви помогне, моля, направете следното:
1. Щракнете с десния бутон върху раздела на листа, върху който искате да промените стойността на клетката, и изберете Преглед на кода от контекстното меню и в отвореното Microsoft Visual Basic за приложения прозорец, копирайте и поставете следния код в празния модул:
VBA код: Променете стойността на клетката, като щракнете върху клетка:
Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)
'Updateby Extendoffice
Application.EnableEvents = False
With Target
If .Address = Range("A1").Address Then
Select Case .Value
Case "Excel"
.Value = "Word"
Case "Word"
.Value = "Outlook"
Case "Outlook"
.Value = "Excel"
Case Else
.Value = "Word"
End Select
End If
End With
Range("A2").Select
Application.EnableEvents = True
End Sub
Забележка: В горния код, A1 е клетката, в която искате да промените стойността, като щракнете върху „Excel","дума","перспектива” са стойностите на клетките, които искате да показвате периодично, можете да ги промените според вашите нужди.
2. След като поставите кода, запазете кода и затворете прозореца. Сега, когато щракнете върху клетка A1 за първи път, текстът „Excel“ се показва наведнъж, щракнете върху него отново, текстът „Word“ се появява, текстът „Outlook“ се показва, ако щракнете върху него трети път, виж екранна снимка:
Още свързани статии:
Как да филтрирате данни само като щракнете върху съдържанието на клетка в Excel?
Как да сортирате данни от колони, като щракнете върху заглавката в Excel?
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!