27. april 2009 - 12:30Der er
1 kommentar og 1 løsning
Gemme hver 10. gang
Jeg skal bruge en lille makrostump, der gemmer ændringerne i min aktive projektmappe.
Pt. bruger jeg bare ActiveWorkbook.Save hver gang jeg klikker på OK i min userform, men det gør den lidt langsom, så jeg vil godt gå på lidt kompromis og kun gemme hver 10. gang.
Jeg kunne forestille mig noget med at en celle tæller ned fra 10 til 0 og når den når 0 gemmes den og sætter så 10 ind igen og starter forfra..
Den moderne arbejdsplads er i stigende grad afhængig af mødelokaler til at fremme samarbejde, men dette skift medfører også stigende sikkerhedsudfordringer.
Sub count() Worksheets("Forside").Activate If Range("H5") = 1 Then ActiveWorkbook.Save Range("H5") = 10 Else Range("H5") = Range("H5") - 1 End If End Sub
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.