Opsummering

hvad med funktionen sum?

hvordan er dit regneark bygget op? For jeg tror egentlig ikke, at mit svar er det, du har brug for *S*

I en celle har jeg skatten for denne lønperiode
I en anden celle vil jeg gerne have skat i år til dato.
Det skal være de samme to celler hver gang

Hej bukse,
Prøv at kaste et blik på Bak\'s svar på næsten
det samme spørgsmål her:
eksperten.dk/spm/122676

    A      B
1  Skat_md  SkatÅDT
2  100      =A2
3  101      =B2 + A3
4  102      =B3 + A4

Er det sådan du skal have det??

Til maagefinke
Det kan godt være men jeg forstår ikke en skid til VB.

Til bak
Ja men år til data skal stå fast i celle b2

    A      B
1  Skat_md  SkatÅDT
2  100      =SUM(A2:A4)
3  101     
4  102     

Nu er vi tæt på - nu er vi der hvor jeg selv er.
Men hvad nu hvis resultatet efter hver lønperiode står i a2, altså resultatet i a2 hele tiden skal lægges til det tal der står i b2

Sådan som jeg læser dit spørgsmål, så laver du din lønberegning, og skatten bliver regnet ud i f.eks. C12 og skat åtd. i f.eks. D12

Du kan vælge at lave en lille tabel med skatten for de forskellige måneder og skat åtd - som bak foreslår, og så kan du i D12 hente den rigtige åtd værdi med et LOPSLAG. Denne løsning vil du selv kunne lave og vedligeholde.

Der findes også en VB løsning, men jeg tror ikke det er en god ide, når ikke du fatter en \"skid\" VB.

    A      B                    M
1  Skat_md  SkatÅDT            101
2  100      =SUM(a2;M1:M12)    102

Hvis det ikke virker, tror jeg du skal prøve flemmings løsning

En anden mulighed var at lave et opsumeringsfelt, så hver gang du godkender en lønseddel bliver \"år til dato\"-feltet automatisk opdateret.

Hvis du sender dit ark til mig, skal jeg gerne implementere en brugbar løsning.

jan_vogt_hansen@hotmail.com

Jeg kan også godt sætte en Formular knap i dit regneark fd@win-consult.com - du kan måske også selv ??!!

Dette kunne være makro\'en, hvis C12 er din skat og D12 er din SkatÅTD

Sub GodkendSkat()
Dim dSkat As Double
    dSkat = Worksheets(\"Ark1\").Range(\"D12\").Value + Worksheets(\"Ark1\").Range(\"C12\").Value
    Worksheets(\"Ark1\").Range(\"D12\").FormulaR1C1 = \"=\" & dSkat & \"+RC[-1]\"
End Sub

Fik du det løst ?

Nej ikke helt, men jeres svar ser for mig fornuftige ud. Så jeg har delt point lige imellem
bak og flemming
Jeg må prøve noget andet

Den makro jeg har lavet til dig, kombineret med en formularknap i dit ark, det virker - har brugt det selv i anden anledning.
Jeg kan sende dig et eksempel, hvis du gerne vil have det (så skal jeg blot have din email adresse) du kan også sende mig det rigtige ark, så skal jeg lave det der.

Tak for din hjælp flemming
min mail adresse er bpt@esb-amu.dk

sendt