Fråga
Hej Experten. Jag använder Microsoft Office 2003. När jag gör Save as/Save vill jag att Word även lägger upp/uppdaterar en fil i en annan folder (för säkerhets skull). Jag kan inte hitta någon sådan funktion i Word.
Jag är alltså inte intresserad av den säkerhetskopia eller återställning som finns i Word. De funktionerna gör inte det jag vill. Har experten någon ide om hur jag kan göra?
Svar
Det bästa sättet att göra detta borde vara med ett makro som gör det du vill. När du ska spara kör du då makrot i stället för det vanliga spara-kommandot. Enklast är väl att lägga till en knapp för Spara-makrot i verktygsfältet, eller ett snabbkommando. Prova detta:
Sub Spara()
‘
‘ Spara Makro
‘ Sparar det öppna dokumentet som vanligt OCH sparar en kopia i C:Wordkopior
‘
Dim BkUpDir As String
Dim MyDocName As String
Dim MyDocDir As String
On Error GoTo ErrorHandler
BkUpDir = “C:Wordkopior”
With ActiveDocument
If .Path = Empty Then .Save
MyDocName = ActiveDocument.Name
MyDocDir = ActiveDocument.Path
.SaveAs FileName:=BkUpDir & ““ & MyDocName
.SaveAs FileName:=MyDocDir & “” & MyDocName
End With
Exit Sub
ErrorHandler:
MsgBox “Word kunde inte göra en säkerhetskopia “ _
& “I mappen:” & vbCr & vbCr & BkUpDir _
& vbCr & vbCr & “Kontrollera sökvägen, “ _
& “och försök igen.”, vbCritical
End Sub
Ändra sökvägen till backup-mappen till något som passar dig bättre. Det kan till och med vara en nätverksenhet för större trygghet.
