abonnement Unibet Coolblue Bitvavo
pi_50856181
Het grote Excel vragen topic:

Aangezien er vaker losse topics langskomen, leek het ons handig een centraal
Excel topic te maken waar men hun vragen / antwoorden kwijt kan.
Dus heb je vragen , kom je ergens niet uit, hoe maak ik nu precies die macro stel dan hier je vraag.

Tip : De help functie van excel kan je echt een eind op weg helpen ! (F1)

Als je een vraag stelt, zet er dan bij welke versie je hebt en op welke taal hij ingesteld staat!!

Deel I: [Excel] Het grote Excel vragen topic
Deel II: [EXCEL] Het grote Excel vragen topic, #2

[ Bericht 8% gewijzigd door DaFan op 28-06-2007 09:33:27 ]
pi_50856198
Damzkiee -_-
  dinsdag 26 juni 2007 @ 13:40:43 #3
135789 Damzkieee
Ontzettende natnek
pi_50856205
Ja.
Sorry mijne kan dicht
The Killers Heracles Almelo Real Madrid
29.10 Novastar HMH
pi_50856250
Laatste vraag:
quote:
Op dinsdag 26 juni 2007 13:38 schreef Damzkieee het volgende:
Ik ben weer bezig met mijn jaarlijkse eredivisiepoule.
Ik heb nu 18 scores van personen onder elkaar staan in cellen (worden berekend door de totalen per tabblad(persoon)).
Bv
Henk 29
Jan 28
Klaas 30

2 vragen:
1) Hoe kan ik dit op volgorde zetten zonder dat alle formules fucked up raken?
2) Kan ik in een cel daarnaast de positie van 1-18 automatisch aangeven?
dus bv
Henk 29 2
Jan 28 3
Klaas 30 1

Vriendelijk bedankt
quote:
Op dinsdag 26 juni 2007 13:39 schreef DaFan het volgende:
Vraag 1 sluit vraag 2 toch uit als die lukt?
  dinsdag 26 juni 2007 @ 13:42:01 #5
135789 Damzkieee
Ontzettende natnek
pi_50856261
Dat klopt.
The Killers Heracles Almelo Real Madrid
29.10 Novastar HMH
  dinsdag 26 juni 2007 @ 13:42:29 #6
135789 Damzkieee
Ontzettende natnek
pi_50856277
Dus eigenlijk óf vraag 1, óf vraag 2.
The Killers Heracles Almelo Real Madrid
29.10 Novastar HMH
  dinsdag 26 juni 2007 @ 13:45:42 #7
15967 Frollo
You know I am a righteous man
pi_50856388
quote:
Op dinsdag 26 juni 2007 13:42 schreef Damzkieee het volgende:
Dus eigenlijk óf vraag 1, óf vraag 2.
Vraag 2 gaat met RANG

Als je Henk, Jan en Klaas in A1, A2 en A3 zet en hun scores in B1 t/m B3, dan vraag je als volgt hun rang op:

=RANG(B1;$B$1:$B$3)
pi_50856447
Vraag 1:

Macro maken met de volgende opbouw:
  • Change event
  • Sorteren

    Eventueel kan je dus dat Sorteren (Selecteer bereik -> Data -> Sort) opnemen met de rode knop, dan dat kopiëren in je Worksheet Change event.

    Ik ga er hier vanuti dat je Worksheet Worksheet1 heet, en dat het bereik hier B1:B18 is.
    1
    2
    3
    4
    5
    6
    7
    8
    Private Sub Worksheet1_Change()
        
    Range("B1:B18").Select
        Selection.Sort Key1:=Range("B1"), Order1:=xlAscending, Header:=xlGuess, _
            OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
            DataOption1:=xlSortNormal

    End Sub
  •   dinsdag 26 juni 2007 @ 13:48:41 #9
    135789 Damzkieee
    Ontzettende natnek
    pi_50856504
    Liever niet met Macro's, omdat ik daar gewoon geen kut van begrijp
    The Killers Heracles Almelo Real Madrid
    29.10 Novastar HMH
      dinsdag 26 juni 2007 @ 13:50:09 #10
    135789 Damzkieee
    Ontzettende natnek
    pi_50856553
    De optie van Frollo werkt in elk geval al
    The Killers Heracles Almelo Real Madrid
    29.10 Novastar HMH
    pi_50856684
    Die eerste optie kan volgens mij niet met formules.

    Frollo: Wat is de Engelse versie van Rang?
      dinsdag 26 juni 2007 @ 13:54:51 #12
    15967 Frollo
    You know I am a righteous man
    pi_50856717
    quote:
    Op dinsdag 26 juni 2007 13:54 schreef DaFan het volgende:
    Die eerste optie kan volgens mij niet met formules.

    Frollo: Wat is de Engelse versie van Rang?
    Ik gok RANK.
    pi_50856746
    Juh had ff moeten googlen, derde hit raak
    Tnx.
      dinsdag 26 juni 2007 @ 13:56:23 #14
    15967 Frollo
    You know I am a righteous man
    pi_50856784
    quote:
    Op dinsdag 26 juni 2007 13:54 schreef Frollo het volgende:

    [..]

    Ik gok RANK.
    Yep, goed gegokt.
      dinsdag 26 juni 2007 @ 13:59:22 #15
    135789 Damzkieee
    Ontzettende natnek
    pi_50856919
    quote:
    Op dinsdag 26 juni 2007 13:54 schreef DaFan het volgende:
    Die eerste optie kan volgens mij niet met formules.

    Frollo: Wat is de Engelse versie van Rang?
    In principe is dit genoeg.
    The Killers Heracles Almelo Real Madrid
    29.10 Novastar HMH
    pi_50857063
    quote:
    Op dinsdag 26 juni 2007 13:56 schreef Frollo het volgende:

    [..]

    Yep, goed gegokt.
    Jezus blij dat ik gene Finse versie dan typ je je schraal
      dinsdag 26 juni 2007 @ 14:04:32 #17
    15967 Frollo
    You know I am a righteous man
    pi_50857123
    lol
      dinsdag 26 juni 2007 @ 14:05:30 #18
    135789 Damzkieee
    Ontzettende natnek
    pi_50857169
    Maar optie 1 is dus onmogelijk zonder Macro?
    The Killers Heracles Almelo Real Madrid
    29.10 Novastar HMH
      dinsdag 26 juni 2007 @ 14:09:47 #19
    15967 Frollo
    You know I am a righteous man
    pi_50857342
    quote:
    Op dinsdag 26 juni 2007 14:05 schreef Damzkieee het volgende:
    Maar optie 1 is dus onmogelijk zonder Macro?
    Gewoon in de kolom met scores gaan staan en op het knopje 'AZ + pijl naar beneden' klikken, dat moet toch gewoon lukken?
      dinsdag 26 juni 2007 @ 15:20:10 #20
    135789 Damzkieee
    Ontzettende natnek
    pi_50860112
    Jamaar, dan veranderen al die cellen mee op de een of andere manier.
    The Killers Heracles Almelo Real Madrid
    29.10 Novastar HMH
      dinsdag 26 juni 2007 @ 15:23:45 #21
    15967 Frollo
    You know I am a righteous man
    pi_50860279
    quote:
    Op dinsdag 26 juni 2007 15:20 schreef Damzkieee het volgende:
    Jamaar, dan veranderen al die cellen mee op de een of andere manier.
    Dat is logisch. Als je dit hebt:
    1
    2
    3
    Henk  29
    Jan   28
    Klaas 30

    En je sorteert alléén de kolom met de standen, dan krijg je dit:
    1
    2
    3
    Henk  28
    Jan   29
    Klaas 30


    Dat lijkt me toch ook niet de bedoeling.
    pi_50863627
    Hoe kan ik in Excel grafieken mooi maken? Ik heb een hoop grafieken die allemaal in hetzelfde verslag moeten. Nu hebben de lettertypes en balken en dergelijke in iedere grafiek weer een ander formaat. Hoe kan ik zorgen dat dit en de as met percentages in iedere grafiek even groot is?
    Zie voor verduidelijking hier 2 van mijn grafiekjes:



    Als het niet in Excel kan, waar kan het dan wel mee? ..ik wil graag een mooi geheel voor mijn verslag..
      dinsdag 26 juni 2007 @ 17:05:24 #23
    15967 Frollo
    You know I am a righteous man
    pi_50863915
    Toch met de hand bijwerken, vrees ik.
    Een grafiek met minder gegevens zal automatisch dikkere balken krijgen, daar doe je weinig aan.

    Al kun je wel proberen om een aangepast grafiektype te maken:

    Maak eerst één grafiek helemaal zoals je 'm hebben wil. Klik er dan met rechts op en kies Grafiektype. Ga naar tabblad Aangepaste typen, selecteer Door de gebruiker gedefinieerd, klik op Toevoegen en sla je aangepaste grafiektype op.
    Nu kun je de overige grafieken opmaken volgens dit aangepaste type. Waarschijnlijk moet je de details nog handmatig bijwerken, maar het is allicht sneller dan bij elke grafiek opnieuw beginnen.
    pi_50864904
    bedankt voor je reactie. Ik heb gedaan wat je zei, maar dat probleem met die dikte van de balken blijf ik houden helaas.. En als ik ze met de hand bijwerk krijg ik ze nooit allemaal hetzelfde..
    weet iemand een ander programma waar je mooiere grafieken mee kan maken?
    pi_50864930
    ..

    [ Bericht 99% gewijzigd door TuuT op 26-06-2007 17:35:50 ]
      woensdag 27 juni 2007 @ 13:30:19 #26
    15967 Frollo
    You know I am a righteous man
    pi_50896603
    quote:
    Op dinsdag 26 juni 2007 17:33 schreef TuuT het volgende:


    weet iemand een ander programma waar je mooiere grafieken mee kan maken?
    Begin jaren 90 wilde ik nog wel eens werken met Harvard Graphics (onder DOS ). Zou dat nog bestaan?
    pi_50918536
    quote:
    Op zaterdag 16 juni 2007 15:14 schreef Frollo het volgende:

    [..]

    Je zou deze formule in bijvoorbeeld A100 kunnen zetten:

    =AANTALARG(A2:A99)

    De formule telt alle niet-lege cellen (oftewel: de cellen waarin een x staat) in A2 t/m A99.
    Vervolgens doorslepen naar B100, C100 enzovoort
    Ik heb deze code dus ingevoerd, maar krijg een no name error (wat dat ook moge zijn) en dan zulke tekens ### wat doe ik verkeerd
    pi_50919365
    Gebruik COUNTA ipv AANTALARG en maak je kolommen breder.

    ### is om aan te geven dat het getal niet in de cel past
      donderdag 28 juni 2007 @ 09:31:41 #29
    15967 Frollo
    You know I am a righteous man
    pi_50928213
    quote:
    Op woensdag 27 juni 2007 22:55 schreef DaFan het volgende:
    Gebruik COUNTA ipv AANTALARG
    Altijd weer dat gezeik met die gelokaliseerde versies.
    Welke Microsoft-medewerker heeft dat in vredesnaam bedacht?

    DaFan, als het nog lukt, kun je dan niet 'ns in de OP zetten dat de vraagsteller in elk geval moet vermelden welke taal hij/zij heeft?
    pi_50928255
    quote:
    Op donderdag 28 juni 2007 09:31 schreef Frollo het volgende:
    DaFan, als het nog lukt, kun je dan niet 'ns in de OP zetten dat de vraagsteller in elk geval moet vermelden welke taal hij/zij heeft?
    Het kon nog net

    Btw, je sig: vindt -> vind en huiskamer aan elkaar [/purist]

    [ Bericht 21% gewijzigd door DaFan op 28-06-2007 09:35:36 (Anders leer ik zelf ff lezen) ]
      donderdag 28 juni 2007 @ 09:34:35 #31
    15967 Frollo
    You know I am a righteous man
    pi_50928269
    quote:
    Op donderdag 28 juni 2007 09:33 schreef DaFan het volgende:

    [..]

    Het kon nog net
      donderdag 28 juni 2007 @ 09:35:06 #32
    15967 Frollo
    You know I am a righteous man
    pi_50928275
    quote:
    Op donderdag 28 juni 2007 09:33 schreef DaFan het volgende:

    Btw, je sig: wordt -> word en huiskamer aan elkaar [/purist]
    Klik er maar eens op.
    pi_50928300
    quote:
    Op donderdag 28 juni 2007 09:35 schreef Frollo het volgende:

    [..]

    Klik er maar eens op.
    Oja LOL dat was van die muts
      donderdag 28 juni 2007 @ 09:37:29 #34
    15967 Frollo
    You know I am a righteous man
    pi_50928332
    quote:
    Op donderdag 28 juni 2007 09:36 schreef DaFan het volgende:

    [..]

    Oja LOL dat was van die muts [afbeelding]
    Mooi he?

    Ik verdien nota bene m'n brood met de taalpurist uithangen, dus ik zou zoiets echt niet zonder reden in mijn sig zetten.
    pi_50928370
    quote:
    Op donderdag 28 juni 2007 09:37 schreef Frollo het volgende:

    [..]

    Mooi he?

    Ik verdien nota bene m'n brood met de taalpurist uithangen, dus ik zou zoiets echt niet zonder reden in mijn sig zetten.
    Ik dacht dat je dit topic zat te F5'en want je bent er altijd zo snel bij, terwijl ik op stage zit
    Nouja, laten we maar weer over Excel praten
    pi_50947295
    quote:
    Op woensdag 27 juni 2007 22:55 schreef DaFan het volgende:
    Gebruik COUNTA ipv AANTALARG en maak je kolommen breder.

    ### is om aan te geven dat het getal niet in de cel past
    Yup hij werkt, thnx
    pi_50968179
    hoi,

    ik zit nog even met het volgende:

    Ik heb bijvoorbeeld het volgende lijstje:

    Jan 14
    Piet 20
    Peter 25
    Frits 30
    Truus 50

    Nu wil ik de top3 ergens apart krijgen.
    Ik gebruik nu GROOTSTE(B1:B5;1) voor de hoogste etc. nu krijg ik netjes die waarde in een cel maar als ik nu ook de naam nog ervoor wil?

    Dus in D1 de naam met de hoogste waarde en in E1 de waarde zelf... dat lukt me niet
      vrijdag 29 juni 2007 @ 13:29:30 #38
    15967 Frollo
    You know I am a righteous man
    pi_50968420
    quote:
    Op vrijdag 29 juni 2007 13:22 schreef FortunaHome het volgende:
    hoi,

    ik zit nog even met het volgende:

    Ik heb bijvoorbeeld het volgende lijstje:

    Jan 14
    Piet 20
    Peter 25
    Frits 30
    Truus 50

    Nu wil ik de top3 ergens apart krijgen.
    Ik gebruik nu GROOTSTE(B1:B5;1) voor de hoogste etc. nu krijg ik netjes die waarde in een cel maar als ik nu ook de naam nog ervoor wil?

    Dus in D1 de naam met de hoogste waarde en in E1 de waarde zelf... dat lukt me niet
    =ZOEKEN(E1;$B$1:$B$5;$A$1:$A$5)
    pi_50969163
    Ik stel de vraag even iets anders... dan kom ik er wel uit...

    Ik heb een lijst met namen:

    JAN
    JAN
    JAN
    PIET
    PIET
    JAN

    nu wil ik de naam die het vaakst voorkomt uit laten spugen in B1 bijvoorbeeld... bij getallen zou ik gebruiken: =GROOTSTE(A1:A5;1)

    in B1 moet dus JAN komen te staan
      vrijdag 29 juni 2007 @ 13:53:59 #40
    15967 Frollo
    You know I am a righteous man
    pi_50969201
    Dat is een volkomen andere vraag dan net.
    pi_50969277
    Haha ja ik zie het... maar weet je dit ook ? danku
    pi_50969336
    In Excel 2007 (maakt volgens mij verder niet uit?) wil ik het volgende; Als er iets in een field staat, wil ik dat het field een bepaald kleurtje krijgt, en als het leeg is, gewoon blank.

    Kan dit?
    Op woensdag 4 februari 2009 20:58 schreef Hoi_Piepeloi het volgende:
    Ik dacht altijd dat jij een extreme kutuser was, maar je bent best grappig :+
    pi_50969376
    Ja met conditional formatting:

    Ga naar opmaak en dan voorwaardelijke opmaak.
      vrijdag 29 juni 2007 @ 14:00:25 #44
    15967 Frollo
    You know I am a righteous man
    pi_50969406
    quote:
    Op vrijdag 29 juni 2007 13:56 schreef FortunaHome het volgende:
    Haha ja ik zie het... maar weet je dit ook ? danku
    Nee, sorry.
    pi_50969489
    FH:
    Ik neem aan dat je wel ergens een lijst met elke naam hebt. Dan zet je daarachter elke naam:
    1=COUNTIF(<range>;"Naam")


    Range = A1 tot A10 bv waar al die namen instaan. "Naam" kan je vervangen door de cel natuurlijk.
    Dan kan je met Grootste kijken wie het meest voorkomt en dan met Zoeken weer de naam erbij halen.

    Hoe je het in een keer doet weet ik ook niet.
    pi_50969603
    quote:
    Op vrijdag 29 juni 2007 13:59 schreef FortunaHome het volgende:
    Ja met conditional formatting:

    Ga naar opmaak en dan voorwaardelijke opmaak.
    Thanks, ik heb het gevonden.
    Op woensdag 4 februari 2009 20:58 schreef Hoi_Piepeloi het volgende:
    Ik dacht altijd dat jij een extreme kutuser was, maar je bent best grappig :+
    pi_50969763
    quote:
    Op vrijdag 29 juni 2007 14:03 schreef DaFan het volgende:
    FH:
    Ik neem aan dat je wel ergens een lijst met elke naam hebt. Dan zet je daarachter elke naam:
    [ code verwijderd ]

    Range = A1 tot A10 bv waar al die namen instaan. "Naam" kan je vervangen door de cel natuurlijk.
    Dan kan je met Grootste kijken wie het meest voorkomt en dan met Zoeken weer de naam erbij halen.

    Hoe je het in een keer doet weet ik ook niet.
    Mja ik heb een lijst met 300+ namen...
    pi_50970592
    quote:
    Op vrijdag 29 juni 2007 14:12 schreef FortunaHome het volgende:

    [..]

    Mja ik heb een lijst met 300+ namen...
    300 verschillende namen of is de lijst waar je in moet zoeken 300 lang?

    Edit: Nvm het lukt me niet, sorry
    pi_50971126
    Verschillende namen ja
    pi_51091541
    Als iemand mij zou kunnen helpen..

    Ik heb een sheet met de planning van projecten...



    En 't personeel..



    De vraag:

    Hoe krijgt ik voor elkaar dat als ik de projecten indeel met personeel, het projectsheet automatisch bijgewerkt wordt, of andersom?? Is daar een of andere formule voor?

    Ohja, ik heb 'm gewoon op Nederlands staan en de versie is 2003.

    Alvast bedankt..
      dinsdag 3 juli 2007 @ 14:00:55 #51
    25974 Wendigo
    Je moet geen tijd morsen.
    pi_51092773
    quote:
    Op vrijdag 29 juni 2007 14:56 schreef FortunaHome het volgende:
    Verschillende namen ja
    Als je nu een draaitabelet maakt over kolom A, namen in het rijveld en namen ook bij gegevensitems als aantal, hierna eventueel sorteren en dan heb je bijv: onderstaand resultaat:

    Aantal van naam
    naam Totaal
    JAN 4
    PIET 2
    Eindtotaal 6
    The universal brotherhood of man is our most precious possession, what there is of it.
    Mark Twain (1835 - 1910), Following the Equator
      donderdag 5 juli 2007 @ 09:33:44 #52
    162438 Litton-Lane
    Beyond Borders
    pi_51158176
    Ik heb ook een klein vraagje.

    Ik heb twee keuze lijsten in Excel.
    De ene bevat vijftal opties 0-50/51-125/126-250/251-400/401-700.De andere bevat basis/basis plus/basis extra. Nu wil ik als je een bepaalde keuze maakt in beide lijsten, dat die combinatie een prijs geeft in een daarvoor bestemde cel.
    Dus wanneer je in lijst 1 kiest voor 51-125 en in de tweede lijst voor basis extra wordt dit in cel 3: 550 ofzo.

    Weet iemand hoe ik dat (simple) doe in excel.

    Alvast bedankt.
      donderdag 5 juli 2007 @ 12:59:10 #53
    135789 Damzkieee
    Ontzettende natnek
    pi_51164102
    Een vraagje:

    Ik moet een hele zwik formules invullen voor de stand van mijn eredivisiepoule per speelronde (zie boven).
    =dln3!$P$14 is een voorbeeld (score van week 1), hiernaast komt =dln3!$P$25 (score week 2), enzovoorts. echter, ondanks dat het getal telkens met 11 oploopt kan ik er geen reeks van 'trekken' als in 1,3,5,7,9. Moet ik alles dan handmatig invullen voor elke deelnemer? (25dlnrs * 34 speelrondes?)

    Oja, ook voor elke deelnemer is de formule en de getallen gelijk, alleen dan =dln2 voor deelnemer 2.
    The Killers Heracles Almelo Real Madrid
    29.10 Novastar HMH
      donderdag 5 juli 2007 @ 15:40:26 #54
    94668 Joost-mag-het-weten
    Voor Vorst, Vlaming & vr R
    pi_51169827
    Ook een vraag :

    Ik heb een hele lijst in een excel bestand. Allemaal in 1 kolom en onder elkaar. Maar nu zitten daar een hele reeks 'dubbels' in. Kan ik excel daar automatisch de dubbels uit laten halen ?
    Frank Vandenbroucke : * 06-11-74; + 12-10-09
    "Mijn comeback wordt de grootste uit de wielergeschiedenis!" (14-08-07)
    "Vdb is klaar om opnieuw te schitteren" (10-10-07)
    "Ik rij geen koers, ik geef een voorstelling" (17-01-08)
    pi_51172213
    quote:
    Op donderdag 5 juli 2007 12:59 schreef Damzkieee het volgende:
    Een vraagje:

    Ik moet een hele zwik formules invullen voor de stand van mijn eredivisiepoule per speelronde (zie boven).
    =dln3!$P$14 is een voorbeeld (score van week 1), hiernaast komt =dln3!$P$25 (score week 2), enzovoorts. echter, ondanks dat het getal telkens met 11 oploopt kan ik er geen reeks van 'trekken' als in 1,3,5,7,9. Moet ik alles dan handmatig invullen voor elke deelnemer? (25dlnrs * 34 speelrondes?)

    Oja, ook voor elke deelnemer is de formule en de getallen gelijk, alleen dan =dln2 voor deelnemer 2.
    Haal om te beginnen dat dollarteken s weg voor de 14/25. Dat geeft namelijk aan dat bij 'doortrekken' het cijfer niet mag veranderen. Reeksen van 11 verschil herkent Excel wel hoor
    pi_51172255
    quote:
    Op donderdag 5 juli 2007 15:40 schreef Joost-mag-het-weten het volgende:
    Ook een vraag :

    Ik heb een hele lijst in een excel bestand. Allemaal in 1 kolom en onder elkaar. Maar nu zitten daar een hele reeks 'dubbels' in. Kan ik excel daar automatisch de dubbels uit laten halen ?
    Alles selecteren, Data -> Filter -> Advanced -> Filter the list in Place, en vink Unique Records only aan.
      donderdag 5 juli 2007 @ 20:17:30 #57
    135789 Damzkieee
    Ontzettende natnek
    pi_51178117
    quote:
    Op donderdag 5 juli 2007 16:54 schreef DaFan het volgende:

    [..]

    Haal om te beginnen dat dollarteken s weg voor de 14/25. Dat geeft namelijk aan dat bij 'doortrekken' het cijfer niet mag veranderen. Reeksen van 11 verschil herkent Excel wel hoor
    Dat kan niet, want dan pakt ie P, Q, R, S. Verder heb ik alle opties met het dollarteken geprobeerd, hij kent die reeks niet zodanig.
    The Killers Heracles Almelo Real Madrid
    29.10 Novastar HMH
    pi_51184807
    quote:
    Op donderdag 5 juli 2007 20:17 schreef Damzkieee het volgende:

    [..]

    Dat kan niet, want dan pakt ie P, Q, R, S. Verder heb ik alle opties met het dollarteken geprobeerd, hij kent die reeks niet zodanig.
    Het dollarteken voor het cijfer dan natuurlijk Maar ik begrijp hieruit dat je een verticaal verband (14,25,etc), horizontaal probeert door te trekken. En omdat het hier verwijzingen zijn naar cellen pakt ie dat dan inderdaad niet.

    Kheb ook niet goed gelezen. Je wil een reeks doortrekken, maar in een verband van cellen dat zelfs in een andere werkblad staat. Ik heb wel een soort van oplossing in mn hoofd maar ik weet niet of het geheel werkt.

    (Dit is geheel uit mn hoofd probeersel)
    dln3!$P$14 is je eerste cel. dln3!$P$25 is je tweede cel. Stel dat A1 je eerste cel is waar je hem inzet, en dat je hem dus 'doortrekt' naar A2.
    Wat als je de volgende code gebruikt in je eerste cel:
    1=dln3!$P$14

    En dan dit in je tweede cel:
    1=OFFSET(dln3!$P14;(COLUMN($A1)-1)*11;0))


    Bij mij werkt ie iig

    Btw Damz in de tijd dat dit antwoord komt had je het ook wel met de hand kunnen doen

    [ Bericht 25% gewijzigd door DaFan op 05-07-2007 23:23:32 ]
    pi_51185209
    Nog een vraagje, kun je een Excel sheet 'searchable' maken met een formpje ofzo?
    Op woensdag 4 februari 2009 20:58 schreef Hoi_Piepeloi het volgende:
    Ik dacht altijd dat jij een extreme kutuser was, maar je bent best grappig :+
    pi_51185327
    quote:
    Op donderdag 5 juli 2007 23:23 schreef Koploperkopper het volgende:
    Nog een vraagje, kun je een Excel sheet 'searchable' maken met een formpje ofzo?
    Als je over VB praat, ja.

    Je weet hoe lang een sheet is (hangt van je bereik af, anders 256 kolommen * 65536 rijen in 2003).

    1
    2
    3
    4
    5
    For i = 1 to 256
        For j = 1 to 65536  
             Waarde = Range(i & j).Value
        Next
    Next


    Dan loop je door elke cel heen :) In die dubbele For-loop moet je dan testen met de waardes die je eruit haalt natuurlijk (die hier 'Waarde' heet)
    pi_51198021
    Kan iemand mij vertellen hoe ik die irritante printer lijnen uitzet...

    Dus die stippellijntjes die het einde van een pagina aangeven?
      vrijdag 6 juli 2007 @ 13:33:18 #62
    15967 Frollo
    You know I am a righteous man
    pi_51198663
    quote:
    Op vrijdag 6 juli 2007 13:14 schreef FortunaHome het volgende:
    Kan iemand mij vertellen hoe ik die irritante printer lijnen uitzet...

    Dus die stippellijntjes die het einde van een pagina aangeven?
    Het bestand sluiten en weer openen. Het kan vast handiger, maar dit werkt ook.
    pi_51593510
    Weer terug van vakantie en direct een vraag:

    Ik heb een tabel met 8 kolommen. In kolom 8 staan gewcihten die ik wil optellen als in kolom 6 een bepaalde tekst staat. nu hoopte ik dat er een kant en klare formule voor is, anders moet ik weer gaan macro-en en daar heb ik geen zin in want de tour is op TV.
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
      woensdag 18 juli 2007 @ 14:34:44 #64
    15967 Frollo
    You know I am a righteous man
    pi_51593802
    SOM.ALS / SUMIF, alstu.
    pi_51594591
    quote:
    Op woensdag 18 juli 2007 14:34 schreef Frollo het volgende:
    SOM.ALS / SUMIF, alstu.
    helemaal gelijk, ik had alleen niet door dat dat ook met verschillende klommen kon, thx.
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
      donderdag 19 juli 2007 @ 15:42:23 #66
    43790 IJzercookie
    De specialiteit uit Vld
    pi_51629004
    Versie NL

    Ik wil graag vanuit een tabblad een verwijzing maken naar een ander tabblad. Dat doe ik nu door in de cel waar het moet komen een = te typen en dan naar het andere tabblad te gaan, de cel te selecteren en dan enter te geven.

    Helaas werkt dit nu niet. Ik heb het vermoeden dat dit komt omdat de cel in het andere blad een samengevoegde cel is.
    Bij andere cellen werkt het nl. wel gewoon.

    Is er een manier om dit te omzeilen zonder de samenvoeging op te heffen?
    That's the way the cookie crumbles
      donderdag 19 juli 2007 @ 16:02:41 #67
    43790 IJzercookie
    De specialiteit uit Vld
    pi_51629701
    Ik heb het nu opgelost door de samengevoegde cel te verwijzen naar een andere (niet samengevoegde) cel in een klein hoekje van de sheet, en vanuit die cel gelinkt naar de pagina waar ik het wilde hebben. Dat werkt goed, maar is niet ideaal natuurlijk.
    That's the way the cookie crumbles
    pi_51630394
    En dan de tekst wit maken van die "hulpcel"
      donderdag 19 juli 2007 @ 16:26:08 #69
    43790 IJzercookie
    De specialiteit uit Vld
    pi_51630431
    dat zou natuurlijk kunnen, maar het nadeel is dat andere mensen heel handig die hulpcellen gaan gebruiken omdat er immers niets in staat.
    That's the way the cookie crumbles
    pi_51631734
    Bij mij werkt naar een samengevoegde cel in een ander werkblad verwijzen wel. Je moet de eerste cel hebben (meest linksboven). Ik heb Office 2003.

    A1:B2 is samengevoegd in Werkblad2.
    Dan komt in de cel in werkblad 1:
    1=Werkblad2!A1
    pi_51631760
    De betreffende kolom waarin de hulpcel staat kun je ook nog verbergen. Rechtsklikken op kolomkop en dan verbergen.

    Ik kan alleen het probleem niet reproduceren. Als je verwijzing verwijst naar de linkerboven cel van de samengevoegde cel dan moet het dacht ik goed gaan.

    Stel je voor ik voeg een blok samen van C7 tm E12 dan kan ik de info uit die samengevoegde cel opvragen door te verwijzen naar cel C7.

    wat DaFan dus zegt
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
      zaterdag 21 juli 2007 @ 00:52:47 #72
    27454 InTrePidIvity
    Looks like it's broken...
    pi_51682253
    Ik verveel me op m'n werk, dus ik ben van plan om Scrabble te maken, zodat ik dat kan spelen via e-mail met m'n collega's. Daar zijn echter wel een hoop restricties voor nodig om valsspelen te voorkomen. Ik heb Excel al zover gekregen dat elk vakje maar één letter mag bevatten. Maar nu is het zo dat er in totaal maar 100 mogelijke letters zijn (incl. twee 'blanks', die ik voor het gemak maar ? heb gemaakt), wat betekent dat niet elke letter evenveel gebruikt kan worden.

    Zo is de E bijvoorbeeld 12x beschikbaar, maar de Z slechts 1x. Om te beginnen, hoe kan ik het beste zorgen dat Excel niet over het maximale aantal heengaat? Het gaat om het welbekende vlak van 15x15 vakjes waarin de letters terecht zouden mogen komen.

    We doen het stapje voor stapje, want ik ben een Excel-noob
    ...it's rielie broken... It's rielie, rielie broken... Let's go wecycle!
    [Tournament] Beste Remake
    pi_51770149
    Intre: En daar ga je Excel voor gebruiken?
    Je hebt dan sowieso macro's nodig die elke keer als er iets wordt ingevuld elke cel wordt gecheckt op de aanwezig van een letter, welke letter, hoe vaak ie al voorkomt, of dat mag (qua aantal) en dan een foutmelding.

    Je programmeert je helemaal uit de naad waarschijnlijk voor iets wat je vast ook wel online kan doen.
    pi_51778408
    Je kunt een macrootje maken die de checks voor je uitvoert. Je seletceert een cel en start dan de invulmacro. Even quick and dirty:

    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    24
    25
    26
    27
    28
    29
    30
    31
    32
    33
    34
    35
    36
    Sub scrabble()

    Dim invoer As String

    rij = ActiveCell.Row
    kolom = ActiveCell.Column

    invoer = InputBox("Geef in te voeren letter", "Scrabble input")

    Select Case invoer
    Case "a" Or "A"
       aantal = 0
       max_aantal = 3                                        'maximale aantal dat ingevoerde letter mag vookomen
       For i = 1 To 15
          For j = 1 To 15
             waarde = Range(i & j).Value            'niet de juiste formule maar You get the picture
             If waarde = "a" Or waarde = "A" Then aantal = aantal + 1
          Next
       Next

    If aantal > max_aantal - 1 Then
        Exit Sub
        Else: Range(rij & kolom).Value = "A"     'de in het begin geselecteerde cel weer kiezen
    End If
    Case "b" Or "B"
        'b's tellen etc
    Case "c"
        'c's tellen etc

    'etc etc D tm Z

    Case Else
        MsgBox "Wel een letter invoeren stoephoer"
    End Select

    End Sub


    [ Bericht 32% gewijzigd door Deetch op 24-07-2007 12:05:28 ]
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
    pi_51778537
    En dat voor elke cel die wordt aangeraakt, dus je moet zorgen dat voor elke cel die wordt aangeklikt deze macro wordt uitgevoerd.
    pi_51784044
    Hoe kan ik als ik de locatie van een cel heb bepaald met activecell.row en activecell.column later weer terugkeren naar deze cel?
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
    pi_51784477
    Al gevonden:

    1
    2
    3
    4
    i=kolomnummer
    j=rijnummer

    Range(Chr(i + 64) & j).Value = "test"
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
    pi_51785240
    Waarom die Chr(i+64)? Is dat omdat ie anders geen 64 kolommen 'extra' herkent?
    pi_51785965
    quote:
    Op dinsdag 24 juli 2007 15:37 schreef DaFan het volgende:
    Waarom die Chr(i+64)? Is dat omdat ie anders geen 64 kolommen 'extra' herkent?
    i is het kolomnummer en niet de letter die je nodig hebt voor de range functie. omdat CHR(65) "A" is en kolomnummer van kolom "A" 1 is doe je dus CHR(kolomnummer+64) om de kolomletter te krijgen.

    Ik heb de code voor scrabble voor wat betreft de letters invullen klaar. het is wel een beetje g4root gewoorden ivm 26 letters . Ik heb een gekleurd vlak van A3 tm O17 (15x15 veld) en twee knop om het veld te wissen (sub Clearfield) en een knop om op de geselecteerde cel een letter in te voeren (sub Letter)

    [code]
    Sub Clearfield()

    Range("A3:O17").Select
    Selection.ClearContents
    Range("A3").Select

    End Sub

    Sub Letter()

    Dim invoer As String

    'slaat lokatie geselecteerde cel op
    rij = ActiveCell.Row
    kolom = ActiveCell.Column

    'controleert of de geselecteerde cel binnen het bereik zit
    If rij < 3 Or rij > 17 Then
    MsgBox "In het gekleurde vlak blijven, lambek"
    Exit Sub
    End If

    If kolom > 15 Then
    MsgBox "In het gekleurde vlak blijven, lambek"
    Exit Sub
    End If

    'controleert of geselecteerde cel leeg is
    If ActiveCell.Value <> "" Then
    MsgBox "Lege cel selecteren, kweilgat"
    Exit Sub
    End If

    'invoervenster
    invoer = InputBox("Geef in te voeren letter", "Scrabble input")

    'controleert of er maar 1 letter wordt ingevoerd
    If Len(invoer) > 1 Then
    MsgBox "Maar 1 letter tegelijk, dufmuts"
    Exit Sub
    End If

    'maakt van kleine letters grote letters
    If Asc(invoer) <= 122 And Asc(invoer) >= 97 Then invoer = Chr(Asc(invoer) - 32)

    'per letter wordt nu gekeken of die nog ingevoerd mag worden
    Select Case invoer
    Case "A"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "A" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "A"
    End If

    'copy paste van de code in case "A" waarbij je de 2x de "A" moet
    'vervangen door de gewenste letter en de max_aantal moet aanpassen
    Case "B"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "B" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "B"
    End If

    Case "C"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "C" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "C"
    End If

    Case "D"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "D" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "D"
    End If

    Case "E"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "E" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "E"
    End If

    Case "F"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "F" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "F"
    End If

    Case "G"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "G" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "G"
    End If

    Case "H"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "H" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "H"
    End If

    Case "I"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "I" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "I"
    End If

    Case "J"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "J" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "J"
    End If

    Case "K"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "K" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "K"
    End If

    Case "L"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "L" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "L"
    End If

    Case "M"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "M" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "M"
    End If

    Case "N"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "N" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "N"
    End If

    Case "O"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "O" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "O"
    End If

    Case "P"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "P" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "P"
    End If

    Case "Q"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "Q" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "Q"
    End If

    Case "R"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "R" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "R"
    End If

    Case "S"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "S" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "S"
    End If

    Case "T"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "T" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "T"
    End If

    Case "U"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "U" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "U"
    End If

    Case "V"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "V" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "V"
    End If

    Case "W"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "W" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "W"
    End If

    Case "X"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "X" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "X"
    End If

    Case "Y"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "Y" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "Y"
    End If

    Case "Z"
    aantal = 0
    max_aantal = 5
    For i = 1 To 15
    For j = 3 To 18
    waarde = Range(Chr(64 + i) & j).Value
    If waarde = "Z" Then aantal = aantal + 1
    Next
    Next

    If aantal > max_aantal - 1 Then
    MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max_aantal & ")")
    Exit Sub
    Else
    Range(Chr(64 + kolom) & rij).Value = "Z"
    End If

    Case Else
    MsgBox "Wel een letter invoeren stoephoer"

    End Select

    End Sub
    [code]
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
    pi_51786206
    je moet nog wel ff het max_aantal per letter aanpassen.

    oh ja en "langste post ever"
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
    pi_51787612
    Hehe Deetch En je vergeet nu je eigen regel die je net hebt gepost. Ik zou het zo proberen:

    Achter max_aantal komt een reeks getallen die aangeven hoe vaak A t/m Z mag voorkomen, gescheiden door komma's, dus 26 keer)
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    max_aantal = Array(A,B,C,D...Z)

    For x = 1 to 26
      Case Chr(x)
         max = max_aantal(Chr(x))

    For i = 1 To 15
       For j = 3 To 18
          waarde = Range(Chr(64 + i) & j).Value
          If waarde = Chr(x) Then aantal = aantal + 1
       Next
    Next

    If aantal > max - 1 Then
       MsgBox ("Maximaal aantal letters """ & invoer & """ bereikt (" & max & ")")
       Exit Sub
    Else
        Range(Chr(64 + kolom) & rij).Value = Chr(x)
    End If


    Ook hier wordt Chr(x) vervangen door A > Z.

    Scheelt een hoop nietwaar

    [ Bericht 31% gewijzigd door DaFan op 24-07-2007 17:02:10 ]
    pi_51787657
    quote:
    Op dinsdag 24 juli 2007 16:33 schreef fOubie het volgende:
    Hoe zet ik in excel het getal verkregen door [ =maand(NU()) ] om in bv de maandnaam

    bv: =maand(nu()) geeft als waarde een 1, dan wil ik dat er in die cel bijvoorbeeld Januari komt.
    Een als is geen idee, hier is de lengte beperkt tot misschien een 8 als statements.

    Bedankt op voorhand
    neem een macrootje op en vervang de macro code vervolgens met onderstaande code
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    Function maandnaam(mnd)

    select case mnd
    case 1
       maandnaam="Januari"
    case 2
       maandnaam="februari"

    etc etc

    end select
    End function


    Vervolgens in een excelcel doe je =maandnaam(month(now())) en dan krijg je de naam van de maand
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
      dinsdag 24 juli 2007 @ 16:57:12 #83
    15967 Frollo
    You know I am a righteous man
    pi_51787724
    quote:
    Op dinsdag 24 juli 2007 16:54 schreef Deetch het volgende:

    [..]

    neem een macrootje op en vervang de macro code vervolgens met onderstaande code

    [ code verwijderd ]

    Vervolgens in een excelcel doe je =maandnaam(month(now())) en dan krijg je de naam van de maand
    Ja, of dit:
    quote:
    Op dinsdag 24 juli 2007 16:47 schreef Frollo het volgende:
    Als in C1 nou dat =maand(nu()) staat, dan werkt dit volgens mij wel:

    =TEKST(DATUM(2007;C1;1);"mmmm") (of ..."mmm")
    pi_51787944
    quote:
    Op dinsdag 24 juli 2007 16:57 schreef Frollo het volgende:

    [..]

    Ja, of dit:
    [..]
    veel beter
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
      woensdag 25 juli 2007 @ 09:20:00 #85
    34663 SpeedyGJ
    Zo snel als de bliksem O+
    pi_51808439
    Ik zit met een probleem! Ik ben nou niet een hele ster in Excel maar grootste gedeelte probeer ik zelf op te lossen. Soms lukt het aardig maar nu even niet

    Ik ben zelf een weerrapport aan het maken.

    1.2.3.4.5.6.7.8.9.10.11.12.13.14.15.16.17.18.19.20.21.......31
    Tmin-------------------------------------------------31X hokjes
    Tmax------------------------------------------------31X hokjes
    Gem-------------------------------------------------31X hokjes

    Nu komt het, ik ga dus met gemiddelde waardes werken, opzich niet moeilijk, average aanklikken, hokjes aanwijzen en klaar zou je denken, nee dus. Probleem is dan hij een #DIV/0! fout aangeeft. Nu weet ik niet precies wat dit inhoud, als ik er cijfers in plaats dan is er niks aan de hand, maar zodra ik de vakjes weer leeg gooi krijg ik die fout weer. Is dit op een 1 of andere manier op te lossen? Zodat ik dus gewoon een kaal vakje heb, maar tijdens het invoeren van de temps, dat die gem in werking gaat

    Ik heb zelf weerrapport van iemand anders gedownload, daar is alles oke, echter kan ik het allemaal maar niet ontdekken waar het probleem ligt. Aangezien die persoon nogal wat dingen heeft die ik niet gebruik maak ik dus zelf 1 maar moet het wel werken natuurlijk!
      woensdag 25 juli 2007 @ 09:28:55 #86
    15967 Frollo
    You know I am a righteous man
    pi_51808597
    quote:
    Op woensdag 25 juli 2007 09:20 schreef SpeedyGJ het volgende:

    Nu komt het, ik ga dus met gemiddelde waardes werken, opzich niet moeilijk, average aanklikken, hokjes aanwijzen en klaar zou je denken, nee dus. Probleem is dan hij een #DIV/0! fout aangeeft. Nu weet ik niet precies wat dit inhoud, als ik er cijfers in plaats dan is er niks aan de hand, maar zodra ik de vakjes weer leeg gooi krijg ik die fout weer. Is dit op een 1 of andere manier op te lossen? Zodat ik dus gewoon een kaal vakje heb, maar tijdens het invoeren van de temps, dat die gem in werking gaat
    Dit is volgens mij de meest elegante manier om een deel/0-fout te ondervangen:

    =IF(ERROR.TYPE(AVERAGE(A1:A31)=2),"Geen gegevens",AVERAGE(A1:A31))

    Ervan uitgaande dat de getallen waarvan je het gemiddelde wilt berekenen in A1 t/m A31 staan.
      woensdag 25 juli 2007 @ 09:37:11 #87
    34663 SpeedyGJ
    Zo snel als de bliksem O+
    pi_51808745
    Niet alles in 1 keer, B3 B4 C3 C4 etc. De Tmin en Tmax wordt onderaan berekent in een aparte tabel, op deze manier krijg ik de maand uitslag. Maar het gaat nu voornamelijk om de dagelijkse gemiddelde. Wat moet ik met die zin doen?:@
    pi_51808878
    A1:A31 vervangen door B3:B4 en dan doorkopieren.
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
      woensdag 25 juli 2007 @ 09:47:52 #89
    34663 SpeedyGJ
    Zo snel als de bliksem O+
    pi_51808969
    Gewoon in het vakje zo ja, dan werkt het niet, werk trouwens met excel 2007.
      woensdag 25 juli 2007 @ 10:18:58 #90
    15967 Frollo
    You know I am a righteous man
    pi_51809669
    Nou ja, waar het op neerkomt is dat je overal waar nu

    =AVERAGE(bladibla)

    staat, dit verandert in

    =IF(ERROR.TYPE(AVERAGE(bladibla)=2),"Geen gegevens",AVERAGE(bladibla))
    pi_51809719
    Ik zou ISERROR gebruiken ipv ERROR.TYPE = 2 , zo vang je direct alle foutmeldingen op, al maakt het in dit geval weinig uit (er kan niet veel anders mis gaan hier dan delen door 0).
      woensdag 25 juli 2007 @ 10:25:21 #92
    15967 Frollo
    You know I am a righteous man
    pi_51809835
    quote:
    Op woensdag 25 juli 2007 10:21 schreef DaFan het volgende:
    Ik zou ISERROR gebruiken ipv ERROR.TYPE = 2 , zo vang je direct alle foutmeldingen op, al maakt het in dit geval weinig uit (er kan niet veel anders mis gaan hier dan delen door 0).
    Ja tuurlijk, is ook zo. Maar mijn oplossing kun je in principe nog uitbreiden met routines voor andere soorten fouten (bijvoorbeeld als er letters tussen de getallen staan) en daarom vind ik 'm eleganter.
    pi_51810749
    True, je maakt je er wel makkelijk vanaf op mijn manier
    pi_51811526
    een beetje de kantjes eraf aan het lopen zeg maar
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
      woensdag 25 juli 2007 @ 14:23:50 #95
    85514 ralfie
    !Yvan eht nioj
    pi_51817540
    quote:
    Op dinsdag 24 juli 2007 16:53 schreef DaFan het volgende:
    Hehe Deetch En je vergeet nu je eigen regel die je net hebt gepost. Ik zou het zo proberen:

    Achter max_aantal komt een reeks getallen die aangeven hoe vaak A t/m Z mag voorkomen, gescheiden door komma's, dus 26 keer)
    [ code verwijderd ]

    Ook hier wordt Chr(x) vervangen door A > Z.

    Scheelt een hoop nietwaar
    beter

    en volledig:

    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
        max_aantal = Array(2, 4, 5, 6, 7, 8, 9, 2, 3, 4, 5, 6, 7, 8, 9, 6, 4, 3, 2, 3, 5, 4, 5, 6, 7, 8)
        On Error Resume Next
        For Each cell In Target
            If Intersect(Range("A3:O17"), cell) Is Nothing Then
                MsgBox "dit is buiten het speelveld", vbCritical
                cell.Clear
            ElseIf Len(cell.Value) > 0 Then
                If Asc(cell.Value) > 96 And Asc(cell.Value) < 123 Then cell.Value = Chr(Asc(cell.Value) - 32)
                If Not Len(cell.Value) = 1 or ( Asc(cell.Value) > 64 And Asc(cell.Value) < 91) Then
                    MsgBox "Ongeldige invoer", vbCritical 
                    cell.Clear
                ElseIf WorksheetFunction.CountIf(Range("A3:O17"), cell.Value) > max_aantal(Asc(cell.Value) - 65) Then
                    MsgBox "Maximum voor " & cell.Value & " bereikt", vbCritical
                    cell.Clear
                End If
            End If
        Next cell
    End Sub
    pi_51817677
    Netjes
    pi_51818356
    Hoi, weet iemand of het mogelijk is om te linken (hyperlink) naar een bepaalde cel in een ander werkblad?

    In HTML zou de link er zo uitzien:
    bla.html#51816555

    Dus als je er op klikt moet excel dat andere tabblad openen en meteen naar die bepaalde cel springen...

    *EDIT is al gelukt.. .was simpel

    [ Bericht 6% gewijzigd door FortunaHome op 25-07-2007 15:01:40 ]
      woensdag 25 juli 2007 @ 14:57:20 #98
    34663 SpeedyGJ
    Zo snel als de bliksem O+
    pi_51818697
    quote:
    Op woensdag 25 juli 2007 10:18 schreef Frollo het volgende:
    Nou ja, waar het op neerkomt is dat je overal waar nu

    =AVERAGE(bladibla)

    staat, dit verandert in

    =IF(ERROR.TYPE(AVERAGE(bladibla)=2),"Geen gegevens",AVERAGE(bladibla))
    En dat vertikt die dus.
    pi_51819638
    quote:
    Op woensdag 25 juli 2007 14:57 schreef SpeedyGJ het volgende:

    [..]

    En dat vertikt die dus.
    Heb je NL, andere Office versie...etc.
    Vervang , door ;
    Gebruik Nederlandse termen (zie http://dolf.trieschnigg.nl/excel/excel.html)

    'Dat werkt niet' helpt niet echt bij een oplossing.
      woensdag 25 juli 2007 @ 15:18:45 #100
    15967 Frollo
    You know I am a righteous man
    pi_51819691
    quote:
    Op woensdag 25 juli 2007 14:57 schreef SpeedyGJ het volgende:

    [..]

    En dat vertikt die dus.
    Misschien gebruik je een Engelse Excel onder een Nederlandse Windows? Helpt het als je van de komma's puntkomma's maakt? Dus:

    =IF(ERROR.TYPE(AVERAGE(bladibla)=2);"Geen gegevens";AVERAGE(bladibla))
      woensdag 25 juli 2007 @ 15:24:13 #101
    34663 SpeedyGJ
    Zo snel als de bliksem O+
    pi_51819946
    Ik heb zelf de Engelstalige Office 2007, de , heb ik vervangen door de ; hij pakt em nu wel, echter tijdens het invoeren staat die op N/A
      woensdag 25 juli 2007 @ 18:54:37 #102
    34663 SpeedyGJ
    Zo snel als de bliksem O+
    pi_51827095
    Ik heb even de xls bestand geupload.
    Weerrapport 2007
    Zoals jullie zien, die DIV fout, deze moet dus verborgen zijn
      woensdag 25 juli 2007 @ 19:46:47 #103
    15967 Frollo
    You know I am a righteous man
    pi_51828814
    Ah, Excel 2007, die heb ik niet.
      woensdag 25 juli 2007 @ 19:52:20 #104
    34663 SpeedyGJ
    Zo snel als de bliksem O+
    pi_51829031
    Ah daar heb je het al ik dus wel ik hoop dat iemand een andwoord weet dan kan ik namelijk verder
    pi_51830595
    hi, was vrij aardig met Excel maar heb het inmiddels erg lang niet gebruikt en ben de simpelste dingen kwijt ff opstarten dus

    Kan iemand me op weg helpen met de correcte (NL) formule voor de volgende berekening:

    Van het bedrag in D30 moeten drie bedragen af: het bedrag in D29; het bedrag in C29; en de helft van het bedrag in B29

    alvast bedank
    Jusqu'ici tout va bien...
      woensdag 25 juli 2007 @ 20:45:39 #106
    67978 HenryHill
    Fake it 'till you make it
    pi_51830760
    quote:
    Op woensdag 25 juli 2007 20:40 schreef Manono het volgende:
    hi, was vrij aardig met Excel maar heb het inmiddels erg lang niet gebruikt en ben de simpelste dingen kwijt ff opstarten dus

    Kan iemand me op weg helpen met de correcte (NL) formule voor de volgende berekening:

    Van het bedrag in D30 moeten drie bedragen af: het bedrag in D29; het bedrag in C29; en de helft van het bedrag in B29

    alvast bedank
    Schrijf het eens op als een wiskundige formule met D30, D29, C29 en B29 als variabelen. Hetgeen aan de rechter kant van je '='-teken is je Excel-formule.
    So this is how liberty dies... with thunderous applause.
    Truth? What's so great about the truth? Try lying for a change, it's the currency of the world
    pi_51831356
    In nieuwe cel:
    1=D30-D29-C29-(B29/2)

    Hiervoor maakt de taal dus niks uit :)
    pi_51832970
    quote:
    Op woensdag 25 juli 2007 20:45 schreef HenryHill het volgende:
    Schrijf het eens op als een wiskundige formule met D30, D29, C29 en B29 als variabelen. Hetgeen aan de rechter kant van je '='-teken is je Excel-formule.
    kay!
    quote:
    Op woensdag 25 juli 2007 21:05 schreef DaFan het volgende:
    In nieuwe cel:
    [ code verwijderd ]

    Hiervoor maakt de taal dus niks uit
    Das waar ja thnx anywayz
    btw, nog steeds bara?
    Jusqu'ici tout va bien...
    pi_51835405
    Neh. Vorig jaar nog beetje gespeeld, snelle ronde, redelijk geheerst maar nu weer wat anders. Kijk maar in mn history dan vind je m wel

    Hoop dat je er zo uitkomt
      Moderator donderdag 26 juli 2007 @ 12:43:42 #110
    9859 crew  Karina
    Woman
    pi_51850715
    Hoe kun je in een spreadsheet negatieve getallen verbergen (of niet laten weergeven). Ik heb een spreadsheet met daarin een berekening waarin het aantal dagen tussen 2 datums wordt vermeld. Als 1 datum nog niet is ingevuld dan verschijnt er een negatief getal (dat ik dus niet wil zien).
    Voorbeeld: 10 juli -/- 0 (dus niets ingevuld) geeft -39273.
    Op donderdag 15 mei 2014 22:18 schreef sp3c het volgende:
    niet zo tof doen
      donderdag 26 juli 2007 @ 12:47:21 #111
    15967 Frollo
    You know I am a righteous man
    pi_51850826
    quote:
    Op donderdag 26 juli 2007 12:43 schreef Karina het volgende:
    Hoe kun je in een spreadsheet negatieve getallen verbergen (of niet laten weergeven). Ik heb een spreadsheet met daarin een berekening waarin het aantal dagen tussen 2 datums wordt vermeld. Als 1 datum nog niet is ingevuld dan verschijnt er een negatief getal (dat ik dus niet wil zien).
    Voorbeeld: 10 juli -/- 0 (dus niets ingevuld) geeft -39273.
    Twee manieren:

    1) Met voorwaardelijke opmaak (tekstkleur wit maken indien getal kleiner dan 0).

    2) Of overal waar je nu =datum1-datum2 heb staan, dit veranderen in:

    =ALS(datum1-datum2<0;"";datum1-datum2)
      Moderator donderdag 26 juli 2007 @ 12:56:25 #112
    9859 crew  Karina
    Woman
    pi_51851052
    quote:
    Op donderdag 26 juli 2007 12:47 schreef Frollo het volgende:

    [..]

    Twee manieren:

    1) Met voorwaardelijke opmaak (tekstkleur wit maken indien getal kleiner dan 0).

    2) Of overal waar je nu =datum1-datum2 heb staan, dit veranderen in:

    =ALS(datum1-datum2<0;"";datum1-datum2)
    Ik heb inderdaad de eerste manier gedaan: kwam er net achter dat, dat nog de meest simpele manier was. Beetje een truukje, maar werkt wel.
    Op donderdag 15 mei 2014 22:18 schreef sp3c het volgende:
    niet zo tof doen
      donderdag 26 juli 2007 @ 13:02:04 #113
    15967 Frollo
    You know I am a righteous man
    pi_51851208
    Ach, truukje...
    De mogelijkheid is er niet voor niets!
    pi_51853143
    Letters wit maken is een leuke workaround inderdaad... ik gebruik het heel vaak in sheets die ik maak...:Y
    pi_52445966
    Hallo,

    Ik heb nu allemaal mail adressen onder elkaar staan, dus in in A1 B1 etc.
    Nu wil ik dat ze allemaal in 1 cel komen te staan, gescheiden door een ","

    Is dit mogelijk en zo ja hoe?
      vrijdag 17 augustus 2007 @ 12:53:46 #116
    15967 Frollo
    You know I am a righteous man
    pi_52447873
    Staan ze echt in A1, B1 etc, dus naast elkaar?

    In dat geval zou ik in B2 zetten: =A1&","&B1

    en in C2: =B2&","&C1

    En vervolgens C2 net zo vaak naar rechts slepen als nodig is.

    Het is geen hele nette oplossing, maar je krijgt ermee wat je wilt en daar gaat het om.
    pi_52450089
    quote:
    Op vrijdag 17 augustus 2007 12:53 schreef Frollo het volgende:
    Staan ze echt in A1, B1 etc, dus naast elkaar?

    In dat geval zou ik in B2 zetten: =A1&","&B1

    en in C2: =B2&","&C1

    En vervolgens C2 net zo vaak naar rechts slepen als nodig is.

    Het is geen hele nette oplossing, maar je krijgt ermee wat je wilt en daar gaat het om.
    Nee ze staan ONDER elkaar A1 A2 etc.. sorry
    pi_52450108
    quote:
    Op vrijdag 17 augustus 2007 14:14 schreef FortunaHome het volgende:

    [..]

    Nee ze staan ONDER elkaar A1 A2 etc.. sorry
    En die hele lap tekst moet dan in 1 cel komen dus niet in A1 B1 etc
      vrijdag 17 augustus 2007 @ 14:33:46 #119
    15967 Frollo
    You know I am a righteous man
    pi_52450666
    quote:
    Op vrijdag 17 augustus 2007 14:14 schreef FortunaHome het volgende:

    [..]

    En die hele lap tekst moet dan in 1 cel komen dus niet in A1 B1 etc
    Ja, snap ik.

    Ok, stel dat je adressen in A1, A2 t/m A15 staan, doe dat dit:

    in B1 komt niets
    in B2 komt =A1&","&A2
    in B3 komt =B2&","&A3
    en die laatste, B3 dus, sleep je omlaag naar B4 etc. tot aan B15.

    In elke B-cel komt steeds één adres extra te staan, dus uiteindeljik staan ze in B15 allemaal.
    pi_52477471
    Ik wordt echt helemaal gek van Excel op dit moment. Ik heb al jaren een aantal sjablonen gebruikt voor showbordprijskaarten op mijn werk. Nu is sinds kort een nieuwe PC geinstalleerd en tevens Office 2007 erop gezet. Nu weet ik niet of het daaraan ligt maar sinds kort wordt om iedere pagina die ik print een zwarte dunnen rand meegeprint.
    Ik heb al alles geprobeerd...alle printerinstellingen doorgekeken, alle excel instellingen doorgekeken en op internet gezocht. Niets helpt... De rand is ook NIET zichtbaar in printvoorbeeld en als ik alle randen uitschakel wordt ie nog steeds geprint...! Printer is een HP Deskjet 930C - maar hij heeft het hiervoor dus nooit gedaan!

    Help me! Alvast bedankt!
    pi_52522477
    Zit de rand om de geprinte pagina heen of om elke cel?
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
    pi_52651292


    Mensen hoe maak ik zo'n curve (zie paint skills boven ) in Excel?
    En hoe krijg ik eenheden in de x en y as?
      vrijdag 24 augustus 2007 @ 15:35:40 #123
    73207 phluphy
    Lief vriendje...
    pi_52651670
    Staan de benodigde getallen in een tabel?
    Zo ja, selecteer het betreffende gebied, klik op het icoontje voor grafieken en volg de wizard.
    Paar keer stoeien, goed kijken wat er gebeurt bij kiezen van verschillende mogelijkheden en binnen no time ben je een volleerd statisticus.

    Succes! Je kan het, ik voel het!
    ... ♥ ik mis je ♥
    pi_52731322
    Ik heb een kolom met getallen. Hoe kan ik de hoogste drie celwaarden automatisch celarcering geven? Ik heb al gekeken bij Voorwaardelijke Opmaak, maar heb het niet kunnen vinden.
    Achter-elkaar-bezochte-Ajax-thuiswedstrijden-meter: [b]29[/b].
    [b]Laatste wedstrijd:[/b] FC Timişoara. [b]Volgende:[/b] ADO Den Haag.
    Ray's Statshoekje - 2009/2010.
      maandag 27 augustus 2007 @ 17:32:18 #125
    15967 Frollo
    You know I am a righteous man
    pi_52731505
    quote:
    Op maandag 27 augustus 2007 17:24 schreef RayMania het volgende:
    Ik heb een kolom met getallen. Hoe kan ik de hoogste drie celwaarden automatisch celarcering geven? Ik heb al gekeken bij Voorwaardelijke Opmaak, maar heb het niet kunnen vinden.
    Gesteld dat de kolom bestaat uit A1 t/m A5, geef je A1 deze voorwaardelijke opmaak (kies 'Formule is' in plaats van 'Celwaarde is')

    =RANG(A1;$A$1:A5)<=3

    Let op dat de dollartekentjes moeten kloppen!

    Kopieer daarna de opmaak van A1 naar de overige cellen en voila.
    pi_52731531
    Mooi gedaan
      maandag 27 augustus 2007 @ 17:34:22 #127
    15967 Frollo
    You know I am a righteous man
    pi_52731549
    Thanks.
    pi_52732185
    quote:
    Op maandag 27 augustus 2007 17:32 schreef Frollo het volgende:

    [..]

    Gesteld dat de kolom bestaat uit A1 t/m A5, geef je A1 deze voorwaardelijke opmaak (kies 'Formule is' in plaats van 'Celwaarde is')

    =RANG(A1;$A$1:A5)<=3

    Let op dat de dollartekentjes moeten kloppen!

    Kopieer daarna de opmaak van A1 naar de overige cellen en voila.
    Ik dank u hartelijk .
    Achter-elkaar-bezochte-Ajax-thuiswedstrijden-meter: [b]29[/b].
    [b]Laatste wedstrijd:[/b] FC Timişoara. [b]Volgende:[/b] ADO Den Haag.
    Ray's Statshoekje - 2009/2010.
      dinsdag 28 augustus 2007 @ 21:22:59 #129
    93304 Orealo
    Tsu Tsu Tsunami!!!
    pi_52763898
    Hoi,

    Ik heb een excel bestand, met vragen als volgt (tis voor werk!)

    Wat was je handeling? (keuzelijst: X,Y,Z)
    Aan de hand van de keuze wordt in de volgende cel de nieuwe vraag gesteld.
    =als(a1="x";"Betreft";=als(a1="y";"Hoeveel?";=als(a1="z";"Aantal medewerkers?";"Geen keuze")

    Probleem is de volgende stap.
    Als er X is ingevuld, wil ik in de cel ernaast een keuzelijst, mbv gegevensvalidatie.
    Echter als Y of Z is ingevuld, wil ik dat er een vrije waarde ingevuld kan worden..

    Hoe doe ik dit?
    pi_52852281
    Beste mensen ik heb het volgende probleem

    Ik heb twee kolommen met 'x'en en nu wil ik graag dat hij de 'x'-en telt in 1 kolom als op de zelfde regel in de andere kolom ook een x staat... dus:

    x x
    x x
    x
    x x

    hHier zou dan 3 uit moeten komen...

    Ik heb aantal.als al geprobeerd en zelfs met een zoeken-functie er in maar het lukt niet. wie helpt me?
    pi_52909879
    Als je de eerste kolom kunt vervangen door 1-en dan kun je som.als gebruiken.

    =SOM.ALS(B1:B9;"=x";A1:A9)
    Supra Groningam Nihil
    Postjubilea: 10.000 15.000 20.000 25.000
    Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
    Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
    pi_52913069
    Gelukt! ik heb de x-en veranderd door 1-en. Thanks!
      donderdag 6 september 2007 @ 18:41:19 #133
    85129 dikkedorus
    connaisseur van de wansmaak
    pi_52987710
    quote:
    Op donderdag 6 september 2007 17:11 schreef John_Terry het volgende:
    Hey,
    Ik maak gebruik van een rank-systeem in Excel (functie: Rank) om de competitiestand bij te houden.
    Weet iemand of het mogelijk is om naast de rank de stand van vorige week erbij te zetten zodat je in een oogopslag kunt zien hoeveel plekken een bepaald team is gestegen/gedaald? Zo ja, kan iemand mij helpen Alvast bedankt
    Even hier verder:
    quote:
    Op donderdag 6 september 2007 17:50 schreef John_Terry het volgende:
    bedankt voor de reacties

    kan iemand mij vertellen hoe ik een rank systeem maak
    ik heb 50 teams toegevoegd in mijn sheet, ik wil nu een rank systeem aan de linkerkant (nrs. 1 t/m 50)
    Een voorbeeldje met 11 teams ofzo:
    http://www.xs4all.nl/~vmuijden/rang.xls

    Let op de extra + tekens in de laatste kolom, de opmaak daarvan is "+0;-0;0" (zonder haakjes)
    Mini smilies tool voor alle [sub] en [sup] liefhebbers.
    pi_52990023
    De boekhouder van het bedrijf waar ik werk heeft mij gevraagd om een Excel sheet in elkaar te zetten, waarin hij een bepaalde renteberekening kan maken.

    Op werkblad “Berekening” wil hij de mutaties (Bij EN afboekingen) van een cliënt zetten. Dit zijn max. 20 mutaties per jaar. Bij deze mutaties staat de datum van resp. Bij- en afschrijving vermeld. Op het moment dat het saldo wordt uitgekeerd, wordt ook de rente uitgekeerd. Er moet dus ook een invoerveld bestaan, waarin hij kan aangeven wanneer hij het saldo uitkeert (en dus tot dat moment de rente berekend.) De mutaties staan uitgesplitst in een debetzijde (afschrijvingen) en creditzijde (bijboekingen). Het rentepercentage is voor het hele jaar hetzelfde percentage, maar moet wel aanpasbaar zijn indien er in een jaar een ander percentage wordt berekend. De rente wordt berekend op basis van samengestelde intrest. Daarnaast wordt de rente berekend op basis van 360 dagen per jaar, maar als zou fijn als dat aanpasbaar is.

    Ik heb zelf wat geprobeerd in Excel, maar ik kom er niet uit. Is dit in Excel in elkaar te zetten? Of bestaat hier al een soort sjabloon voor?

    Alvast bedankt!

    Ps ik gebruik Office 2004 (Nederlandstalig)

    [ Bericht 1% gewijzigd door McLaren_Fan op 06-09-2007 22:36:05 ]
      donderdag 6 september 2007 @ 23:00:47 #135
    85129 dikkedorus
    connaisseur van de wansmaak
    pi_52993458
    Ja volgens mij kan het gewoon. Hoe het dan precies moet werken weet ik niet aangezien ik niets van bookhouden weet.
    Mini smilies tool voor alle [sub] en [sup] liefhebbers.
    pi_52994454
    quote:
    Op donderdag 6 september 2007 18:41 schreef dikkedorus het volgende:

    Een voorbeeldje met 11 teams ofzo:
    http://www.xs4all.nl/~vmuijden/rang.xls
    lol @ teamnamen

    ik kan je sheet zeeeeeer goed gebruiken, thanks
      vrijdag 7 september 2007 @ 10:16:24 #137
    85129 dikkedorus
    connaisseur van de wansmaak
    pi_52999624
    Mooi, als je nog mooie opmaak wilt gebruiken, bij opmaak->conditionele opmaak kan je de kleurtjes etc laten afhangen van de waarden. (Bijv de leider een goud kleurtje) door het af te laten hangen van de rank waarde.
    Mini smilies tool voor alle [sub] en [sup] liefhebbers.
    pi_53000664
    quote:
    Op donderdag 6 september 2007 21:02 schreef McLaren_Fan het volgende:
    De boekhouder van het bedrijf waar ik werk heeft mij gevraagd om een Excel sheet in elkaar te zetten, waarin hij een bepaalde renteberekening kan maken.
    Blabla
    Je moet een rentepercentage per dag bepalen. Dat kan je aan de hand van 2 cellen doen, percentage per jaar en het aantal dagen per jaar (omdat je aangeeft dat dat variabel moet kunnen zijn).
    quote:
    Er moet dus ook een invoerveld bestaan, waarin hij kan aangeven wanneer hij het saldo uitkeert (en dus tot dat moment de rente berekend.) De mutaties staan uitgesplitst in een debetzijde (afschrijvingen) en creditzijde (bijboekingen)
    Dit klinkt als een macro. Je kan niet in Excel een cel pas activeren (met formule) als je iets invoert ('als'....'dan'). Je kan wel die formule al ergens anders invoeren (met een vaste uitkomst), en die dan gebruiken als basis voor de volgende berekening. Dagen verschil kan je uitrekenen met TODAY() en de datum van toen.

    Hoop dat je er wat aan hebt.
    pi_53000722
    Vraag.

    Ik heb nu een Excel sheet met 3 kolommen met de namen Bedrijfsnaam, Email1 en Email2. Nu is het de bedoeling dat ik een nieuwsbrief ga versturen via Outlook. Is het mogelijk om deze emails te importeren in Outlook? Gewoon knippen plakken al geprobeerd maar dat werkt niet echt.
    Alle hulp is welkom.
    pi_53000811
    Kopiëren, nieuwe sheet maken, Plakken speciaal, Transpose.
    Dan krijg je ze achter elkaar. Kan je evt nog kolommen tussen voegen met een komma, dan kan je wel plakken in Outlook (of via kladblok, dan moet je de Tabs vervangen door komma's)
    pi_53001186
    Heb nu een lijst van ongeveer 1200 emailadressen, en die staan allemaal onder elkaar. Als ik het op de manier zoals jij doe, zegt die dat hij niet kan plakken omdat de velden niet groot genoeg zijn, bla bla.
    Doe ik het met 5 emailadressen, komen ze allemaal in losse kolommen te staan.

    Wat ik dus wil is het volgende. Ik wil die 1200 emailadressen gewoon kopieren naar Outlook, zodat ik niet zelf bij al die adressen een ; ertussen moet zetten om de mails uit de deur te krijgen. Ik zit ermee te hanussen, maar zo moeilijk zal het toch niet zijn?
    pi_53001320
    1200 is wel echt veel idd, oudere Excel versies kunnen maar tot 255. Daarom kan je niet plakken met Speciaal. Je zou het in 6x kunnen doen maar das ook niet echt handig, vooral als je het vaker moet doen.

    Dat losse kolommen wil je jjuist. Als je die dan knipt/plakt, komen ze met een Tab ertussen in Kladblok te staan. Dan moet je een Tab knippen plakken vanuit de tekst, die invoeren bij Vervangen door, en dan als alternatieve tekst een ; geven.

    Erg omslachtig allemaal, maar hoe je het makkelijker kan doen weet ik niet. Als het maar 1x moet kan het wel, dan is het niet al te lastig om dat een paar keer te doen.
    pi_53001404
    Ok dus als ik goed begrijp doe ik ff een knip/plak actie. Die 6 keer boeit me ook niet. Vervolgens kopieer ik al die kolommen dan in een kladblok bestand, en daarna vervang ik de tab voor een ; teken.
    Ik ga eens proberen.
    pi_53001434
    Je moet die Tab ook knippen en plakken in Vervangen, omdat Kladblok denkt dat je naar het volgende veld wil als je op Tab ramt
    Maar voor de rest zou dat moeten werken ja.
    pi_53001765
    Heb 6 rijen gemaakt door de emailadressen Plakken Speciaal in te voeren.
    En het is me eindelijk gelukt.
    Merci, je hebt me echt geholpen, en ik ben een ervaring rijker.
    pi_53004202
    Ok, alles is nu goed.
    De mails staan in een BCC veld. Maar wat me wel opvalt is dat er sommige emailadressen massale ;;;;;;;;;;;;;;;;;;;;;;;;;; staan. Is dit een probleem? En ook dat hij automatisch sommige emailberichten afsnijd en er een - tussen zet.
    pi_53004229
    LOL, laat maar.
    Is al opgelost, Outlook maakt hier zelf een layout van zie ik. Probleem opgelost, en de mail gaat nu de deur uit.
    pi_53293750
    Ik heb hier 2 Excel documenten. Document nummer 1 heeft in totaal 7 tabbladen, als je op het voorblad een naam ingeeft word deze doorgevoerd in de rest van de tabbladen.

    Nu heb ik nog een ander documents, nu wil ik ervoor zorgen dat als ik daar een naam van bijv. een klant invul die in het andere document overgenomen word.

    Hoe kan ik dit het beste doen? Vert.zoeken?
      woensdag 19 september 2007 @ 10:41:30 #149
    85129 dikkedorus
    connaisseur van de wansmaak
    pi_53294245
    Volgens mij kan dit niet zomaar. Misschien kan je via VB informatie tussen twee openstaande boeken uitwisselen. Ik weet natuurlijk niet precies waar het om gaat, maar volgens mij zit er een ontwerpfout in je systeem, of zou je eigenlijk in Access moeten werken ipv Excel.
    Mini smilies tool voor alle [sub] en [sup] liefhebbers.
    pi_53294836
    Ik heb eerder deze week ook 2 aparte bladen aan elkaar gekoppelt, een blad bevat een prijslijst, de ander het het artikel. Naast het blad met het artikel een aparte kolom gemaakt waar hij automatisch de prijs uit het prijslijst blad haalde. Dit deed ik met de functie vert.zoeken
      woensdag 19 september 2007 @ 12:11:40 #151
    85129 dikkedorus
    connaisseur van de wansmaak
    pi_53296444
    Er is een groot verschil tussen verschillende werkbladen en verschillende documenten.
    Mini smilies tool voor alle [sub] en [sup] liefhebbers.
    abonnement Unibet Coolblue Bitvavo
    Forum Opties
    Forumhop:
    Hop naar:
    (afkorting, bv 'KLB')