Karthik megkérdezi:
Dolgozom egy eseménykódon, hogy kiemeljem az aktív cellát, alapvetően megmutassam az aktív cella háttérszínének megváltoztatását. A változás eseményt használtam, és ez csak akkor változtatja meg az aktív cella értékét, ha az érték megváltozott.
Milyen klassz kérdés. A trükk az, hogy a Worksheet_Selection változás eseményt használja a Worksheet_Change esemény helyett. Ezt a különleges eseménykezelő makrót be kell írni az adott munkalaphoz társított kód ablaktáblába. Ennek az archivált tippnek a fejtegetése arról, hogyan lehet ezt megtalálni a projekt ablaktáblában.
Ezután írja be a következő kódot:
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 SubEz a program az OldRng nevű nyilvános változóval emlékezik az utoljára kijelölt tartományra, hogy a szín visszaállítható fehérre, amikor új tartományt választ.
