VlookUp

[don42]

Beste helpers

ik heb dit gemaakt (opgenomen macro)

Range("E3").Select
    ActiveCell.FormulaR1C1 = _
        "=INDEX(Orgineel!R3C2:R74C10,MATCH(Gesorteerd!RC[-3],Orgineel!R3C2:R74C2,0),2)"
    Range("F3").Select
    ActiveCell.FormulaR1C1 = _
        "=INDEX(Orgineel!R3C2:R74C10,MATCH(Gesorteerd!RC[-4],Orgineel!R3C2:R74C2,0),3)"
    Range("G3").Select
    ActiveCell.FormulaR1C1 = _
        "=INDEX(Orgineel!R3C2:R74C10,MATCH(Gesorteerd!RC[-5],Orgineel!R3C2:R74C2,0),4)"
    Range("H3").Select
    ActiveCell.FormulaR1C1 = _
        "=INDEX(Orgineel!R3C2:R74C10,MATCH(Gesorteerd!RC[-6],Orgineel!R3C2:R74C2,0),5)"
    Range("I3").Select
    ActiveCell.FormulaR1C1 = _
        "=INDEX(Orgineel!R3C2:R74C10,MATCH(Gesorteerd!RC[-7],Orgineel!R3C2:R74C2,0),6)"
    Range("J3").Select
    ActiveCell.FormulaR1C1 = _
        "=INDEX(Orgineel!R3C2:R74C10,MATCH(Gesorteerd!RC[-8],Orgineel!R3C2:R74C2,0),7)"
    Range("K3").Select
    ActiveCell.FormulaR1C1 = _
        "=INDEX(Orgineel!R3C2:R74C10,MATCH(Gesorteerd!RC[-9],Orgineel!R3C2:R74C2,0),8)"
    Range("L3").Select
    ActiveCell.FormulaR1C1 = _
        "=INDEX(Orgineel!R3C2:R74C10,MATCH(Gesorteerd!RC[-10],Orgineel!R3C2:R74C2,0),9)"

deze regel wil ik graag in vba naar beneden 74 x
VlookUp


Don

 

[Haije]

Don,

wil je ook (een voorbeeld van) je bestand plaatsen, met deze macro?

 

[don42]

het bestandje

het is de bedoeling dat ik in blad orgineel in cel A1 een cijfer in tik
In blad gesorteerd komt dan deze regel boven aan te staan (derde regel 10 december)
het sorteren heb ik gewoon met formule gedaan
index en vergelijken
had het graag in VBA


Bekijk bijlage Roosters-fulltime.xlsm

 

[Haije]

Don,

probeer dit eens:

Range("E3").Resize(74,7)="=INDEX(Orgineel!$B$3:$J$74;VERGELIJKEN(Gesorteerd!B3;Orgineel!$B$3:$B$74;0);KOLOM()-3)"

in het engels:

Range("E3").Resize(74,7)="=INDEX(Orgineel!R3C2:R74C10,MATCH(Gesorteerd!RC[-3],Orgineel!R3C2:R74C2,0),COLUMN()-3)"

Hierin is de verwijzing naar de kolom (2, 3, 4, ...) vervangen door Column()-3.

Resize(74,7) zorgt ervoor dat het hele gebied in één keer gevuld wordt.

 

[don42]

niet helemaal

hij moet steeds vergelijken van kolom B

 

[HSV]

dit...

Gesorteerd!RC[-3],

...veranderen in...

Gesorteerd!RC2,