Note: The other languages of the website are Google-translated. Back to English

Hur markerar jag aktiv cell eller markering i Excel?

Om du har ett stort kalkylblad kanske det är svårt för dig att snabbt ta reda på den aktiva cellen eller det aktiva urvalet. Men om den aktiva cellen / sektionen har en enastående färg, kommer det inte att vara ett problem att ta reda på det. I den här artikeln kommer jag att prata om hur man automatiskt markerar den aktiva cellen eller det valda cellområdet i Excel.

Markera aktiv cell eller markering med VBA-kod

Fliken Office Aktiverar flikredigering och surfning i Office, och gör ditt arbete mycket enklare ...
Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%
  • Återanvänd allt: Lägg till de mest använda eller komplexa formlerna, diagrammen och allt annat till dina favoriter och återanvänd dem snabbt i framtiden.
  • Mer än 20 textfunktioner: Extrahera nummer från textsträng; Extrahera eller ta bort en del av texterna; Konvertera siffror och valutor till engelska ord.
  • Sammanfoga verktyg: Flera arbetsböcker och ark till en; Slå ihop flera celler / rader / kolumner utan att förlora data; Slå samman duplicerade rader och summa.
  • Dela verktyg: Dela data i flera ark baserat på värde; En arbetsbok för flera Excel-, PDF- eller CSV-filer; En kolumn till flera kolumner.
  • Klistra över Dolda / filtrerade rader; Räkna och summa av bakgrundsfärg; Skicka personliga e-postmeddelanden till flera mottagare i bulk.
  • Superfilter: Skapa avancerade filterscheman och tillämpas på alla ark; Svart per vecka, dag, frekvens och mer; Filter med fetstil, formler, kommentarer ...
  • Mer än 300 kraftfulla funktioner; Fungerar med Office 2007-2021 och 365; Stöder alla språk; Enkel implementering i ditt företag eller organisation.

pil blå höger bubbla Markera aktiv cell eller markering med VBA-kod

Följande VBA-kod kan hjälpa dig att markera den aktiva cellen eller ett urval dynamiskt, gör så här:

1. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic for Applications-fönstret.

2. Sedan Välj Denna arbetsbok från vänster Project Explorerdubbelklicka på den för att öppna Modulerna, och kopiera och klistra sedan in följande VBA-kod i den tomma modulen:

VBA-kod: Markera aktiv cell eller markering

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

doc-highlight-active-cell-1

3. Spara och stäng sedan den här koden och gå tillbaka till kalkylbladet, när du väljer en cell eller ett val markeras de markerade cellerna och den flyttas dynamiskt när de markerade cellerna ändras.

Anmärkningar:

1. Om du inte hittar Project Explorer-rutan i fönstret kan du klicka utsikt > Project Explorer i Microsoft Visual Basic for Applications-fönstret för att öppna den.

2. I ovanstående kod kan du ändra .ColorIndex = 6 färg till annan färg du gillar.

3. Denna VBA-kod kan tillämpas på alla kalkylblad i arbetsboken.

4. Om det finns några färgade celler i kalkylbladet försvinner färgen när du klickar på cellen och sedan flyttar till en annan cell.


Relaterad artikel:

Hur markerar jag rad och kolumn för aktiv cell automatiskt i Excel?


De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

  • återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
  • Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
  • Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
  • Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
  • Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
  • Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
  • Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
  • Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
  • Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2021 och 365. Stöder alla språk. Enkel implementering i ditt företag eller organisation. Fullständiga funktioner 30 dagars gratis provperiod. 60 dagars pengarna tillbaka-garanti.
kte-flik 201905

Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

  • Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
  • Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
  • Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!
officetab botten
Sortera kommentarer efter
Kommentarer (16)
Inga betyg än. Bli först med att betygsätta!
Denna kommentar minimerades av moderatoren på webbplatsen
Lysande! Jag har använt din kod för att markera en cell. Det fungerar perfekt för det jag gör. Använder hundratals hyperlänkar för att flytta mellan arbetsblad och arbetsböcker. gör färden så mycket lättare. Tack för ditt lilla VBA-manus.
Denna kommentar minimerades av moderatoren på webbplatsen
Bra!! Men vad händer om jag inte vill tappa den tidigare tilldelade cellfärgen? Det vore bättre att veta.
Denna kommentar minimerades av moderatoren på webbplatsen
Ja, det skulle jag också vilja veta. Hur skulle du behålla de tidigare markerade cellerna markerad för spårningsändamål?
Denna kommentar minimerades av moderatoren på webbplatsen
Se min kommentar ovan.
Denna kommentar minimerades av moderatoren på webbplatsen
Istället för "ColorIndex" som har en begränsad uppsättning av 255 värden (vilket innebär att alla anpassade färger går förlorade), använd istället "Color". Du måste lagra det gamla värdet i en ny statisk lång variabel och även generera den markeringsfärg du vill ha med RGB-funktionen. Det enda problemet med att ha denna kod aktiv är att du inte längre kan ändra den aktiva cellfärgen eftersom den ändras tillbaka till vad den var innan du klickade på den. Jag föreslår att om du behöver ändra markeringsfärgerna på arket, gör det med makron avstängda eller ändrar undernamnet en sekund så att det inte utlöses när du klickar på celler, då är det bara att byta namn på det tillbaka till normalt till " återaktivera" den. Här är min kod:

Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Excel.Range)

Statisk xLastRng As Range
Statisk xLastRngColor As Long

On Error Resume Next

xLastRng.Interior.Color = xLastRngColor
xLastRngColor = Target.Interior.Color
Target.Interior.Color = RGB(255, 255, 0) 'komponera vilken höjdpunktsfärg du vill med RGB-värden, jag använder gul här
Ställ in xLastRng = Target

End Sub
Denna kommentar minimerades av moderatoren på webbplatsen
jobba....bra...
Denna kommentar minimerades av moderatoren på webbplatsen
Använd ett villkorligt format på de celler du vill skydda.
Denna kommentar minimerades av moderatoren på webbplatsen
Perfekt lösning eftersom jag alltid tenderar att tappa spåret av den markerade cellen under "Sök och välj" operation. Tack så mycket.
Denna kommentar minimerades av moderatoren på webbplatsen
Men jag kan inte göra ångra alternativet och förlorar den tidigare tilldelade cellfärgen också.
Vänligen tillhandahåll lösning
Denna kommentar minimerades av moderatoren på webbplatsen
Tack, men använd detta med försiktighet. Det har den oönskade moteffekten att inte låta ångra sig. Finns det någon lösning på det?
Denna kommentar minimerades av moderatoren på webbplatsen
Hur som helst kan du göra den vänstra intilliggande cellen för att markera istället för aktiv cell? Eller en rad celler runt den aktiva cellen?
Denna kommentar minimerades av moderatoren på webbplatsen
Det var super hjälpsamt, tack.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag provade ditt makro genom att kopiera och klistra in det i min Excel-fil. Jag ändrade dock en sak i makrot. Jag ändrade färgindexet från 6 till 24 (till en annan färg än de färger jag för närvarande använder i mitt makro). Det fungerade väldigt bra och jag gillade det mycket men började sedan orsaka problem för mig. Jag har många celler fyllda med färger i min Excel. Makrot började ta bort färgfyllningen från varje cell som berördes. Jag vet inte hur jag ska stoppa makrot från det här konstiga beteendet. Jag hade inget annat val än att ta bort makrot från min fil. Jag gillar fortfarande att använda det här makrot om någon kan hjälpa mig att fixa det.
Denna kommentar minimerades av moderatoren på webbplatsen
Jag vet att du föreslog en lösning men lösningen kommer med ett annat problem som du beskrev nedan: "Det enda problemet med att ha den här koden aktiv är att du inte längre kan ändra den aktiva cellfärgen eftersom den ändras tillbaka till vad den var innan du klickade Jag föreslår att om du behöver ändra markeringsfärgerna på arket, gör det med makron inaktiverade eller ändrar undernamnet en sekund så att det inte utlöses när du klickar på celler". Detta är inte ett acceptabelt alternativ för mig. Jag måste kunna ändra färgerna i cellerna när makrot är aktivt. Har du en lösning på detta problem. Om du kommer på en lösning på detta problem, vänligen publicera ditt korrigerade makro det nya makrot i sin helhet (istället för att föreslå patchar till ditt ursprungliga makro eftersom jag är tekniskt ifrågasatt när det gäller makro).
Denna kommentar minimerades av moderatoren på webbplatsen
Hej, om någon kan hjälpa mig... Jag hämtar den här koden på internet (ber om ursäkt till ägaren). Den gör nästan vad jag behöver men den här koden väljer hela raden. Vad jag behöver är en ändring som tillåter att bara välja de två första cellerna i raden med aktiva celler. När jag klickar i cellen behöver jag att cellen i kolumnen "$I16" och "$J16" (16 är den första raden i min tabell) i den raden blev inre färg (=9359529). Koden är denna: 
Dim lTarget As Range

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Om Target.Row >= 16 Då

Om inte lTarget är ingenting då

lTarget.EntireRow.Interior.ColorIndex = 0
End If

Mål.EntireRow.Interior.Color = 9359529

Ställ in lTarget = Target
End If
End Sub

Kan du hjälpa mig? Jag hade försökt ändra den här koden men det enda jag kan för att välja den inre färgen på cellmålet och inte kolumnen "$I" och "$J" i den specifika raden.Tack för hjälpen.
Luis Lopes
Denna kommentar minimerades av moderatoren på webbplatsen
Jag hade samma problem, läste hela sidan och kommentarer. Medan jag tänkte tillämpa det eller inte klickade jag bara slumpmässigt på siffror och bokstäver för att välja hela kolumnen och raderna. Sedan kom plötsligt markeringen av den valda cellfunktionen tillbaka :)
Det finns inga kommentarer här ännu

Följ oss

Copyright © 2009 - www.extendoffice.com. | Alla rättigheter förbehållna. Drivs av ExtendOffice. | | Sitemap
Microsoft och Office-logotypen är varumärken eller registrerade varumärken som tillhör Microsoft Corporation i USA och / eller andra länder.
Skyddad av Sectigo SSL