Automatisch opslaan op locatie bij afsluiten

[Girly]

In thisworkbook heb ik de volgende macro gemaakt

Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.SaveCopyAs "Plaats van de backupmap\" & _
Format(Now, "yyyymmdd") & "_" & ActiveWorkbook.Name
Dim i As Integer
End Sub

Het orginele bestand staat op de server en opslaan op de vast schijf. Dit lukt de eerst keer maar als ik een verandering maak in het excel bestand en het vervolgens weer opsla krijg ik telkens de foutmelding dat de locatie niet gevonden wordt.

Hoe kan ik dit oplossen.

Bedankt

 

[dnties]

Misschien een domme vraag, maar is de bestandskopie op de server misschien geopend door iemand op dat moment?

Tijs.

 

[Girly]

Nee de bestandskopie is niet geopend. De kopie wordt weggeschreven onder de eigen documenten op de computer en niet op de server.

 

[Girly]

Heeft niemand hier een antwoord op