Overfører data

Du kan bruge funktionen HVIS().

Altså =hvis(A1:A30=01.09.02;D1)

Dette vil gøre at HVIS felterne A1 til A30 er ligmed 01.09.02 så tar den værdien fra D1 :)

Prøv lige det her istedet for:

=HVIS(A1:A30="01.09.02";D1)

Jeg prøver

=HVIS(Kørselsregnskab!A6:A21="02.09.02";G6)  Skriver jeg i fane:Resultat

Og dataene henter jeg som sagt i fane: Kørselsregnskab

Men den returnere resultatet FALSK

Værdien i G6 er ellers 207.345

Hmm... er alle fra A6 til A21 02.09.02?

Lidt om funktionen HVIS

Syntaks:
=Hvis(Betingelse ; Værdi hvis betingelse er opfyldt ; Værdi hvis betingelse ikke er opfyldt)

Eksempel:
Hvis("Bananer" = "Pærer"; 20 ; 1) * 10 = 10
Hvis("Bananer" = "Bananer"; 20 ; 1) * 10 = 200

Således kan du se, at Excel rigtigt nok svarer "FALSK" til den hvis-sætning du har - det er ingen fejl :o)

Nej nej de er forskellige her kommer en forklaring:

Jeg har 2 faner: Kørselsregnskab og Resultat.

I fanen Kørselsregnskab udfyldes kørsel for den forige månede, kørsel er forskelig i alle måneder dvs. at datoerne er forskellige:

02.09.02    Fra x til Y    sum G6
06.09.02    fra å til u    sum G6
06.09.02    osv osv

Nu vil jeg gerne have summen af en dato til at lande over i fanen resultat sådan at alle summene for den 6 lander i feltet den 6

Hvordan vil du lave en sum af en dato?

Jeg forstod ikke helt det du lige sagde...

Martin moth --> Det virker da ved mig...

Nå det gør det ikke mere *G*

Det vil jeg heller ikke men der står en sum ude for hver dato som jeg vil tage over i den anden fane
Eksempel:

02.09.02    Fra x til Y    km. 456
06.09.02    fra å til u    km. 334
06.09.02    osv osv

Så skriver du bare:

=Kørselsregnskab!A1
=Kørselsregnskab!A2

osv.

Problemet er at næste måned er det ikke det samme

Derfor vil det være smart hvis man lige kunne gennemløbe alle felterne og gribe værdien uden for den rigtige dato

Altså hvad er det for en værdi du vil "søge" efter i det andet ark?

Her banker jeg det ud i pap....
Fane: kørselsregnskab

02.09.02    Fra x til Y    km. 456
06.09.02    fra å til u    km. 334
06.09.02    fra r til u    km.  23
09.09.02    fra o til æ    km.  56
17.09.02    gra o til p    km. 567
Osv.....

Fane: Resultat

der er felyet fra 1 til 31 (ligesom i en måned)

1    0
2  456
3
4
5
6  357
8
9  56
10
11
12
13
14
15
16
17 567
18
19
osv

denne her fane henter så datane fra kørselsregnskeb

Okay... jeg forstår dit system.
Men hvis du bruger den formel jeg skrev ændrer feltet med formlen i sig jo også når du laver om i kørselsregnskab ik?

Nej for det er kun fanen kørselsregnskab der ændre sig (dvs. at det er den man skriver i)

Formlen er i fanen: Resultat

Ja selvfølgelig ændre værdien sig i fanen: resultat

Kan du hjælpe :-)

Jamen når du bruger den formel så henter feltet med formlen i automatisk det der er i det felt du beder om.
Så hvis du ændrer i kørselsregnskab vil excel automatisk opdatere feltet i Resultet med det nye der blev skrevet i det felt som den henter fra.

Som det er i dag skal jeg efter jeg har udfyldt Fanen:kørselsregnskab også udfylde fanen: resultat (dvs. jeg skal manuelt overfører tallende) det vil jeg gerne have skete automatisk.

Nu er det sådan at datoerne ikke kommer i en bestemt rækkefølge, men at de kommer forskelligt fra måned til måned.

Så formlen skulle nok heller se sådan her ud:

=hvis dato er xx.xx.xx fra A6tilA31 så lig alle tallende sammen ud for den her dato og skriv summen i fane: resultat


Hvis det barre drejede sig om at skrive en værdi til en anden så kan jeg godt selv finde ud af det

Okay...
Men er det ikke rigtigt at feltet A21 i kørselsregnskab altid skal være det samme som B21 i Resultat (bare et eksempel) så de altså altid passer sammen de to?

Nej det er det ikke

Hvordan forbinder du så de 2 felter som skal have ens værdi?

B21 skal finde sit resultat i fanen: Kørselregnskab på følgende måde alle de felter der har datoen 21.09.02 (i A6;A37) så skal den ligge tallende sammen (hvis der er flere)(der kan være op til 2) tallende fstår i D6;37)

Det er jo det jeg ikke ved

Har du mulighed for at sende filen til mig?

Altså jeg kan jo godt regne ud at det er noget regnskab så det er helt fint hvis du ikke vil.

den er på vej hvad er din email  og der er ikke noget hemligt i den

Jeg mener der er ikke noget hemmeligt i filen

admin@rasmuslarsen.com

Kender altså ikke en funktion eller formular der kan dette...
Men jeg kan prøve at lave en lille makro (et lille program der virker med excel) imorgen som muligvis kan gøre det.

Jeg er bare for træt til at gøre det nu :)

Det lyder kanont

Funktionen du skal bruge til dette, hedder SUM.HVIS(). Funktionen summerer en talrække hvis en betingelse er opfyldt.
På Resultat-arket ud for "01.09.02" skriver du:
=SUM.HVIS(Kørselsregnskab!$A$1:$A$100;"=01.09.02";Kørselsregnskab!$G$1:$G$100)
hvor $A$1:$A$100 referer til området med datoerne, og $G$1:$G$100 refererer til cellerne med de km, der skal summeres.

Private Sub Worksheet_Activate()
Dim Sum(31) As Integer, RDag As String
C = 1
Do
RDag = Format(Worksheets("Kørselsregnskab").Cells(C, 1), "dd")
Sum(Val(RDag)) = Sum(Val(RDag)) + Worksheets("Kørselsregnskab").Cells(C, 4)
If Sum(Val(RDag)) > 0 Then
  Worksheets("Resultat").Cells(Val(RDag), 2) = Sum(Val(RDag))
  End If
  C = C + 1
Loop Until Worksheets("Kørselsregnskab").Cells(C, 1) = ""
End Sub

her finder den dine km i kolonne D,
altså her :("Kørselsregnskab").Cells(C, 4)
og gemmer summen her:("Resultat").Cells(Val(RDag), 2)
= kolonne B
så der er her du skal rette, hvis du vil have dem andre steder.

Du kan indsætte denne array formel i resultat fanen ud for dagen og kopiere ned:

{=SUM(IF(DAY(kørselsregnskab!$A$1:$A$100) = Sheet2!A1;OFFSET(kørselsregnskab!$A$1:$A$100;0;2);0))}

Den forudsætter at
1. Dine data står i fanebladet 'kørselsregnskab' i området A1:A100
2. Kilometertallet står i fanebladet 'kørselsregnskab' i området C1:C100
3. Feltet med dagen står i fanebladet 'resultat' i området A1:A31

Husk når du indsætter formelen skal du trykke CTRL + SHIFT + ENTER istedet for bare ENTER.

Hvis du har over flere måneder, kan du lave overskrifter
i Resultat arket således.
Dag    Jan    Feb    Mar    Apr    Maj    Jun    Jul    Aug
1                    100           
2                                456
3                               
4                               
5                               
6                                679

med dette:
Private Sub Worksheet_Activate()
Dim Sum(31) As Integer, RDag As String, Måned As String
C = 1
Do
RDag = Format(Worksheets("Kørselsregnskab").Cells(C, 1), "dd")
Måned = Format(Worksheets("Kørselsregnskab").Cells(C, 1), "mm")
Sum(Val(RDag)) = Sum(Val(RDag)) + Worksheets("Kørselsregnskab").Cells(C, 4)
If Sum(Val(RDag)) > 0 Then
  Worksheets("Resultat").Cells(Val(RDag) + 1, 1 + Val(Måned)) = Sum(Val(RDag))
  End If
  C = C + 1
Loop Until Worksheets("Kørselsregnskab").Cells(C, 1) = ""
End Sub

Hvordan går det - kan du bruge de svar du har modtaget, eller skal der arbejdes videre med problemet?

Erik Juul du er på Perfekt i datoen "01.09.02" kunne jeg godt tænke mig at 09 kommer fr et andet feldt freks. H3 . Hvordan skriver man det.

I andre må også gerne komme med jeres bud

Jeg vil stadigvæk vælge VBA, jeg synes bedst om måden at gøre det på og den opdater altid uanset antal poster, jeg har lige rettet lidt siden sidst, jeg fik ikke nulstillet variablen.

Private Sub Worksheet_Activate()
Dim Sum(31) As Integer, RDag As String, Måned As String, Fdag As String
C = 1
Do
RDag = Format(Worksheets("Kørselsregnskab").Cells(C, 1), "dd")
Måned = Format(Worksheets("Kørselsregnskab").Cells(C, 1), "mm")
If C > 1 Then
If Worksheets("Kørselsregnskab").Cells(C, 1) <> Worksheets("Kørselsregnskab").Cells(C - 1, 1) Then
Fdag = Format(Worksheets("Kørselsregnskab").Cells(C - 1, 1), "dd")
Sum(Val(Fdag)) = 0
End If
End If
Sum(Val(RDag)) = Sum(Val(RDag)) + Worksheets("Kørselsregnskab").Cells(C, 4)
If Sum(Val(RDag)) > 0 Then
  Worksheets("Resultat").Cells(Val(RDag) + 1, 1 + Val(Måned)) = Sum(Val(RDag))
  Else
  Worksheets("Resultat").Cells(Val(RDag) + 1, 1 + Val(Måned)) = ""
  End If
  C = C + 1
