[EXCEL] Het grote Excel vragen topic, #3

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

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.

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.

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 ?

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.

Nog een vraagje, kun je een Excel sheet 'searchable' maken met een formpje ofzo?

Kan iemand mij vertellen hoe ik die irritante printer lijnen uitzet...

Dus die stippellijntjes die het einde van een pagina aangeven?

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.

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.

SOM.ALS / SUMIF, alstu.

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.

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?

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.

En dan de tekst wit maken van die "hulpcel"

dat zou natuurlijk kunnen, maar het nadeel is dat andere mensen heel handig die hulpcellen gaan gebruiken omdat er immers niets in staat.

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}

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

Je kunt een macrootje maken die de checks voor je uitvoert. Je seletceert een cel en start dan de invulmacro. Even quick and dirty:



[ Bericht 32% gewijzigd door Deetch op 24-07-2007 12:05:28 ]

Hoe kan ik als ik de locatie van een cel heb bepaald met activecell.row en activecell.column later weer terugkeren naar deze cel?

Al gevonden:

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]

je moet nog wel ff het max_aantal per letter aanpassen.

_{oh ja en "langste post ever"}

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


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: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")

quote:

Op dinsdag 24 juli 2007 16:57 schreef Frollo het volgende:

[..]

Ja, of dit:
[..]

veel beter

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!

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.

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?:@

A1:A31 vervangen door B3:B4 en dan doorkopieren.

Gewoon in het vakje zo ja, dan werkt het niet, werk trouwens met excel 2007.

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))

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.

een beetje de kantjes eraf aan het lopen zeg maar

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:

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 ]

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.

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))