Problem with Export View to Word document

Export the actual view to word document, the script is:

Dim docContent As String

Dim docObject As Variant

.

docContent = profileDoc.PLContentTemplateLocation(0)

.

Set doc = docObject.Documents.Add(wordContentTemplate)’ TYPE MISMATCH ERROR

What´s wrong here? Could you help me? Thank you?