Visualizar datos

[iaras66]

Hola!!!
Quiero visualizar en el encabezado de un word unos datos q se guardan en las variables numinicio,numfinal y numpaginas desde unas cajas de texto; pero me da error en la linea de código q lo visualiza.

El código es el siguiente:

.ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
'Para que en todos los encabezados sea igual

'Para alinear el texto a la derecha
.Selection.ParagraphFormat.Alignment = wdAlignParagraphRight
Documento.Selection.Font.Name = "Times News Roman"
Documento.Selection.Font.Size = 8
For x = numinicio To numfinal
For i = 1 To numpaginas

.Application.Selection.TypeText "Nº Cuestionario:" + x + vbNewLine + "Nº Página:" + i
.Selection.ParagraphFormat.Alignment = wdAlignParagraphRight

Documento.Selection.Font.Size = 8
.ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
'intro
.Application.Selection.TypeParagraph
Next i
Next x

Alguna idea/sugerencia para solucionarlo???