Как да приложа бутон за изчистване на конкретни клетки в Excel?
Обикновено можете да задържите Ctrl за да изберете множество конкретни клетки и след това изчистете съдържанието на клетката, както ви е необходимо. Ако винаги трябва да изчиствате тези конкретни клетки от време на време, можете да създадете бутон за изчистване, за да ги изчистите само с едно щракване. В тази статия ще говоря за това как да създадете бутон за изчистване на всички, за да изчистите съдържанието на някои конкретни клетки.
Приложете бутон за изчистване на конкретно съдържание на клетка с VBA код
Приложете бутон за изчистване на конкретно съдържание на клетка с VBA код
Първо, трябва да създадете бутон с форма и след това да приложите код, накрая да свържете кода с бутона с форма. Моля, направете следното:
1. Щракнете Поставете > Фигури > правоъгълници за да изберете формата на правоъгълник и след това плъзнете мишката, за да нарисувате правоъгълен бутон където и да е на листа, както ви е необходимо, вижте екранната снимка:
2. След това въведете текста и форматирайте бутона за форма, както ви е необходимо, вижте екранната снимка:
3. След това трябва да вмъкнете VBA кода, моля, задръжте ALT + F11 за да отворите Microsoft Visual Basic за приложения прозорец. Кликнете Поставете > Модулии поставете следния код в Модули Window.
VBA код: Изчистване на съдържанието на клетките от конкретни клетки:
Sub Clearcells()
'Updateby Extendoffice
Range("A2", "A5").Clear
Range("C10", "D18").Clear
Range("B8", "B12").Clear
End Sub
Забележка: В горния код: A2, A5 указва, че ще изчисти клетките в диапазона A2: A5, не само двете клетки поотделно, можете да добавите множество диапазони, като напр Диапазон ("B8", "B12"). Изчистване скрипт в кода за изчистване.
4. След това запазете и затворете прозореца на кода и след това свържете кода с бутона за форма, щракнете с десния бутон върху бутона и изберете Присвояване на макрос, В Присвояване на макрос диалогов прозорец, изберете Clearcells кодово име от Име на макрос списъчно поле и щракнете OK бутон за излизане от този диалогов прозорец. Вижте екранна снимка:
5. И сега, когато щракнете върху Изчисти всички бутон, конкретните клетки, които сте дефинирали, се изчистват наведнъж, вижте екранната снимка:
Най-добрите инструменти за продуктивност в офиса
Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време. Щракнете тук, за да получите функцията, от която се нуждаете най-много...
Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна
- Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
- Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!