Картик пита:
Работя върху код на събитие за подчертаване на активната клетка, основно показва промяна на цвета на фона на активната клетка. Използвах събитието за промяна и това променя стойността на активната клетка само когато стойността се промени.
Какъв готин въпрос. Номерът е да се използва събитието за промяна Worksheet_Selection вместо събитието Worksheet_Change. Този макрос за обработка на специални събития трябва да бъде въведен в кодовия екран, свързан с конкретния ви работен лист. Дискусия за това как да намерите това в панела на проекта е в този архивиран съвет.
След това ще въведете следния код:
Public OldRng As Range Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not OldRng Is Nothing Then OldRng.Interior.ColorIndex = xlNone End If Target.Interior.ColorIndex = 6 Set OldRng = Target End SubТази програма използва публична променлива, наречена OldRng, за да запомни последния избран диапазон, така че цветът да може да се върне обратно в бяло, когато изберете нов диапазон.
