Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketbackup af fil

 Besvar Besvar Side  <12
Forfatter
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5419
Direkte link til dette indlæg Sendt: 20.Jan.2016 kl. 12:48
Med Gnaske's eller min løsning?
Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Til top



Til top
WayMan1 Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 18.Feb.2014
Land: DK
Status: Offline
Point: 32
Direkte link til dette indlæg Sendt: 20.Jan.2016 kl. 16:20
Så blev det fyraften

Brugte SaveCopyAs men satte også  & ".xlsm"
bagefter til filnavnet da jeg ikke normalt skrive filnavnet i arket
og da det ikke kom med over efter jeg brugte SaveCopyAs hjalp det også på mit problem

brugte denne kode

Sub SaveAs()

    ThisFile = ThisWorkbook.Path & "\" & "BACKUP" & "\" & Range("B2").Value & ".xlsm"
    ActiveWorkbook.SaveCopyAs Filename:=ThisFile
        
End Sub
MVH
WayMan - Excel 2013 DK
Til top
Ib Hansen Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 15.Apr.2014
Land: Danmark
Status: Offline
Point: 652
Direkte link til dette indlæg Sendt: 20.Jan.2016 kl. 16:37
Til både WayMan og Excelgaard.

Det er en super god lille kode, jeg vil gemme.
Og ved at bruge & ".xlsm" er den gjort helt færdig, så man ikke også behøves at definere fil-format-typen i selve filnavnet, når det skrives.
Thumbs Up
Til top
 Besvar Besvar Side  <12

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk