Create New Word Document From Template And Save As

I have been working on the following VBA code, which should copy specific charts from excel into specific places in a word-template.

I Am quite new with VBA, so I googled the code, changed a few things, and it works exactly as it should - except from one thing. When the Word-document is loaded from the template, I would like the document to be "saved as..."
Instead of just opening the template. I have tried

Code:
.ActiveDocument.SaveAs Filename:=fname & ".doc"

The code is as follows:

Option Explicit
Sub EksporterTilWord()

Dim appWrd As Object
Dim objDoc As Object
Dim FilePath As String
Dim FileName As String

[Code] ...........