Evidențiați celula activă - Sfaturi Excel

Karthik întreabă:

Lucrez la un cod de eveniment pentru evidențierea celulei active, arătând practic schimbarea culorii de fundal a celulei active. Am folosit evenimentul de modificare și acest lucru schimbă valoarea celulei active numai atunci când valoarea s-a modificat.

Ce întrebare mișto. Trucul este să folosiți evenimentul de schimb Worksheet_Selection în locul evenimentului Worksheet_Change. Această macrocomandă specială de gestionare a evenimentelor trebuie introdusă în panoul de cod asociat cu foaia dvs. de lucru specială. O discuție despre cum să găsiți acest lucru în panoul de proiect este la acest sfat arhivat.

Apoi ați introduce următorul cod:

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

Acest program folosește o variabilă publică numită OldRng pentru a aminti ultima gamă care a fost selectată, astfel încât culoarea să poată fi readusă la alb când selectați o gamă nouă.