Avatar billede jozefvl Nybegynder
07. februar 2003 - 15:50 Der er 3 kommentarer og
1 løsning

automatisk overskrivning af fil

Hvordan kan man bruge thisworkbook.saveas metode, med automatisk overskrivning, dog uden spørgsmål.
daktivering af  displayalerts sætter default værdi til false, således at den ikke overskriver.
Jeg har forsøgt at slette regnearket først, men kill statement virker ikke på et åbent regneark.

Any ideas?

Tak, Jozef van Leeuwen
Avatar billede sjap Praktikant
07. februar 2003 - 16:15 #1
DU kan måske bruge noget af nedenstående kode:

Sub Save_File(FileToSave as string)
    If Dir(FileToSave) <> "" Then  ' Check om filen findes
        ActiveWorkbook.Save
    Else
        ThisWorkbook.SaveAs ("C:\TEST.XLS")
    End If
End Sub
Avatar billede bak Forsker
07. februar 2003 - 16:30 #2
Sub test()
Application.DisplayAlerts = False
ThisWorkbook.SaveAs "c:\test.xls"
Application.DisplayAlerts = True
End Sub
Avatar billede jozefvl Nybegynder
10. februar 2003 - 07:48 #3
Den sidste, fra bak, virker ikke, da default for saveas = No, hvis displayalerts er false.
Avatar billede bak Forsker
10. februar 2003 - 10:31 #4
Måske har jeg misforstået spm., men så test denne her:
Sub testsave()
Const DefaultName As String = "testing.xls"
Dim FilNavn As String
FilNavn = Application.GetSaveAsFilename(DefaultName)
Application.DisplayAlerts = False
ThisWorkbook.SaveAs FilNavn
Application.DisplayAlerts = True
End Sub
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
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

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