Rekvisitions nummer - Auto nummer excel 2007

Min macro ser sådan ud nu:

Sub auto_open()
x = Range("d9").Value + 1
Range("d9").Value = x
ThisWorkbook.Save
End Sub

Og den skifter kun når hvergang jeg åbner den

Hvis den skal skifte både ved Åbn og ved Gem som, skal koden ikke ligge i Auto_Open.
læg dette i ThisWorkbook modulet:

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
    Range("d9").Value = Range("d9").Value + 1
End Sub

Private Sub Workbook_Open()
    Range("d9").Value = Range("d9").Value + 1
End Sub

Der er dog den problemstilling, at hvis du gemmer inden du lukker, vil nummeret stige 1, og smtidigt vil det stige 1 næste gang du åbner. Så måske skulle du overveje kun at lade det stige, når du gemmer.

I sidstnævnte tilfælde, er det kun den første makro, du skal kopiere ind.

Det er det sidst nævnte tilfælde...

Jeg har prøvet at slette min kode og sætte den første macro ind..Men kan ikke få det til at virke.

Nu fik jeg det til at virke :)

Kan man få den til at slette det man har skrevet i dokumentet efter dem har gemt, så man med det samme kan lave en ny?

Det kan man muligvis, men ikke med ovenstående hændelse, da det hele sker, FØR der gemmes.

Okay.. Takker så kan vi vist godt lukke den... Jeg vil hva jeg sku bruge :)

Fint nok :-)

Lukker du?

Sådan :)