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

Как да маркирате цял / цял ред, докато превъртате в работен лист на Excel? 

Автор: Xiaoyang Последна промяна: 2020-05-29

Ако имате голям работен лист с множество колони, ще ви бъде трудно да разграничите данните в този ред. В този случай можете да маркирате целия ред от активна клетка, така че да можете бързо и лесно да преглеждате данните в този ред, когато превъртате надолу хоризонталната лента за превъртане. В тази статия ще говоря за някои трикове за решаване на този проблем .

Маркирайте целия ред при превъртане с VBA код

Маркирайте целия ред / колона / ред и колона при превъртане с Kutools за Excel


Следният VBA код може да ви помогне да маркирате динамично ред от избрана клетка, моля, направете следното:

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

doc маркиране на целия ред 1

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

VBA код: Маркирайте целия ред при превъртане

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'Updateby Extendoffice
Cells.Interior.ColorIndex = 0
Target.EntireRow.Interior.ColorIndex = 8
End Sub

3. След това запазете и затворете този код, сега, когато щракнете върху клетка, целият ред на тази избрана клетка ще бъде маркиран, както са показани следните екранни снимки:

doc маркиране на целия ред 2
1
doc маркиране на целия ред 3

Забележки:

1. Можете да промените цвета на осветяването на друг, който харесвате в този скрипт "Target.EntireRow.Interior.ColorIndex = 8”, сменете номера 8 към друг цветен индекс.

2. Ако искате да деактивирате този код, просто трябва да отидете на Microsoft Visual Basic за приложения прозорец и изтрийте кода.

3. Този код също може да подчертае редовете на избрания диапазон от клетки като следния резултат:

doc маркиране на целия ред 4

4. Този код се прилага само към текущия работен лист.

5. Ако има няколко цветни клетки във вашия работен лист, цветът на клетката ще бъде загубен, когато приложите този код.


Ако искате да изпробвате нов инструмент -- Kutools за Excel, Със своята Оформление за четене, можете лесно да маркирате целия ред или цялата колона или реда и колоната на активната клетка.

Kutools за Excel : с повече от 300 удобни добавки за Excel, безплатни за изпробване без ограничение за 30 дни. 

След инсталиране Kutools за Excel, моля, направете следните стъпки:

1. Изберете клетка или диапазон от клетки, където искате да маркирате редовете.

2. Щракнете Kutools > Оформление за четене падащ бутон > Четене на настройките на оформлението, вижте екранна снимка:

3. В Четене на настройките на оформлението диалогов прозорец, изберете един тип, който трябва да маркирате реда или колоната под Фигури и след това задайте стил на тази форма, като в същото време можете да изберете други опции, като цвят или прозрачност, според нуждите ви, вижте екранната снимка:

Съвети: Ако искате да маркирате реда и колоната на избраната клетка, моля, изберете Кръст под Фигури раздел и изберете вертикална линия за да маркирате цялата колона на активната клетка.

4. След като завършите настройките в диалоговия прозорец, щракнете върху Ok, и сега, когато щракнете върху клетка, целият ред ще бъде маркиран наведнъж. И ще бъде динамично преместен, когато избраните клетки се променят.

Забележки:

1. Можете да отмените тази помощна програма, като премахнете отметката от Оформление за четене отново.

2. Това Оформление за четене се прилага към всички работни листове във вашата работна книга.

3. Това Оформление за четене функцията ще бъде деактивирана, когато стартирате работната книга следващия път.

4. С тази помощна програма вашата цветна клетка ще бъде запазена.

Кликнете, за да научите повече подробности за това оформление за четене.

Изтеглете и изпробвайте безплатно Kutools за Excel сега!


Kutools за Excel: с повече от 300 удобни добавки за Excel, безплатни за изпробване без ограничение за 30 дни. Изтеглете и изпробвайте безплатно сега!

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

🤖 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 (10)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
grazie
Molto utile ,
Ho un problema però, annulla l'eventuale colore delle celle che seleziono o se volessi impostare altro colore a una cella quando la seleziono mi scompare.
grazie
This comment was minimized by the moderator on the site
Hello, andrea

It may be difficult to modify the VBA code, so, here, I recommend you to apply the Conditional Formatting feature for solving this problem, please view the below article:
https://www.extendoffice.com/documents/excel/3500-excel-highlight-selected-row-conditional-formatting.html

Or you can use the Kutools for Excel' Reading Layout feature, you can try it 30 days for free.
Please download from: https://www.extendoffice.com/download/kutools-for-excel.html
This comment was minimized by the moderator on the site
This is so cool, but it removes any existing highlights from cells unless they are the result of conditional formatting. Any way to avoid that?
This comment was minimized by the moderator on the site
Hello, BHarris
It may be difficult to modify the VBA code, so, here, I recommend you to apply the Conditional Formatting feature for solving this problem, please view the below article:
https://www.extendoffice.com/documents/excel/3500-excel-highlight-selected-row-conditional-formatting.html

Or you can use the Kutools for Excel' Reading Layout feature, you can try it 30 days for free.
Please download from: https://www.extendoffice.com/download/kutools-for-excel.html
This comment was minimized by the moderator on the site
Does not work for MS Office - Excel 2016
This comment was minimized by the moderator on the site
is there a way to get it to only do a set of 4 cells along the specific row?
This comment was minimized by the moderator on the site
Hello, David,
The following VBA code can help you to highlight the cells that you selected, please try it. Hope it can help you!

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cells.Interior.ColorIndex = 0
Target.Interior.ColorIndex = 8
End Sub
This comment was minimized by the moderator on the site
Hi thanks for providing the code....it is so useful for our report, but actually for my report the hyperlink is there in the other sheet in the same workbook and highlighted cell is there in the next sheet, that selected cell row total should be selected. but while running this code im getting a run-time error '1004'. will you please help me on this ...
This comment was minimized by the moderator on the site
Thank You for this !
This comment was minimized by the moderator on the site
Thank you for the code to highlight the whole row. It is *AWESOME* and is going to make scrolling spreadsheets so much easier.
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations