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


Emne lukketFilnavn = værdi i celler

 Besvar Besvar
Forfatter
filipen Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 12.Nov.2012
Land: DK
Status: Offline
Point: 98
Direkte link til dette indlæg Emne: Filnavn = værdi i celler
    Sendt: 24.Jan.2013 kl. 13:19
Hej med jer.

Jeg har en skabelon som jeg bruger til udførsel af arbejdsseddler til en mekaniker.

Når jeg så beder den om at gemme filen spørger den så hvad filen skal hedde. Her er det så mit store ønske kommer.

Jeg ville gerne have at filnavnnet hedder:
[værdi i B1]-[værdi i B2]-[værdi i B3]-[værdi i B4]


Er der nogen der kan hjælpe mig med det?

Hilsen Filip.
Til top



Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
Direkte link til dette indlæg Sendt: 24.Jan.2013 kl. 13:26
Hvis regnearksfilen blot skal ligge i samme mappe, som du har åbnet skabelonen fra, kan du klare det med en enkelt macro linje:

ThisWorkbook.SaveAs Range("B1").Value & "-" & Range("B2").Value & "-" & Range("B3").Value & "-" & Range("B4").Value

Hvis du ønsker mulighed for at vælge en mappe, når du gemmer, så hent først stien med .GetSaveAsFileName

Det hele kan læses i hjælpen til makroen i VB Editoren.
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
filipen Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 12.Nov.2012
Land: DK
Status: Offline
Point: 98
Direkte link til dette indlæg Sendt: 25.Jan.2013 kl. 06:54
Hej Excelgaard.

Mange tak for hjælpen. 

Da jeg er lidt på bar bund vil jeg spørge om du kan hjælpe med en lidt mere detaljeret beskrivelse om hvordan man gør. 

Det med macroer er jeg ikke så skrap til.
Til top
filipen Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 12.Nov.2012
Land: DK
Status: Offline
Point: 98
Direkte link til dette indlæg Sendt: 29.Jan.2013 kl. 07:41
Citat: EXCELGAARD EXCELGAARD skrev:

Hvis regnearksfilen blot skal ligge i samme mappe, som du har åbnet skabelonen fra, kan du klare det med en enkelt macro linje:

ThisWorkbook.SaveAs Range("B1").Value & "-" & Range("B2").Value & "-" & Range("B3").Value & "-" & Range("B4").Value

Hvis du ønsker mulighed for at vælge en mappe, når du gemmer, så hent først stien med .GetSaveAsFileName

Det hele kan læses i hjælpen til makroen i VB Editoren.

Hej Excelgaard.

Kan du hjælpe mig med en mere detaljeret beskrivelse?

Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
Direkte link til dette indlæg Sendt: 29.Jan.2013 kl. 08:50
Ups, denne tråd havde jeg lige glemt - sorry!

1) Tryk på [Alt] + [F11] for at gå ind i VBE (visual Basic Editor)
2) Højreklik på din regnearksfil i venstre liste over åbne regnearksfiler
3) Vælg <Insert module>
4) I modulet i det store højre vindue, indsætter du dette:

Sub GemFil()

ThisWorkbook.SaveAs Range("B1").Value & "-" & Range("B2").Value & "-" & Range("B3").Value & "-" & Range("B4").Value

End Sub

Fremover, når du vil gemme din fil, som du beskrev, så kører du blot denne lille makro.

Du kan kører makroen fra båndet 'Vis' (så vidt jeg husker - jeg benytter selv værktøjslinjer, og ikke bånd)

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
filipen Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 12.Nov.2012
Land: DK
Status: Offline
Point: 98
Direkte link til dette indlæg Sendt: 29.Jan.2013 kl. 10:02
Citat: EXCELGAARD EXCELGAARD skrev:

Hvis regnearksfilen blot skal ligge i samme mappe, som du har åbnet skabelonen fra, kan du klare det med en enkelt macro linje:

ThisWorkbook.SaveAs Range("B1").Value & "-" & Range("B2").Value & "-" & Range("B3").Value & "-" & Range("B4").Value

Hvis du ønsker mulighed for at vælge en mappe, når du gemmer, så hent først stien med .GetSaveAsFileName

Det hele kan læses i hjælpen til makroen i VB Editoren.

.GetSaveAsFileName, kan jeg ikke lige helt hitte.

Hvis stien nu skulle være F:\Hillerød\Reparationssedler - HI, hvad skal jeg så skrive?

Tak for hjælpen indtil videre.


Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
Direkte link til dette indlæg Sendt: 29.Jan.2013 kl. 10:05
Så kan du blot skrive:

