Cela n'existe pas nativement dans Word.

Par contre une petite macro fera l'affaire. Il faudra simplement lui affecter un raccourci clavier :

Sub guillemets()
'macro écrite par m@rina
If Selection.Characters.Last = " " Then
Selection.MoveEnd Unit:=wdCharacter, Count:=-1
End If
With Selection
.InsertBefore Chr(171& Chr(160)
.InsertAfter Chr(160& Chr(187)
End With
End Sub

 

NB : cette macro insère des guillemets typographiques français. Pour des guillemets dactylographiques, on mettra :

With Selection
.InsertBefore """"
.InsertAfter """"
End With