autogem hvert 20. sek.

prøv:

Sub run()
ThisWorkbook.Save
Application.OnTime TimeValue("00:00:20") + Now, "run"
End Sub

hvor skal jeg sætte den ind henne?
Jeg har prøvet worksheet og modules uden held

i et alm. modul

kan ikke selv efterprøve om den kun gemmer på den pc
hvori den startes - det er jo samme fil som anvendes

alternativ kan den indsættes i en ny projektmappe
på den 5 pc der så er åben samtidig med den der gemmes

Sub run()
Workbooks(" navn .xls").Save
Application.OnTime TimeValue("00:00:05") + Now, "run"
End Sub

hvor "navn" udskiftes med den delte filnavn

jeg prøver stadig med den første løsning, men den gemmer ikke!! Jeh trykker alt+f11
og finder modules i venstre-menuen - går herefter ind i modul 1 og paster:
Sub run()
ThisWorkbook.Save
Application.OnTime TimeValue("00:00:20") + Now, "run"
End Sub

Så deler jeg projektmappen og starter, på en anden pc, samme excel ark. Når jeg laver en ændring sker der umiddelbart ikke noget efter 20 sek...
er jeg helt forkert på den??

filen ligger på netværket på en server

Det lyder som om du har gjort det rigtige
men har du husket at starte koden på den pc der skal gemme hvert 20.sek?

hmmmm...hvor starter jeg koden henne. jeg har sat makroerne til at køre automatisk, dvs den laveste sikkerhed.

fx. ALT+F8

det er super. Nu virker det helt perfekt
Smid et svar og du skal få point

Mange tak for hjælpen

ok velbekom

værsgo'