ThisWorkbook.SaveAs "F:\Hillerød\Reparationssedler - HI\" & Range("B1").Value & "-" & Range("B2").Value & "-" & Range("B3").Value & "-" & Range("B4").Value

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
filipen Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 12.Nov.2012
Land: DK
Status: Offline
Point: 98
Direkte link til dette indlæg Sendt: 29.Jan.2013 kl. 11:23
Citat: EXCELGAARD EXCELGAARD skrev:

Så kan du blot skrive:

ThisWorkbook.SaveAs "F:\Hillerød\Reparationssedler - HI\" & Range("B1").Value & "-" & Range("B2").Value & "-" & Range("B3").Value & "-" & Range("B4").Value


Den kommer desværre med en fejl.

En anden ting.

Kunne man i selve regnearket lave et ikon der har den funktion? ville gøre det lidt lettere end at skulle afspille den i macro.
Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
Direkte link til dette indlæg Sendt: 29.Jan.2013 kl. 11:28
Du kan da ikke bare skrive, at "den kommer med en fejl"!
Det gi'r mig ikke mange chancer for at hjælpe...

Hvilken fejl?  Fejl-nummer?  Fejl-tekst?  Fejl-opførsel?
Hvad har du selv gjort for at finde afhjælpefejlen???

Et eller andet, der gi'r mig bare en lille chance...

(Hos mig virker makroen, så jeg tror det er en fejl-40)
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
filipen Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 12.Nov.2012
Land: DK
Status: Offline
Point: 98
Direkte link til dette indlæg Sendt: 29.Jan.2013 kl. 13:32
Ja undskyld. Fejl fra mig.

Den kommer med en fejl 1004. Method 'SaveAa' of objekt'_workbook'failed
Når jeg så ser den i debug, så er koden markeret med gul.

Jeg har prøvet at gemme som alm. fil og som skabelon. med og uden macroer.

Det er muligt en fejl 40, men det kan jo så heldigvis rettes ;-)

Den funktion som vi laver her, kan den laves som et ikon på selveregnearket?


Er det muligt at uploade en fil hvor jeg har lavet printscreens af fejlmeddelelserne på.


Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
Direkte link til dette indlæg Sendt: 29.Jan.2013 kl. 13:38
Fejlen, som du skriver tilbage om, kan skyldes:

- Den angive sti ("F:\Hillerød\Reparationssedler - HI\") ikke findes,
  Opret stien først.

- Filnavnet er tomt,
  Står der noget i cellerne B1 - B4

- Filsti opbygningen er forkert
  Løb den igennem en gang til og se om filstien overholder standarderne for Windows filstier.


Og, ja, du kan tildele makroen til en knap på selve arket.

blot indsæt en hvilken som helt autofigur, og højreklik på autofiguren og vælg <Tildel makro> og vælg derefter din makro i makrolisten, der dukker op.
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
filipen Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 12.Nov.2012
Land: DK
Status: Offline
Point: 98
Direkte link til dette indlæg Sendt: 30.Jan.2013 kl. 09:55
Hvor er det bare sejt!!!!!!!


Jeg takker MANGE GANGE!!!!!!!

Jeg nu har selv prøvet (hahaha) og finde ud af hvordan man evt. gemmer det som en PDF-fil, kan du evt. hjælpe mig med den kode?
Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
Direkte link til dette indlæg Sendt: 30.Jan.2013 kl. 10:19
Ja, jeg kan godt lave en makro, der gemmer dit regneark som en PDF-fil, men...

Kunne du ikke oprette en ny tråd, der hedder noget i retning af "Gemme som PDF", da det flader lidt udenfor kategorien for denne tråd, og der kunne jo tænkes, at være andre, der gerne ville kende til dette, og måske leder forummet igennem efter "PDF".

Ved at oprette en særsklidt tråd til dette emne, opnår vi, at flest mulig får glæde af løsningen Smile

Samtidig skal jeg lige vide, hvilken version af Excel, du benytter, da der er lidt foreskel på koden, alt efter, hvilken version, du benytter.
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
filipen Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 12.Nov.2012
Land: DK
Status: Offline
Point: 98
Direkte link til dette indlæg Sendt: 30.Jan.2013 kl. 10:31
Det gør jeg, mange tak.


Jeg er dog i mellemtiden kommet i problemer.

Når jeg gemmer filen som skabelon med macro, så kommer jeg i problemer når jeg kører macroen.

Så skriver den at den ikke kan gemme projektmappen uden macro

* VB-projekt

Hvis du vil gemme en fil med disse funktioner, skal du klikke på nej og derefter vælge en macrobaseret filtype på listen Filtype.

Klik ja, hvis du vil forsat gemme som en projektmappe uden macro.

Hvordan komme jeg det til livs. når jeg gerne vil gemme min fil som en skabelon?

Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

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