-
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.
Zoeken
- Onderwerp starter Teuntje-t
- Startdatum
- Status
Teuntje-t,
Als je onderstaande functie in een module plakt, kun je met de formule zoeken_waarde op elke willekeurige plaats de eerste waarde uit een reeks halen.
Function zoeken_waarde(target As Range)
Application.Volatile
For Each Row In target
test = Row.Value
If Not IsEmpty(test) Then
zoeken_waarde = test
Exit For
End If
Next Row
End Function
de formule op je werkblad kan er dan als volgt uitzien:
=zoeken_waarde(Blad1!B1:B15)
Als je onderstaande functie in een module plakt, kun je met de formule zoeken_waarde op elke willekeurige plaats de eerste waarde uit een reeks halen.
Function zoeken_waarde(target As Range)
Application.Volatile
For Each Row In target
test = Row.Value
If Not IsEmpty(test) Then
zoeken_waarde = test
Exit For
End If
Next Row
End Function
de formule op je werkblad kan er dan als volgt uitzien:
=zoeken_waarde(Blad1!B1:B15)
joost verdaasdo
Terugkerende gebruiker
- Lid geworden
- 11 okt 2003
- Berichten
- 2.253
Hai, 
In Excel:
ALT+F11 (De editor opent)
Kies menu invoegen/module
Plak de code
Save
Sluit de editor
Klaar...:thumb:
In Excel:
ALT+F11 (De editor opent)
Kies menu invoegen/module
Plak de code
Save
Sluit de editor
Klaar...:thumb:
jzeedijk
Gebruiker
- Lid geworden
- 30 jul 2003
- Berichten
- 926
Hoi Teuntje,
In een lege kolom (Z) zet je de formule:
Blad1!Z11: =als(en(A11<>"";aantal.lege.cellen(A8:A10)=3);RIJ();"")
In Z11 komt nu het rijnummer te staan als in A8 t/ A10 lege cellen zijn, dus lege regels en A11 niet. De eerste niet lege regel dus.
In kolom Z verschijnen dus de rijnummers van alle eerste items.
Op het andere blad zet je vervolgens de formule:
Blad2!Z11: =als(aantal(Blad1!Z:Z)<rijen(Z$11:Z11);"";kleinste(Blad1!Z:Z;Rijen(Z$11:Z11)))
De rijnummers van blad1 staan nu onder elkaar zonder lege regels, met index kun je nu de gegevens overhevelen naar blad2.
Jeroen
In een lege kolom (Z) zet je de formule:
Blad1!Z11: =als(en(A11<>"";aantal.lege.cellen(A8:A10)=3);RIJ();"")
In Z11 komt nu het rijnummer te staan als in A8 t/ A10 lege cellen zijn, dus lege regels en A11 niet. De eerste niet lege regel dus.
In kolom Z verschijnen dus de rijnummers van alle eerste items.
Op het andere blad zet je vervolgens de formule:
Blad2!Z11: =als(aantal(Blad1!Z:Z)<rijen(Z$11:Z11);"";kleinste(Blad1!Z:Z;Rijen(Z$11:Z11)))
De rijnummers van blad1 staan nu onder elkaar zonder lege regels, met index kun je nu de gegevens overhevelen naar blad2.
Jeroen
- Status
