Using wdContentControlCheckBox in Word 2016

Question

I recorded a Word macro which inserts a checkbox. The checkbox gets inserted, but the text does not. Why? fwiw I'm using Word 2016 on Windows 10.

    Sub CheckBox()
'
' CheckBox Macro
'
'
    Selection.Range.ContentControls.Add (wdContentControlCheckBox)
    Selection.MoveRight Unit:=wdCharacter, Count:=2
    Selection.TypeText Text:=" z"
End Sub

Answer 1

Macros from the Recorder are just a starting point. Here is your recording turned into a functioning macro:

Sub Checkbox()
  With Selection
    .Range.ContentControls.Add (wdContentControlCheckBox)
    .MoveRight Unit:=wdCharacter, Count:=2
    .Range.Text = " z"
  End With
End Sub