Auteur Topic: Gegevens selecteren in een Excel bestand (gelezen 3061 keer)

ronnypie · « **Gepost op:** 18 juni 2021, 10:02:34 »

Beste leden,

Ik zou graag in onderstaand bestand als ik een naam selecteer via gegevensvalidatie alles van deze persoon te zien willen krijgen die in deze tabel staat (alle klassen, vakken, enzovoorts)!!
Is dat mogelijk en hoe?
Dank bij voorbaat!
Groeten,
Ronny

P.S. Alle namen in dat bestand en gegevens zijn fictief!

SoftAid · « **Reactie #1 Gepost op:** 18 juni 2021, 10:57:01 »

Hallo ronnypie,

Welkom op Oplossing.be

Ik veronderstel dat in je origineel bestand de gegevens niet gesorteerd staan op kolom F (Leeraars) en dan wordt werken via Voorwaardelijke opmaak zeer moeilijk (zo niet onmogelijk).

Een kleine macro zou dan hier vermoedelijk de beste oplossing zijn.

Willen we dat proberen?

SoftAid

ronnypie · « **Reactie #2 Gepost op:** 18 juni 2021, 11:58:08 »

Beste SoftAid,

Ik wil dat gerust proberen!
En ze staan inderdaad niet gesorteerd per leerkracht!
Dank bij voorbaat.

JEC · « **Reactie #3 Gepost op:** 18 juni 2021, 12:27:23 »

Met de gegevensvalidatie in U2, waar je de naam van de leraar invult

In V2 en doortrekken naar rechts: (Office 365)

Code: [Selecteer]

=FILTER(A$2:A$81;$F$2:$F$81=$U$2;"")
In V2 en doortrekken naar rechts én naar beneden trekken: (alle oudere versies) Deze moet je afsluiten met control shift enter, het is een matrix formule.

Code: [Selecteer]

=IFERROR(INDEX(A$2:A$81;SMALL(IF($F$2:$F$81=$U$2;ROW($1:$80));ROW(A1)));"")
Makkelijkste optie is een draaitabel.

SoftAid · « **Reactie #4 Gepost op:** 18 juni 2021, 12:45:21 »

Hey VeerJ,

ik heb, voor Excel 2007 NL, je formule omgezet naar:

Code: [Selecteer]

{=ALS.FOUT(INDEX(A$2:A$81;KLEINSTE(ALS($F$2:$F$81=$U$2;RIJ($1:$80));RIJ(A1)));"")}
en als test een willekeurige leerkracht in typ in U2, Dan krijg ik altijd de waarde die in A2 staat in V2

@ ronnypie, met welke versie en taal Excel werk je

SoftAid

JEC · « **Reactie #5 Gepost op:** 18 juni 2021, 13:27:35 »

Bij mij gaat het wel goed, apart..
Afgesloten met control shift enter?

SoftAid · « **Reactie #6 Gepost op:** 18 juni 2021, 14:03:54 »

Citaat

Afgesloten met control shift enter?

Yep

nu is het (volgens mij) de bedoeling van TS dat elke rij waarin de naam van een geselecteerde leerkracht (selectie van een cel in kolom F) alle rijen met die naam kleuren.
Kies je een andere naam dan moeten "die" rijen kleuren.

Ik kan me dat niet voorstellen zonder VBA...

Maar daar ben ik ook geen crack in.
Iets uitwerken in de aard van dit met Worksheet_Change ??

Code: [Selecteer]

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    If Target.Column = 6 Then
        Naam = Target.Value
        ThisRow = Target.Row
        For Each Naam In Range("F:F")
              Range.Cells(ThisRow, 1, ThisRow, 17).Interior.ColorIndex = 3
        Next
     Else
        Range.Cells(ThisRow, 1, ThisRow, 17).Interior.ColorIndex = xlColorIndexNone
      
    End If
End Sub

Zit nog vol fouten, maar misschien zie je er iets in.

SoftAid

JEC · « **Reactie #7 Gepost op:** 18 juni 2021, 14:29:00 »

Kan ook heel simpel met VO

SoftAid · « **Reactie #8 Gepost op:** 18 juni 2021, 14:38:10 »

Hey VeerJ,

Ja, die kant zou het op moeten gaan
Maar dan met selectie van een naam in kolom F in plaats van een naam ingeven in U2

Kan dat?

SoftAid

JEC · « **Reactie #9 Gepost op:** 18 juni 2021, 15:23:55 »

Dat moet inderdaad met VBA

SoftAid · « **Reactie #10 Gepost op:** 18 juni 2021, 15:59:57 »

Misschien enkel met Worksheet_change laten controleren of de Selected cel in kolom F zit, en zo ja, de waarde van die cel opslaan in een (verborgen) werkblad-cel. En dan kan VO zoals jij voorstelt met die werkblad-cel.

SoftAid

ronnypie · « **Reactie #11 Gepost op:** 19 juni 2021, 06:10:09 »

Hey Softaid,

Ik werk met een nederlandstalige excell en met office 2019!

Groeten,
RonnyPie

P.S. Het is wel de bedoeling om deze oplossing op een ander veel groter bestand toe te passen! En met Macro's heb ik niet veel ervaring!

JEC · « **Reactie #12 Gepost op:** 19 juni 2021, 10:34:25 »

Heb je de oplossingen wel bekeken?

SoftAid · « **Reactie #13 Gepost op:** 19 juni 2021, 10:50:53 »

Hallo ronnypie,

dank je wel. Dat hadden we begrepen.

@ Veerj,

mijn reactie in #10 was eigenlijk aan jou gericht. Kan jij iets klaarmaken met die combinatie?

Groeten,

SoftAid

JEC · « **Reactie #14 Gepost op:** 19 juni 2021, 10:58:39 »

Hi SoftAid,

Zie bijlage

Help!

Menu

Hulp bij posten

Zoeken

Recente topics