Kijk even bij de celopmaak.quote:Op woensdag 3 augustus 2011 21:51 schreef Greatmarked het volgende:
Ik ben bezig met een urenregistratie. Heb per dag de begintijd en eindtijd en de formule geeft een totaal. (vb: start: 9:00 eind: 21:00 totaal: 9:00) Als ik nu van alle dagen van de week het totaal wil uitrekenen (vb: 9:00 + 8:30 + 12:00) dan geeft de formule niet het totaal maar hij telt de uren door (dus 26 uur wordt 2:00).
Hoe kan ik er voor zorgen dat hij totalen gaat geven?
quote:Op woensdag 3 augustus 2011 21:51 schreef Greatmarked het volgende:
Ik ben bezig met een urenregistratie. Heb per dag de begintijd en eindtijd en de formule geeft een totaal. (vb: start: 9:00 eind: 21:00 totaal: 9:00) Als ik nu van alle dagen van de week het totaal wil uitrekenen (vb: 9:00 + 8:30 + 12:00) dan geeft de formule niet het totaal maar hij telt de uren door (dus 26 uur wordt 2:00).
Hoe kan ik er voor zorgen dat hij totalen gaat geven?
En dan kiezen voor [uu]:mm ipv uu:mmquote:
Iemand een linkje naar de opdrachten?quote:Op vrijdag 5 augustus 2011 12:21 schreef qu63 het volgende:
British teenager named 'Microsoft Excel world champion'
Nooit geweten dat er zelfs een WK voor is!
=vert.zoeken() al geprobeerd?quote:Op vrijdag 5 augustus 2011 15:10 schreef sitting_elfling het volgende:
Weet iemand hoe ik hier 1 cel na een tig tal kan linken? Je kiest een jaartal uit van 2-6 en in het vakje percentage komt dan dat nummer direct te staan. Ik zit te kloten met enorme IF constructies die niet werken. Iemand een idee?
[ afbeelding ]
Bingo! =vlookup(B2,(tabel),(2e rij)) werkte prima! Dank!quote:
Oh ja damn, dat ik daar niet aan dacht! Cool!quote:
Echt 5 sec werk Succes.quote:Op zaterdag 6 augustus 2011 21:49 schreef spooky1234 het volgende:
[..]
Oh ja damn, dat ik daar niet aan dacht! Cool!
1 | =SOM(GROOTSTE($A$1:$A$6;RIJ(1:3))) |
1 | =SOMPRODUCT(GROOTSTE($A$1:$A$6;RIJ(1:3))) |
Waar gebruik je die "small" dan voor?quote:Op zaterdag 6 augustus 2011 21:53 schreef Individual het volgende:
Als je een colom (A) voor de klanten zet die zegt IF(COUNTIF('klant B5', 'klantenlijst' B$2:B5)>1, ROW(),"") dan krijg je een rijnummer voor de unieke klanten te staan.
In die andere tabel zet je in colom F 1,2,3,etc. In colom G zet je VLOOKUP(SMALL(colom A,F1),A:B,2,0).
Met een beetje spelen kom je er wel uit en dan heb je een automatische unieke lijst ipv dat met de unieke filter (of pivottable) te doen.
1 | ws.Columns(i + Range("Column_First_TestCase") - 1).Replace What:=sFind, Replacement:=sReplace, LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False |
Had ik al gereageerd? Nee he?quote:Op woensdag 27 juli 2011 22:25 schreef actuarisje het volgende:
[..]
Ik ga er hier wel van uit dat het werkblad waar je gegevens opstaan de naam 'Sheet1' heeft.
1 2 3 4 5 6 7 | a b b c c d d e e f f g g a |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 | Option Base 1 Sub FindNonUniqueRecords() Dim values() As Variant Dim lastrowA As Long Dim lastrowB As Long Dim arrayLength As Long lastrowA = Range("A65536").End(xlUp).Row lastrowB = Range("B65536").End(xlUp).Row ReDim values(lastrowA) With Blad5 'Put column A in array For i = 1 To lastrowA values(i) = .Cells(i, 1) Next i arrayLength = UBound(values) 'Check if value in column B is in column A For j = 1 To lastrowB counter = 0 For k = 1 To arrayLength If .Cells(j, 2) = values(k) Then counter = counter + 1 Next k .Cells(j, 256) = counter Next j 'Highlight duplicates For l = 5 To 1 Step -1 If .Cells(l, 256) > 0 Then .Cells(l, 2).Interior.ColorIndex = 3 ' or delete with .Rows(l).Delete Next l 'Delete counter-column .Columns(256).Delete End With End Sub |
Forum Opties | |
---|---|
Forumhop: | |
Hop naar: |