It would make more sense to save your project document as a macro enabled template containing the part of the following code that logs and applies the number, and create new documents from it, but you can use your existing document as a template.
We have no idea what your 'Nr: ***x' column is, but open your project document and bookmark the *** bit where the number is to go and name the bookmark bmCount. Save the document and change C:\Path\ in the macro to the location where the document is stored.
The macro stores the counter in the registry at HKEY_CURRENT_USER\SOFTWARE\VB and VBA Program Settings\MyProject\Counter and increments it each time a new project document is created.
Option Explicit
Sub NewProject()
Dim sCount As String
sCount = GetSetting("MyProject", "Counter", "Count")
If sCount = "" Then
sCount = "1"
Else
sCount = val(sCount) + 1
End If
Documents.Add Template:="C:\Path\Project.docx"
'do something with sCount e.g.
FillBM "bmCount", sCount
SaveSetting "MyProject", "Counter", "Count", sCount
lbl_Exit:
Exit Sub
End Sub
Private Sub FillBM(strBMName As String, strValue As String)
'Graham Mayor - http://www.gmayor.com
Dim oRng As Range
With ActiveDocument
On Error GoTo lbl_Exit
Set oRng = .Bookmarks(strBMName).Range
oRng.Text = strValue
oRng.Bookmarks.Add strBMName
End With
lbl_Exit:
Set oRng = Nothing
Exit Sub
End Sub