Екцел - Означите активни ред

Ова мала функција наглашава ред у којем се курсор тренутно налази.

Додај у листу модула:

 Привате Суб Ворксхеет_СелецтионЦханге (БиВал Таргет Ас Ранге)
Статиц АнцАдресс
'Ако је активација / деактивација функције имплементирана додајте линију испод
ако је АцтиватионЛине тада излаз из под
Ако је Таргет.Цоунт> 1 Затим изађите из Суб
Ако се АнцАдресс 0 тада врати у нормалу
Редови (АнцАдресс) .Интериор.ЦолорИндек = клНоне
Редови (АнцАдресс) .Фонт.ЦолорИндек = 0
Енд Иф
Таргет.ЕнтиреРов.Фонт.ЦолорИндек = 6
Таргет.ЕнтиреРов.Интериор.ЦолорИндек = 3
Таргет.ЕнтиреРов.Интериор.Паттерн = клСолид
АнцАдресс = Таргет.Ров
Енд Суб

Додај у општи модул (нпр. Модул1)

Ако желите да активирате / деактивирате функцију:

• Или ставите дугме на макро
• Или ставити пречицу

Тренутни ред ће бити означен подразумевано, кликните на дугме или пречицу да бисте променили његов статус:

 Публиц АцтиватионЛигне као боолеан
Суб Ацтивате ()
АцтиватионЛигне = не АцтиватионЛигне
енд суб