Hoe snel vinkjes en kruisjes in cellen invoegen?
In een werkblad kunnen we het vinkje en kruisje invoegen door standaard de symboolfunctie te gebruiken, maar het zal saai zijn als je elke keer maar één symbool kunt invoegen. In dit artikel zal ik het hebben over enkele trucs om snel het vinkje en kruisje in Excel in te voegen.
Plaats vinkjes en kruisjes in cellen met een snelkoppelingsteken
Plaats vinkjes en kruisjes in cellen met VBA-code
Plaats vinkjes en kruisjes in cellen met een snelkoppelingsteken
Om snel het vinkje en kruisje in te voegen, kunnen de sneltoetsen "a" en "r" u een plezier doen. Doe dit als volgt:
1. Selecteer de kolomcellen waarin u de maatstreepjes en kruisjes wilt invoegen en kies vervolgens het Webdings lettertype onder de Home tabblad, zie screenshot:
2. Wanneer u nu de letter "a" in de cel invoert, wordt dit een vinkje en als u de letter "r" typt, wordt het een kruisteken, zie screenshot:
Plaats vinkjes en kruisjes in cellen met VBA-code
Hier is nog een snelle en gemakkelijke manier om de maatstreepjes en kruisjes in te voegen door slechts te klikken.
1. Klik met de rechtermuisknop op de bladtab waaraan u maatstreepjes en kruisjes wilt invoegen, en kies vervolgens Bekijk code vanuit het contextmenu, in het geopende Microsoft Visual Basic voor applicaties venster, kopieer en plak de volgende code in de lege module:
VBA-code: plaats vinkjes en kruisjes in cellen:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice
If Target.Cells.Count = 1 Then
If Not Intersect(Target, Range("B2:B12")) Is Nothing Then
With Target
.Font.Name = "Wingdings"
.Font.Size = 12
If .FormulaR1C1 = " û " Then
.FormulaR1C1 = "ü"
Else
.FormulaR1C1 = " û "
End If
End With
End If
Cancel = True
End If
End Sub
Note: In de bovenstaande code, B2: B12 zijn de cellen waar u het vinkje en kruisje wilt invoegen, u kunt de celverwijzing naar uw behoefte wijzigen.
2. Sla vervolgens de code op en sluit deze code, nu, wanneer u eenmaal dubbelklikt op een cel, wordt een kruisje ingevoegd en wanneer u een tweede keer dubbelklikt, wordt een vinkje weergegeven, zie screenshot:
Sla de specifieke symbolen op en plaats ze waar u maar wilt:
De Auto-tekst kenmerk van Kutools for Excel kan u helpen bij het opslaan van de specifieke symbolen, formules, gegevens of andere items in het Autotext-paneel, en vervolgens kunt u ze overal in het Excel-bestand hergebruiken dat u nodig heeft. Kutools for Excel: met meer dan 300 handige Excel-invoegtoepassingen, gratis te proberen zonder beperking in 30 dagen. Download en probeer nu gratis! |
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!