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?
Vraag 2 gaat met RANGquote:Op dinsdag 26 juni 2007 13:42 schreef Damzkieee het volgende:
Dus eigenlijk óf vraag 1, óf vraag 2.
1 2 3 4 5 6 7 8 | Range("B1:B18").Select Selection.Sort Key1:=Range("B1"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal End Sub |
Ik gok RANK.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.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?
Gewoon in de kolom met scores gaan staan en op het knopje 'AZ + pijl naar beneden' klikken, dat moet toch gewoon lukken?quote:Op dinsdag 26 juni 2007 14:05 schreef Damzkieee het volgende:
Maar optie 1 is dus onmogelijk zonder Macro?
Dat is logisch. Als je dit hebt: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.
1 2 3 | Jan 28 Klaas 30 |
1 2 3 | Jan 29 Klaas 30 |
Begin jaren 90 wilde ik nog wel eens werken met Harvard Graphics (onder DOSquote:Op dinsdag 26 juni 2007 17:33 schreef TuuT het volgende:
weet iemand een ander programma waar je mooiere grafieken mee kan maken?![]()
Ik heb deze code dus ingevoerd, maar krijg een no name error (wat dat ook moge zijn) en dan zulke tekens ### wat doe ik verkeerdquote: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
Altijd weer dat gezeik met die gelokaliseerde versies.quote:Op woensdag 27 juni 2007 22:55 schreef DaFan het volgende:
Gebruik COUNTA ipv AANTALARG
Het kon nog netquote: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?
Klik er maar eens op.quote:Op donderdag 28 juni 2007 09:33 schreef DaFan het volgende:
Btw, je sig: wordt -> word en huiskamer aan elkaar[/purist]
Mooi he?quote:Op donderdag 28 juni 2007 09:36 schreef DaFan het volgende:
[..]
Oja LOL dat was van die muts[afbeelding]
Ik dacht dat je dit topic zat te F5'en want je bent er altijd zo snel bij, terwijl ik op stage zitquote: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.
Yup hij werkt, thnxquote: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
=ZOEKEN(E1;$B$1:$B$5;$A$1:$A$5)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
Nee, sorry.quote:Op vrijdag 29 juni 2007 13:56 schreef FortunaHome het volgende:
Haha ja ik zie het... maar weet je dit ook ? danku
1 |
Thanks, ik heb het gevonden.quote:Op vrijdag 29 juni 2007 13:59 schreef FortunaHome het volgende:
Ja met conditional formatting:
Ga naar opmaak en dan voorwaardelijke opmaak.
Mja ik heb een lijst met 300+ namen...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.
300 verschillende namen of is de lijst waar je in moet zoeken 300 lang?quote:Op vrijdag 29 juni 2007 14:12 schreef FortunaHome het volgende:
[..]
Mja ik heb een lijst met 300+ namen...
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:quote:
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 hoorquote: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.
Alles selecteren, Data -> Filter -> Advanced -> Filter the list in Place, en vink Unique Records only aan.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 ?
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.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
Het dollarteken voor het cijfer dan natuurlijkquote: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.
1 |
1 |
Als je over VB praat, ja.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?
1 2 3 4 5 | For j = 1 to 65536 Waarde = Range(i & j).Value Next Next |
Het bestand sluiten en weer openen. Het kan vast handiger, maar dit werkt ook.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?
helemaal gelijk, ik had alleen niet door dat dat ook met verschillende klommen kon, thx.quote:
1 |
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 | 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 |
1 2 3 4 | j=rijnummer Range(Chr(i + 64) & j).Value = "test" |
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.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?
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | 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 |
neem een macrootje op en vervang de macro code vervolgens met onderstaande codequote: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
1 2 3 4 5 6 7 8 9 10 11 12 | select case mnd case 1 maandnaam="Januari" case 2 maandnaam="februari" etc etc end select End function |
Ja, of dit: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
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")
veel beterquote:
Dit is volgens mij de meest elegante manier om een deel/0-fout te ondervangen: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![]()
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.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).
beterquote:Op dinsdag 24 juli 2007 16:53 schreef DaFan het volgende:
Hehe DeetchEn 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
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | 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 |
En dat vertikt die dus.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))
Heb je NL, andere Office versie...etc.quote:
Misschien gebruik je een Engelse Excel onder een Nederlandse Windows? Helpt het als je van de komma's puntkomma's maakt? Dus:quote:
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.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 kwijtff 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![]()
kay!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.
Das waar jaquote:Op woensdag 25 juli 2007 21:05 schreef DaFan het volgende:
In nieuwe cel:
[ code verwijderd ]
Hiervoor maakt de taal dus niks uit
Twee manieren: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.
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.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)
Nee ze staan ONDER elkaar A1 A2 etc.. sorryquote: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.
En die hele lap tekst moet dan in 1 cel komen dus niet in A1 B1 etcquote:Op vrijdag 17 augustus 2007 14:14 schreef FortunaHome het volgende:
[..]
Nee ze staan ONDER elkaar A1 A2 etc.. sorry
Ja, snap ik.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
Gesteld dat de kolom bestaat uit A1 t/m A5, geef je A1 deze voorwaardelijke opmaak (kies 'Formule is' in plaats van 'Celwaarde is')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.
Ik dank u hartelijkquote: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.
Even hier verder: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 helpenAlvast bedankt
Een voorbeeldje met 11 teams ofzo: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)
lol @ teamnamenquote:Op donderdag 6 september 2007 18:41 schreef dikkedorus het volgende:
Een voorbeeldje met 11 teams ofzo:
http://www.xs4all.nl/~vmuijden/rang.xls
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: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
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.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)
Forum Opties | |
---|---|
Forumhop: | |
Hop naar: |