03. oktober 2003 - 15:08Der er
11 kommentarer og 1 løsning
Makro virker ikke i 2000. "70 premission denied"
Efter at have lagt vores domain, fra et NT 4.0 SP6, over i et 2000 miljø kan jeg ikke få følgende makro i vord til at virke:
Public Sub BackupSave() On Error GoTo errHandler Dim doc As Word.Document Dim navn As String Dim path As String Dim strDate As String Dim oldDate As Date
path = "\\server\Firmaet\dokumenter\"
If Word.Documents.Count < 1 Then MsgBox "Du skal først åbne et dokument, før denne funktion kan benyttes", vbOKOnly + vbInformation, "Intet aktivt dokument" Exit Sub End If
Set doc = Word.ActiveDocument
If doc.path = vbNullString Then If MsgBox("Er du sikker på du ønsker at gemme dokumentet " & doc.Name & " i mappen " & Left(path, Len(path) - 1) & "?", vbQuestion + vbYesNo, "Nyt dokument") = vbNo Then Exit Sub End If End If
navn = doc.Name
If Not Dir(path & navn) = "" Then oldDate = FileDateTime(path & navn) strDate = Format(oldDate, "DD/MM/YYYY") & " " & Hour(oldDate) & "-" & Minute(oldDate) & "-" & Second(oldDate) FileCopy path & navn, path & "Tidligere dokumenter\" & Left(navn, Len(navn) - 4) & " " & strDate & ".doc" End If doc.SaveAs path & navn Exit Sub errHandler: MsgBox "Der er sket en fejl." & vbCrLf & Err.Number & " " & Err.Description, vbOKOnly + vbInformation, "Intet aktivt dokument" End Sub
Dens funktion er, at den gemmer et dokument i en mappe og tager det dokument der allerede ligger i mappen med samme navn og flytter det til mappen "tidligere dokumenter", samt tilføjer den oprindelige dato og tidspunkt for oprettelse til filnavnet.
Når jeg kører denne makro får jeg "Intet aktivt dokument" "Der er sket en fejl" "70 Permission denied"
Har det noget at gøre med sikkerhedsniveauet eller digitalt signering? Er der nogle der kan hjælpe mig?
Jeg har haft det samme problem med en af mine macro'er, jeg fik det aldrig til at virke igen, Så det kunne være at de ikke kan snakke sammen med hved det ikke!
Synes godt om
Slettet bruger
09. oktober 2003 - 19:46#3
Er der noget i menuen med sikkerhed: Funktioner - Makro - Sikkerhed hvis du har det så prøv at sætte den til lav.
Jeg har prøvet at mindske sikkerhedsniveauet, men lige meget nytter det. Alternativt må jeg jo sætte mig ned og starte forfra...
Synes godt om
Slettet bruger
09. oktober 2003 - 21:05#5
Hvis du kører den trinvis med F8 så kan du køre den igenne linie for linie og så kan du se hvor den fejler 1. gang, hvis du vil.
Synes godt om
Slettet bruger
09. oktober 2003 - 21:10#6
Jeg har lige kørt den her i Word xp og der virker den fint så den burde også virke i 2000. Jeg kan få en permission denied fordi "Tidligere dokumenter\"-stien ikke er oprettet, check lige om du har lavet den.
Synes godt om
Slettet bruger
09. oktober 2003 - 21:21#7
If you try to use the FileCopy statement on a currently open file, an error occurs.
Det dokument der blev gemt først blev gemt med navnet Dokument 1.doc, så laver jeg et nyt og det hedder også Dokument 1.doc i Word selvom det ikke er gemt endnu, så Word tror garanteret at det er det åbne dokument der prøves kopieret og giver dermed en permission denied, den får jeg nemlig også nu.
Jeg takker for point og god weekend til dig også :-)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.