Прескочи на основното съдържание

Как автоматично да копирате клетка в клипборда с едно щракване в Excel?

Автор: Силувия Последна промяна: 2020-06-19

Обикновено, когато копирате клетка в клипборда, трябва първо да изберете клетката и след това да натиснете Ctrl + C ключ, за да го копирате. Как автоматично да копирате клетка, като просто щракнете върху нея, без да натискате бързите клавиши? Методът в тази статия може да ви помогне.

Автоматично копиране на клетка в клипборда чрез щракване с VBA код


Автоматично копиране на клетка в клипборда чрез щракване с VBA код

Следният VBA код може да ви помогне да копирате клетка в клипборда, като просто щракнете върху нея в Excel. Моля, направете следното.

1. Отворете работния лист, който искате автоматично да копирате клетки в клипборда, щракнете с десния бутон върху раздела на листа и след това изберете Преглед на кода от менюто с десен бутон. Вижте екранна снимка:

2. В откриването Microsoft Visual Basic за приложения прозорец, моля, копирайте кода на VBA в прозореца на кода.

VBA код: Автоматично копиране на клетка в клипборда чрез щракване

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Not Intersect(Target, Range("A1:A9")) Is Nothing Then
        Target.Copy
    End If
End Sub

Забележка: В кода A1:A9 са клетките, които автоматично ще копирате в клипборда. Моля, променете го според вашите нужди.

3. Натисни Друг + Q ключове за затваряне на Microsoft Visual Basic за приложения прозорец.

Когато щракнете върху която и да е клетка от диапазон A1:A9, клетката ще бъде копирана автоматично в клипборда, както е показано на екранната снимка по-долу.

След това можете да изберете целева клетка и да натиснете клавиша Enter, за да поставите копираното съдържание.


Още по темата:

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How can I past the data i have selected to another cell automatically using the same piece of VBA code ?
This comment was minimized by the moderator on the site
Hi Jan Lorier,

To automatically copy the selected data to another cell, try the VBA code on this page: Auto copy and paste cell in current sheet with VBA
This comment was minimized by the moderator on the site
i just want to do reverse of it like i copied text data from other software now as i click on excel i want that data to be paste automatically without me being pressing Control plus V. please provide VBA code for it please i need that a lot.
This comment was minimized by the moderator on the site
its working great. thanks
This comment was minimized by the moderator on the site
Muito obrigado!
Trabalhei por alguns anos no ctrl C crtl V de uma mesma planilha de dados para o sistema que eu uso no trabalho... essa simples ação de já selecionar copiando me tirou um "fardo" enorme das atividades diárias!
Deus abençoe!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations