Hoe omcirkel je een cel in Excel?
Tijdens het bewerken van een werkblad wilt u een cel misschien duidelijk markeren door er een cirkel omheen te tekenen, zoals op de schermafbeelding hieronder. Hieronder vindt u enkele handige trucs om een cel in Excel te omcirkelen.
Een cel omcirkelen met een ovaalvorm
Een cel omcirkelen met een ovaalvorm
Om een cel te omcirkelen, voegt u een ovaalvorm in.
1. Klik op Invoegen > Vormen en selecteer Ovaal uit de sectie Standaardvormen in de lijst. Zie schermafbeelding:
2. Teken een ovaal rond de cel die u wilt markeren. Zie de schermafbeelding:
3. Klik met de rechtermuisknop op de vorm en kies Vorm opmaken in het contextmenu.
4. In het dialoogvenster Vorm opmaken(of het deelvenster)Vorm opmaken) klikt u op het tabblad Opvulling en sleept u de schuifknop van Transparantie naar rechts totdat 100 % in het tekstvak wordt weergegeven. Zie schermafbeelding:
5. Sluit het dialoogvenster. U ziet nu een cirkel rondom de cel.
Tip: Standaard verplaatst en past de vorm zich automatisch aan op de cel.
Een cel omcirkelen met VBA
Wilt u een cel snel omcirkelen? Gebruik dan eenvoudig VBA-code.
1. Selecteer de cel die u wilt omcirkelen en druk tegelijkertijd op Alt + F11 om het venster Microsoft Visual Basic for Applications te openen.
2. Klik op Invoegen > Module en kopieer de volgende VBA-code naar het geopende venster.
VBA: Een cel omcirkelen.
Sub DrawCircle()
'Updateby20141105
Dim Arng As Range
Dim WorkRng As Range
Set WorkRng = Application.Selection
For Each Arng In WorkRng.Areas
With Arng
x = Arng.Height * 0.1
y = Arng.Width * 0.1
Application.ActiveSheet.Ovals.Add Top: = .Top - x, Left: = .Left - y, _
Height: = .Height + 2 * x, Width: = .Width + 1.5 * y
With Application.ActiveSheet.Ovals(ActiveSheet.Ovals.Count)
.Interior.ColorIndex = xlNone
.ShapeRange.Line.Weight = 1.25
End With
End With
Next
WorkRng.Select
End Sub
3. Druk op F5 of klik op de knop Uitvoeren om de VBA-code uit te voeren. De geselecteerde cel is nu omcirkeld.
Tips:
(1) Als u in de eerste stap meerdere aangrenzende cellen selecteert, omcirkelt deze VBA-macro ze gezamenlijk.
(2) Als u in de eerste stap meerdere niet-aangrenzende cellen selecteert, omcirkelt deze VBA-macro elke cel afzonderlijk.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins