Macro en word

[txoxmxaxsx]

Buenos dias, tengo un problema con un macro de word.

Mi idea es que el usuario corra el macro y la aparezcan inputboxes, las complete y aparezca el texto en el documento en una ubicacion ya definida(bookmark).

Logro que aparezcan los IB pero no puedo hacer que me imprima el input en el documento.

Esto es lo que tengo por el momento:

Sub macro1()
Dim nom As String
Dim emp As String
Dim dir As String
Dim loc As String

nom = InputBox("Escriba el nombre", nombre)
emp = InputBox("Escriba la empresa", empresa)
dir = InputBox("Escriba la dirección", dirección)
loc = InputBox("Escriba la localidad", localidad)

Set myrange = ActiveDocument.Range.Bookmarks("nombre")
myrange.Print nom
Set myrange = ActiveDocument.Range.Bookmarks("empresa")
myrange.Print emp
Set myrange = ActiveDocument.Range.Bookmarks("direccion")
myrange.Print dir
Set myrange = ActiveDocument.Range.Bookmarks("localidad")
myrange.Print nom


End Sub

Muchas gracias