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

Как да изберете и маркирате диагонални клетки в Excel?

Автор: Слънце Последна промяна: 2020-09-04

В Excel обикновено трябва да изберем няколко клетки, но опитвали ли сте някога да изберете и маркирате диагоналните клетки в диапазон? В тази статия ще представя VBA код за бързо избиране на диагонални клетки за вас.

Изберете и маркирайте диагонални клетки


Изберете и маркирайте диагонални клетки

За да изберете диагонални клетки, можете да използвате макро код.

1. Изберете клетката, която искате да започнете диагоналната селекция, и натиснете Alt + F11 клавиши за активиране на Microsoft Visual Basic за приложения прозорец.

2. кликване Поставете > Модули и поставете кода по-долу към скрипта.

VBA: Изберете диагонални клетки

Sub selectDiag()
'UpdatebyExtendoffice20171128
    Dim I As Long
    Dim xCount As Long
    Dim xRg As Range
    On Error Resume Next
    Set xRg = ActiveCell
    If xRg Is Nothing Then Exit Sub
    xCount = Val(InputBox("How many cells do you want to select diagonally?", "KuTools For Excel"))
    If xCount = 0 Then Exit Sub
    For I = 1 To (xCount - 1)
        Set xRg = Union(xRg, ActiveCell.Offset(I, I))
    Next I
    xRg.Select
End Sub

3. Натиснете F5 и се появява диалогов прозорец, който ви напомня да изберете клетки, въведете броя на диагоналните клетки, които искате да изберете, в текстовото поле.
doc изберете диагонал 1

4. кликване OK. Диагоналните клетки в селекцията са избрани.
doc изберете диагонал 2

След това можете да маркирате клетките с цвета на фона.
doc изберете диагонал 3



Относителни статии

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

🤖 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 (2)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Your comments are not working.
This comment was minimized by the moderator on the site
Oh well, looks like comments are working after all.

Thank you for this post. It works great. I have tried to tweak the code to allow me to select a certain number of cells down, and then across.

For example:

A1,
A2, B2,
A3, B3, C3,
       B4, C4,
             C5


Is there a way to accomplish this?
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations