Angela69
Gebruiker
- Lid geworden
- 9 mrt 2017
- Berichten
- 198
Bekijk de onderstaande video om te zien hoe je onze site als een web app op je startscherm installeert.
Opmerking: Deze functie is mogelijk niet beschikbaar in sommige browsers.
Uiterst rechts klik het scherm volledig open.Waar vind ik: Deelverzameling?
Hangt echt van het lettertype af.Uiterst rechts bij symbolen
Bij standaard lettertype kan ik in de de deelverzameling niet Diverse symbolen kiezen, ik moet een lettertype kiezen.Kies eens de optie Standaard lettertype, of Times New Roman.
Dim sKleur As Variant
Sub mcrRuiten()
Application.ScreenUpdating = False
With Selection
sKleur = .Font.ColorIndex
.InsertSymbol Font:="Arial", CharacterNumber:=9830, Unicode:=True
.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
.Font.ColorIndex = wdRed
.MoveRight Unit:=wdCharacter, Count:=1
.Font.ColorIndex = sKleur
End With
Application.ScreenUpdating = True
End Sub
Sub mcrSchoppen()
Application.ScreenUpdating = False
With Selection
sKleur = .Font.ColorIndex
.InsertSymbol Font:="Arial", CharacterNumber:=9824, Unicode:=True
.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
.Font.ColorIndex = wdBlack
.MoveRight Unit:=wdCharacter, Count:=1
.Font.ColorIndex = sKleur
End With
Application.ScreenUpdating = True
End Sub
Sub mcrHarten()
Application.ScreenUpdating = False
With Selection
sKleur = .Font.ColorIndex
.InsertSymbol Font:="Arial", CharacterNumber:=9829, Unicode:=True
.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
.Font.ColorIndex = wdRed
.MoveRight Unit:=wdCharacter, Count:=1
.Font.ColorIndex = sKleur
End With
Application.ScreenUpdating = True
End Sub
Sub mcrKlaver()
Application.ScreenUpdating = False
With Selection
sKleur = .Font.ColorIndex
.InsertSymbol Font:="Arial", CharacterNumber:=9827, Unicode:=True
.MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend
.Font.ColorIndex = wdBlack
.MoveRight Unit:=wdCharacter, Count:=1
.Font.ColorIndex = sKleur
End With
Application.ScreenUpdating = True
End Sub
We gebruiken essentiële cookies om deze site te laten werken, en optionele cookies om de ervaring te verbeteren.