Avatar billede z1n Nybegynder
06. maj 2004 - 10:52 Der er 9 kommentarer og
1 løsning

VBA: Luk ActiveDocument og Slet fil

Hej... Jeg har en macro som skal til slut lukke Dokumentet og slette det, det bliver generet som temp fil i sTempFile

Dim fso
               
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set wdo = CreateObject("Word.Application")
    Set wdocs = wdo.Documents

    sTempFile = fso.GetSpecialFolder(TemporaryFolder) + "\temp\" + fso.GetTempName() + ".doc"

    ActiveDocument.Close SaveChanges:=False
    Kill sTempFile

Den lukker documentet men sletter ikke filen...
06. maj 2004 - 10:54 #1
Jeg tror stadig at filen er låst af word. Prøv denne:

Dim fso
               
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set wdo = CreateObject("Word.Application")
    Set wdocs = wdo.Documents

    sTempFile = fso.GetSpecialFolder(TemporaryFolder) + "\temp\" + fso.GetTempName() + ".doc"

    ActiveDocument.Close SaveChanges:=False
    wdo.Quit
    Doevents
    Kill sTempFile
Avatar billede z1n Nybegynder
06. maj 2004 - 11:00 #2
virker ikke... men tror det er fordi jeg kører den i en skabelon som self lukker ved activedocument.close og så køres resten af koden ikke.. prob er at jeg ikke kan få det til at virker i normal.dot da den skal have  gang i notes...
Avatar billede z1n Nybegynder
06. maj 2004 - 11:48 #3
Så snart jeg bruger   

Dim DomSession As New NotesSession

i Normal.dot laver den fejl ved "New" kører jeg det i en skabelon virker det fint.

...
06. maj 2004 - 11:52 #4
sorry...jeg har ikke noget bud.

Men jeg er ikke i tvivl om, at den nok skal nå ned til Kill stempFile. Prøv evt at sætte et breakpoint på linien inden du køre den. Når koden er stoppet på den linie, kan du trykke F5 for at fortsætte. Hvis filen bliver slettet nu, skyldes fejlen, at der på en eller anden måde skal lægges en forsinkelse ind.
Avatar billede z1n Nybegynder
06. maj 2004 - 12:26 #5
hvordan sætter jeg et breakpoint ind ?!
06. maj 2004 - 12:34 #6
Enten klikker på på knappen "Toggle breakpoint" på værktøjslinien (en hvis hånd) eller du klikker på den lodrette grå bjælke til venstre for kodelininen.
Avatar billede z1n Nybegynder
06. maj 2004 - 13:02 #7
det virkede ikke :/
06. maj 2004 - 13:11 #8
hmm, så har jeg desværre ikke flere bud :o(
Avatar billede z1n Nybegynder
05. juli 2004 - 16:19 #9
lukker...
05. juli 2004 - 16:32 #10
takker...selvom jeg er ked af, at jeg ikke kunne hjælpe :o(
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester