Excel: Macro skal hjælpe med at gemme

Jeg har lavet en macro som er tildelt en knap. Macroen skal gemme regnearket når man trykker på knappen. Det er jo ganske simpelt men da knappen kun skal bruges en gang om måneden til at gemme regnearket skal den gemme det i et andet navn end hvad den normalt hedder. Jeg vil gerne have at regnearket bliver gemt som den dato det er dags save dato.

Eks mit dokument hedder SIMON når jeg så vælger at gemme skal den automatisk gemme filen som SIMON_21-11-08

kan det overhovedet lade sig gøre? Jeg kunne sagtens selv gemme filen som det navn jeg vil have, problemet er at det er min mor der skal bruge programmet og hun kan IKKE

mange tak

kan ikke få den til at virke, vil du have at jeg bare paste det der ind i en macro?

Den siger "Expected End sub" men jeg har en end sub, tjek koden nedenunder. Har kopieret HELE koden, alt hvad der stod i Visual basic.

Sub Makro1()
'
' Makro1 Makro
' Makro indspillet 02-12-2008 af bcenter

Function SaveSheet()
ActiveWorkbook.SaveAs (Format(Now(), "yyyy-mm-dd") & "_" & ActiveWorkbook.Name)
End Function

End Sub

compile error:

expected end sub

og så markerer den Sub Makro1()

nej jeg brugte ctrl-a så den sku være hjemme med hele visual basic arket.

Forstår det skut

måske en anden kunne teste koden for mig?

tak det må jeg lige prøbve lidt senere. Er stadig ny til Excel og har været igennem en masse macro på det seneste. Ved også hvad funktioner er men at man selv laver dem nah det har jeg ik lært endnu!

det virker det fantastisk HURRA Det er SÅ vigtigt at det virker. Jeg har nu skrabet et helt excel system sammen, så 30 ansatte i et firma kan logge ud ind når de møder og smutter fra arb, de skal skrive forbrug ned af mad osv. Fra et controlpanel kan man så se alt hvad der har været af arbejdstimer for hver enkelt person, få den til at regne alt ud med løn osv og udskrive ved at trykke på få knapper. Få overblik over forbrug per enkelt ansatte alt nødvendigt og nemt for et firma med ansatte i kiosk, grill eller lignende. Muligvis næsten alle steder

Som chef er det muligt at ændre rabat på deres madforbrug, hvad der trækkes i pause. Og at skrive hver enkelt person nemt ind i systemet så den person bliver registreret fremover.

det eneste jeg manglede var at den selv savede som en special dato når måneden slutter og man trykker "afslut måned" så man ikke manuelt skal skrive dato på ens fil. TAK

med et macro helvede. Det er total nub program, men nu virker det.

if, then

macroland

Hvis der er nogle der vil have det er i velkomne, det fungerer perfekt med password til hver enkelt ansat osv, så der ikke lige er fejlindtastninger eller noget.
Det eneste problem er, at jeg burde have tænkt på at refere firma navnet til et sted jeg kunne ændre, men det er det ikke. Så det kommer til at hedde det samme, medmindre man har lyst til at ændre på en del macroer.

Således ser det ud rent grafisk :=)

og

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, PrToFilename:=Format(Date, "yyyy-mm-dd") & ".prn"
Application.WindowState = xlNormal

NYT PROBLEM

Hej igen

Jeg har forsøgt at få programmet til at gemme sig som en PRN fil, altså at udskrive sig selv som en printervenlig fil Microsoft XPS document.
Koden vrker også fint nok, men filen gemmer sig ikkesom en brugbar XPS fil og er slet ikke attached til noget rogram, hvordan kan det være?

Mvh