|
|
|||||||
| Registreer | FAQ | Ledenlijst | Interessegroepen | Kalender | Zoeken | Berichten van vandaag | Markeer forums als gelezen |
|
|
|
Discussietools | Weergave |
|
#21
19 April 2010, 07:02
|
||||
|
||||
in de module van blad1
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Columns("B"), Target) Is Nothing Then Exit Sub 'alleen reageren op veranderingen in de B-kolom
Range("I2:I1000").ClearContents 'uitvoergebied leegmaken
Range("B2:B1000").AdvancedFilter xlFilterCopy, , Range("I2"), True 'unieke waarden kopieren naar hier
Range("I2:I1000").Sort Key1:=Range("I3"), Order1:=xlAscending, Header:=xlYes 'oplopend sorteren
End Sub
__________________
  bsalv  "Er gaat meer boven je petje dan eronder" Toon Hermans Is je vraag afgehandeld, gelieve die dan op "opgelost" te zetten via de daarvoor voorziene knop 
|
| Sponsored Links |
|
#22
19 April 2010, 10:24
|
|||
|
|||
|
Eh... helaas wel. Ik krijg ALS.FOUT (werkt niet in Excel2003) niet omgebouwd naar een andere formule. ALS(ISNB) geeft nog steeds een foutmelding en ALS(ISFOUT) ook. Dat is echt het enige, de rest werkt perfect (waarvoor veel dank).
Gr. J
|
|
#23
19 April 2010, 11:51
|
||||
|
||||
|
Code:
=ALS(ISFOUT(INDEX(list2;VERGELIJKEN(0;ALS(MAX(NIET(AANTAL.ALS($G$2:G2;list2))*(AANTAL.ALS(list2;">"&list2)+1))=(AANTAL.ALS(list2;">"&list2)+1);0;1);0)));"";INDEX(list2;VERGELIJKEN(0;ALS(MAX(NIET(AANTAL.ALS($G$2:G2;list2))*(AANTAL.ALS(list2;">"&list2)+1))=(AANTAL.ALS(list2;">"&list2)+1);0;1);0)))
__________________
Groet, GiMe Moderator Mr.GiMe@worksheet.nl Alles is relatief en zelfs dat.. Een bijlage (Excelvoorbeeldje met aanduiding van het gewenste resultaat) erbij betekent: -dat de helper(s) niet de, meestal reeds bestaande, worksheet van de vrager moet(en) overtypen -geen (ver)gissen mogelijk is bij de interpretatie van het proza -men reeds kan anticiperen op toekomstige problemen -veel vlugger tot een oplossing komt kortom : Het warm water niet opnieuw dient uitgevonden te worden !
|
|
#24
19 April 2010, 17:40
|
|||
|
|||
|
Beste GiMi,
Bedankt, maar die formule was me al gelukt :-) Het is alleen de formule in kolom A die ik niet krijg aangepast voor Excel2003. Het lukt me wel, maar bij lege velden blijf ik daar foutmeldingen krijgen. Formule A3: =ALS.FOUT(INDIRECT(ADRES(KLEINSTE(ALS(List<>"";RIJ (List);"");RIJ()-2);2));"") Groet, Jeroen
|
|
#25
22 January 2011, 01:05
|
|||
|
|||
|
Beste mensen,
ben zeer blij met dit bestand.... echter wil ik dit met ordernummers doen... wanneer ik een nummer invoer gaat het niet meer goed... zie zelf niet echt een oplossing... Kan iemand helpen..?? Thanx Anne
|
|
#26
22 January 2011, 07:29
|
||||
|
||||
|
Dag Anne, welkom op de site.
Dit is een vrij oude topic, je kan best een nieuw onderwerp starten in het deel "vragen" en daar dan een voorbeeldbestandje (enkele regels zonder vertrouwelijke info) bijzetten. Zo heb je meest kans dat er snel en duidelijk op je vraag gereageerd wordt. Groeten, Bart
__________________
bsalv "Er gaat meer boven je petje dan eronder" Toon Hermans Is je vraag afgehandeld, gelieve die dan op "opgelost" te zetten via de daarvoor voorziene knop
|
 |
| Discussietools | |
| Weergave | |
|
|
|
|||||||
| Registreer | FAQ | Ledenlijst | Interessegroepen | Kalender | Zoeken | Berichten van vandaag | Markeer forums als gelezen |
Lineaire weergave