Loop Until Worksheets("Kørselsregnskab").Cells(C, 1) = ""
End Sub
mvh kabbak

kabbak  hvordan ligger man den her kode ind

hvis du ikke har VBA på menulinien, så højreklik på et tomt sted på menulinien og vælg Visual basic , klik på rediger Visual basic.
Derinde vælger du mappen resultat og sætter det ind der.
Luk Visual basic ved at trykke på øverste X .
så skulle det virke så at arket resultat opdateres hvergang du aktiverer det.

Nu er det sådan at resultat starter først ved D7  til D37

Og datoen står i A6 til A100  og km i G6 til G100

Hvoran skal jeg så skrive det

Ret følgende:
C = 1 til C = 6
If C > 1 Then til If C > 6 Then
Sum(Val(RDag)) = Sum(Val(RDag)) + Worksheets("Kørselsregnskab").Cells(C, 4)
til
Sum(Val(RDag)) = Sum(Val(RDag)) + Worksheets("Kørselsregnskab").Cells(C, 6)

If Sum(Val(RDag)) > 0 Then
  Worksheets("Resultat").Cells(Val(RDag) + 1, 1 + Val(Måned)) = Sum(Val(RDag))
  Else
  Worksheets("Resultat").Cells(Val(RDag) + 1, 1 + Val(Måned)) = ""
  End If
til
If Sum(Val(RDag)) > 0 Then
  Worksheets("Resultat").Cells(Val(RDag) + 6, 4 + Val(Måned)) = Sum(Val(RDag))
  Else
  Worksheets("Resultat").Cells(Val(RDag) + 6, 4 + Val(Måned)) = ""
  End If

Jeg får en fejl i den her linje :


um(Val(RDag)) = Sum(Val(RDag)) + Worksheets("Kørselsregnskab").Cells(C, 4)

En run time error 6

Skal det ikke skrives hvor resultatet skal skrives ??

Sum(Val(RDag)) = Sum(Val(RDag)) + Worksheets("Kørselsregnskab").Cells(C, 6)
du har glemt at rette

Nu virker det men resultatet er ikke rigtigt

asker > Skal det ikke skrives hvor resultatet skal skrives ??
det finder den ud af ved hjælp af dag og måned.
  Worksheets("Resultat").Cells(Val(RDag) + 6, 3 + Val(Måned)) = Sum(Val(RDag))
Forklaring:
RDag = dag som styrer rækken + 6 fordi du har data i D7 og nedefter
Måned = styrer kolonnen +3 for kolonne D

Næææ der skrives slet ikke noget

send på mail til mig, så retter jeg det til.

kabbak@worldonline.dk

Jov resultatet skal skrives i resultat

Fra B7 til B37 er der tal startende fra 1 til 31 (datoerne) i D7 til D37 skal resultattes skrives ud for hver dato

Er sendt

Jeg sætter yderliger 60 point af til en funktion i fanen resultat der regner privatkørsel ud (stadig med udgangspunkt i at indtastningerne i kørselregnskab er forskellige hver gang.

Herer et ekssempel på indtastningen i fanen kørselregnskab:

02.09.02    206.032    Rødovre-ForsvareByg(Kbh)-Rødovre    206.066    34
03.09.02    206.212    Rødovre-Danmail(Brønshøj)-Rødovre    206.229    17
06.09.02    206.615    Rødovre-Postområdet(Århus)-Rødovre  207.218    603

Og som man kan se skal der laves nogle mellem regninger - privat kørsel i frek. den 02.09.02er km 146 osv. kan det laves.

Resultattet skal skrives i fanen resultat i kolenden G7 til G37

Den er svær så jeg sætter yderliger 100 point til den

kabak det du laver er det uafhængigt af måned

Jeg forsætter i morgen

Jeg har lavet en model, som løser begge dine problemer.
Interesseret, så send en mail eller opgiv en mail-adresse.
janvogt@esenet.dk

Det er en evighedsmodel, hvor du under resultat-arket kan vælge på en rulleliste hvilken måned og hvilket år du ønsker at se, og så får du dit resultat opdelt på både erhvervs- og privat kørsel.

send det til steen@net2admin.dk

Er sendt til afsenderadressen

Asker fik du set på modellen?

Asker?

Asker ......
Jeg og andre har brugt meget tid på at hjælpe dig.
Det mindste du kunne gøre var da lige at vende tilbage.

Hallo ..... ?

Hallo hallo ...

Asker >> Uddel nogle point og få lukket spørgsmålet...

Hallo hallo hallo ....

...