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


Emne lukketGem og luk
 Besvar Besvar
Forfatter
  Emne Søg Emne Søg  Emne funktioner Emne funktioner
Torben57 Se dropdown
Forum Begynder
Forum Begynder
Avatar

Medlem: 17.Mar.2019
Land: Danmark
Status: Offline
Point: 14 		Direkte link til dette indlæg Emne: Gem og luk
    Sendt: 17.Mar.2019 kl. 19:30
Hej. er der et lyst hoved der kan hjælpe en nybegynder.
Har et excel skema som skal gemmes og lukkes ved tryk på en knap. Excel navnet kommer fra 2 celler.
Har fået det til at virke med denne kode men vil gerne tilføje en luk funktion. Tænker der skal være et delay på 1 sek efter gem funktion til der lukkes (skal gemmes på et netværkshardisk). Hvis der er flere excel filer åbne, skal det kun det aktive gemmes.


Sub GemSom()
Dim Path As String
Dim Filename1 As String
Dim Filename2 As String
Path = "F:\2019\Ugerapport\"
Filename1 = Range("C4")
Filename2 = Range("H3")
ActiveWorkbook.SaveAs Filename:=Path & Filename1 & "-" & Filename2
End Sub
Til top



Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5470 		Direkte link til dette indlæg Sendt: 17.Mar.2019 kl. 21:51
Tilføj disse linjer i din kode, for at lukke Excel, efter dit regneark er gemt: 
Sub GemSom()
    Dim Path As String
    Dim Filename1 As String
    Dim Filename2 As String
    Path = "F:\2019\Ugerapport\"
    Filename1 = Range("C4")
    Filename2 = Range("H3")
    ActiveWorkbook.SaveAs Filename:=Path & Filename1 & "-" & Filename2
    Application.Wait Now + TimeSerial(0, 0, 1)
    Application.DisplayAlerts = False
    Application.Quit
End Sub
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
Torben57 Se dropdown
Forum Begynder
Forum Begynder
Avatar

Medlem: 17.Mar.2019
Land: Danmark
Status: Offline
Point: 14 		Direkte link til dette indlæg Sendt: 18.Mar.2019 kl. 15:20
Hej EXCELGAARD.

Det virker fint så længe der er kun 1 excel åben. 
Når der er 2 excel filer eller mere åbne lukker de alle men rigtigt kun den med markro i gemmer.
Er det muligt at få koden til kun at gemme og lukke det excel fil som koden er i og de andre åbne ?

Mange tak for hjælpen.

Hilsen Torben.
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

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