en daarmee zet je de celverwijzing vast.quote:Op zondag 3 april 2011 10:41 schreef qu63 het volgende:
[..]
Die tip van Hendrik gooit een of meerdere $'s in je formule.
=als(of(P7="Piet B.V.";P7="Kees B.V.");C7;"")quote:Op maandag 4 april 2011 14:33 schreef PAYPROF het volgende:
Ik heb een voor jullie wellicht makkelijke vraag:
Ik zoek een formule voor het volgedende:
Als de waarde (tekst) in cel P7 gelijk is aan "Piet B.V." of "Kees B.V." dan wil ik dat de gegevens van cel C7 worden overgenomen.
Ik was met de ALS formule begonnen, maar krijg het niet voor elkaar... misschien een andere formule ?
Alvast bedankt !
Hiervoor heb je in ieder geval de datum nodig. Het mooiste zou zijn dat in zowel begin als eindtijd zowel de datum als de tijd staat: dd-mm-yyyy hh:mm. Als je deze notatie gebruikt kun je de eind en begintijd altijd zo van elkaar af trekken (dan vervalt dus de vorige IF functie)quote:Op maandag 4 april 2011 17:20 schreef PAYPROF het volgende:
geweldig!
nog 1 mbt een range voor onregelmatigheidsdiensten:
van maandag 0.00 uur tm vrijdag 0.00 uur aan het einde van de dienst ORT uren berekenen.
vervolgens op zaterdag de uren en op zondag de uren
ORT op werkdagen is van 6 to 8 in de ochtend en van 18 tot 22 uur in de avond
op Zaterdag gehele dag ORT volgens x percentage en op zondag gehele dag ORT volgens x percentage.
dus als de eindtijd van een dienst van maandag op dinsdag eindigt om 7 uur dan krijgt de medewerker 1 uur ORT op doordeweekse werkdag.
Als de dienst op vrijdagavond begint om 22.45 uur en duurt tot zaterdag ochtend 7 uur, krijgt de medewerker 7 uur ORT op zaterdag
Begint de dienst op zaterdag om 22.45 uur tot zondag ochtend 7 uur, dan krijgt de medewerker 1.25 uur ORT op zaterdag en 7 uur ORT op zondag
en zo ook als de diensten eindigen tussen 18 en 22 uur...
ideetje hoe dit aan te pakken ?
Moet dat per se met VB?quote:Op woensdag 6 april 2011 15:15 schreef Goldfish80 het volgende:
Ziet iemand de fout in dit script? Ik wil een voorwaardelijke opmaak voor meer dan 3 voorwaarden.
[knip]
Wat gaat er mis dan?quote:Op woensdag 6 april 2011 17:05 schreef Puala het volgende:
Ik loop vast als ik die code uit dat artikel moet ombouwen naar een code die ik wil gebruiken
Ik weet niet wat ik hier in moet vullen: (cell to match,cells to match with,0)),"",cell to match)quote:
1 2 3 4 5 | Private Sub Worksheet_Change(ByVal Target As Range) Dim c As Range For Each c In Target.Cells With c Select Case .Value |
1 2 3 4 5 | Select Case .Value Case "rv" .Font.ColorIndex = 2 .Interior.ColorIndex = 3 |
1 2 3 | Dim c As Range For Each c In Target.Cells With c |
1 | With Target |
1 | ALS(EN(OF($AR11="ma";AR11="di";AR11="wo";AR11="do";AR11="vr");OF($AU11="ma";AU11="di";AU11="wo";AU11="do";AU11="vr") |
1 | =IF(SUM(--(AR11:AU11=A1:A5))>0;1;0) |
Ja, anders kun je maar 3 voorwaarden gebruiken.quote:
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 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 | Function ORT(start, eind) dagA = Application.WorksheetFunction.Weekday(start, 2) dagZ = Application.WorksheetFunction.Weekday(eind, 2) tijdA = Hour(start) + Minute(start) / 60 tijdZ = Hour(eind) + Minute(eind) / 60 'Uitgangspunten 'zaterdag en zondag is hele dag ORT 'doordeweekse tijdgrenzen OD=6:00, ND=22:00 OD = 6 ND = 22 'check of start en einddatum wel goed zijn ingevuld If start > eind Then ORT = "Starttijd later dan eindtijd" Exit Function End If 'langer dan 24 uur werken mag niet If eind - start > 1 Then ORT = "Werktijd langer dan 24 uur" Exit Function End If Select Case dagA Case 1 To 4 If dagZ = dagA Then If tijdA <= OD Then If tijdZ <= ND Then ORT = (OD - tijdA) / 24 Else ORT = (OD - tijdA + tijdZ - ND) / 24 End If Else If tijdA >= ND Then ORT = (tijdZ - tijdA) / 24 Else If tijdZ > ND Then ORT = (tijdZ - ND) / 24 Else ORT = 0 End If End If End If Else If tijdA <= OD Then If tijdZ <= OD Then ORT = (OD - tijdA + 2 + tijdZ) / 24 Else ORT = (OD - tijdA + 24 - ND + OD) / 24 End If Else If tijdA >= ND Then If tijdZ <= OD Then ORT = (24 - tijdA + tijdZ) / 24 Else ORT = (24 - tijdA + OD) / 24 End If Else If tijdZ <= OD Then ORT = (24 - ND + tijdZ) / 24 Else ORT = (24 - ND + OD) / 24 End If End If End If End If Case 5 If dagZ = dagA Then If tijdA <= OD Then If tijdZ <= ND Then ORT = (OD - tijdA) / 24 Else ORT = (OD - tijdA + tijdZ - ND) / 24 End If Else If tijdA >= ND Then ORT = (tijdZ - tijdA) / 24 Else If tijdZ > ND Then ORT = (tijdZ - ND) / 24 Else ORT = 0 End If End If End If Else If tijdA <= OD Then ORT = (OD - tijdA + 24 - ND + tijdZ) / 24 Else If tijdA >= ND Then ORT = (24 - tijdA + tijdZ) / 24 Else ORT = (24 - ND + tijdZ) / 24 End If End If End If Case OD ORT = eind - start Case 7 If dagZ = dagA Then ORT = eind - start Else If tijdZ > OD Then ORT = (24 - tijdA + OD) / 24 Else ORT = (24 - tijdA + tijdZ) / 24 End If End If End Select End Function |
Forum Opties | |
---|---|
Forumhop: | |
Hop naar: |