Hoe actieve cel of selectie in Excel te markeren?
Als u een groot werkblad heeft, is het misschien moeilijk voor u om in 茅茅n oogopslag de actieve cel of actieve selectie te achterhalen. Maar als de actieve cel / sectie een uitstekende kleur heeft, zal het geen probleem zijn om erachter te komen. In dit artikel zal ik het hebben over hoe u automatisch de actieve cel of het geselecteerde celbereik in Excel kunt markeren.
Markeer actieve cel of selectie met VBA-code
Markeer actieve cel of selectie met VBA-code
De volgende VBA-code kan u helpen om de actieve cel of een selectie dynamisch te markeren, doe dit als volgt:
1. Houd de ALT + F11 toetsen om de te openen Microsoft Visual Basic for Applications-venster.
2. Kies dan Dit Werkboek van links Projectverkenner, dubbelklik erop om het Module, en kopieer en plak vervolgens de volgende VBA-code in de lege module:
VBA-code: markeer actieve cel of selectie
Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)
'Update 20140923
Static xLastRng As Range
On Error Resume Next
Target.Interior.ColorIndex = 6
xLastRng.Interior.ColorIndex = xlColorIndexNone
Set xLastRng = Target
End Sub
3. Sla vervolgens deze code op en sluit deze, en ga terug naar het werkblad. Wanneer u nu een cel of een selectie selecteert, worden de geselecteerde cellen gemarkeerd en wordt deze dynamisch verplaatst wanneer de geselecteerde cellen veranderen.
Opmerkingen:
1. Als u het Project Explorer-paneel in het venster kunt u klikken Bekijk > Projectverkenner in de Microsoft Visual Basic for Applications-venster om het te openen.
2. In de bovenstaande code kunt u wijzigen .KleurIndex = 6 kleur naar een andere kleur die u mooi vindt.
3. Deze VBA-code kan worden toegepast op alle werkbladen in de werkmap.
4. Als uw werkblad enkele gekleurde cellen bevat, gaat de kleur verloren als u op de cel klikt en vervolgens naar een andere cel gaat.
Gerelateerd artikel:
Hoe rij en kolom van actieve cellen automatisch te markeren in Excel?
Beste Office-productiviteitstools
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar effici毛ntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen. Klik hier om de functie te krijgen die u het meest nodig heeft...
Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker
- Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
- Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!