Tilføjelsen til nummerering

hvad mener du !!!??

Jeg tror ikke der er nogen, der har forstået hvad det er du søger?

Kan du ikke prøve at forklare.

åbenbart ikke...
= the numbering add in,
hvilket betyder følgende:
Man kan få excel til at lave fortløbende numre som man f.eks. kan bruge, hvis man laver fakturaer. Excel husker sidste nummer og når man klikker på en knap kommer næste nummer.

hmm....søger selv svar på samme spørgsmål!!!
Kan du ikke huske hvad funktionen blev "kaldt" i tidligere versioner af Excel? Eller hvad der stod på den knap du kunn trykke på?

Som altid kan du lave en VBA-løsning der klarer det for dig. Interesseret i det?

Du kan jo gemme et nummer i registreringsdatabasen vha. VBA's funktioner GetSetting og SaveSetting. Eller skrive til en text-fil i stedet for i registreringsdatabasen. Her følger opskriften på sidstnævnte, vil du hellere bruge registreringsdatabasen, så sig til, og jeg skal give et eksempel på det. Mit råd: Hold registreringsdatabasen fri for sådan noget "snavs".

Åben et nyt regneark, og gem det som c:\test.xls
Indspil en ny macro med et tilfældigt navn (Funktioner -> Macro -> Indspil ny macro
Stop indspilningen.
Tryk Alt+F8 for at komme til macro-dialogboxen.
Marker din macro, og tryk "rediger"
Slet hele molevitten, og indsæt nedenstående kode.
Opret c:\Fil.txt, og skriv et tal i øverste linie (fx. 100)

Herefter vil regnearket når det åbnes indlæse tallet fra filen i celle A1, udregne et nyt tal i A2, og når du lukker regnearket skrives det nye tal i fil.txt...

Sub auto_open() 'Denne sub køres automatisk når regnearket åbnes i Excel
  filnummer = FreeFile
  Dim Varenummer As String
  Open "C:\Fil.txt" For Input As #filnummer
    Line Input #filnummer, Varenummer  'Putter 1. linie ind i Varenummer
  Close #filnummer
  Range("A1").Select
  ActiveCell.Value = Val(Varenummer)
  Range("A2").Select
  ActiveCell.Value = Val(Varenummer) + 1
End Sub

Sub auto_close() 'Denne sub køres automatisk når regnearket lukkes i Excel
  Dim filnummer As Integer
  filnummer = FreeFile
  Range("A2").Select
  Open "C:\Fil.txt" For Output As #filnummer
  Print #filnummer, ActiveCell.Value 'Skriver indholdet af celle A1 til filen
  Close #filnummer
End Sub

Herefter kan du bare rette til, så det passer til dit formål, ovenstående viser bare princippet. Du kan evt. spørge brugeren om der skal laves et nyt nummer, inden der afsluttes, og du kan gemme nummeret i variabler i stedewt for som celleværdier osv... :o)

erlandsen..?

Det er en meget fin løsning du har lavet - så du får de oprindelige 30 points.
Øvrige 30 points gemmer jeg til vedkommende der kan fortælle mig, hvor jeg finder den omtalte add in/tilføjelse til Excel

Takker :o)
Du har vel søgt hos microsoft m.v.?

Hvis du installerer den add-in der hedder Tilbehør Til Skabeloner får du 2 funktioner med.
1. GetNextTemplatenumber
2. GetNumberFromNetworkShare

Er det disse du leder efter ?