• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Komt datum voor in bepaalde periode

Status
Niet open voor verdere reacties.

PedroJV

Gebruiker
Lid geworden
23 aug 2018
Berichten
74
Beste Excel-forumleden.

Ik heb een excelbestand met daarin:

Tabel1
Patient - Opnamedatum - ontslagdatum.

Tabel2
Patient - voorschrijfdatum antibioticum


Welke formule kan ik gebruiken om in Tabel1 in een extra kolom aan te geven of de voorschijfdatum van Tabel2 voorkomt tussen (of gelijk aan) opnamedatum-ontslagdatum, bij dezelfde patient?

Alvast bedankt
 
Och Pedro, zou je zo goed willen zijn om een voorbeeldbestandje te posten, zonder privé gegevens. Dat maakt het voor iedereen wat makkelijker.
 
Zal iets worden met ALS(AANTAL.ALS(....
 
PHP:
=int((voorschrijfdatum-opnamedatum) /(ontslagdatum-opnamedatum))=0
 
Beste Ad en anderen,

hierbij mijn testvoorbeeld.

Voor "Sleutel tabel 2" in Tabel1 zou ik dus graag een formule hebben die de sleutel ophaalt van Tabel2, als de voorschrijfdatum ligt (of gelijk is) tussen OpnameDatum en OntslagDatum.
De Sleutels die er aan voldoen heb ik in Tabel2 geel gearceerd.

Alvast bedankt
 

Bijlagen

Volgens mij klopt of het voorbeeld of de vraagstelling niet.

Patient 29692 is opgenomen geweest van 13-10-2018 - 19-11-2018. op 14-10-2018 is sleutel 2969243384AMOXICILLINE 500MG DISPTAB uitgegeven en op 21-10-2018 2969243394FOSFOMYCINE 3G GRANULAAT. Beide sleutels vallen dus binnen de periode.

Patient 30051 is opgenomen geweest van 3-5-2019 - 4-5-2019 op 4-5-2019 zijn de sleutels 3005143589CEFTRIAXON 2000MG INFUSIEPD en 3005143589PIPERACIL/TAZOBAC 4000/500 uitgegeven. Deze vallen dus ook binnen de periode.

In de bijlage een oplossing met een UDF.
Code:
Function VenA(r1 As Range, r2 As Range)
  ar = r1
  For j = 2 To UBound(ar)
    If ar(j, 1) = r2(1, 1).Value And ar(j, 2) >= r2(1, 2) And ar(j, 2) <= r2(1, 3) Then c00 = c00 & "," & ar(j, 4)
  Next j
  VenA = Mid(c00, 2)
End Function
 

Bijlagen

Dank je wel voor de funktie VenA.

Je hebt helemaal gelijk met je opmerking dat het voorbeeld niet juist was.
Ik zie dat de twee opmerkingen die je aangeeft juist zijn.
Zeer slordig, dat krijg je als je te snel wilt werken. Je eerste opmerking moest 19-10-2018 zijn en de 2e regel bij patient 30051 was ik vergeten te deleten.
Maar geen excuus. Sorry daarvoor VenA


Als er ook nog iemand weet hoe dit eventueel te doen met een formule, dan hou ik me daarvoor ook aanbevolen.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan