DIG Digital Corner
Alles wat je altijd al over computers, hardware, software, internet en elektronische gadgets had willen weten, maar niet op Tweakers.net durft te vragen.
Ik heb in excel twee tabbladen. Blad 1 is gevuld met een lijst op deze manier:
(de nummers zijn uniek, de onderdelen niet)
Nu heb ik op tabblad twee een lijst met alleen de nummers staan:
Hoe kan ik dan de nummers van blad 2 snel/automatisch koppelen aan die van blad 1 zonder dat ik elke keer: =Blad1!A1 etc. in hoef te tikken? Vulgrepen heeft geen zin aangezien ik de witregels niet mee wil nemen. Dit is inmiddels gelukt door toch te vulgrepen en de nullen weg te halen met wat VB
En dan nog iets:
Ik wil de onderdelen in blad 1 eigenlijk koppelen aan de nummers. Zodat ik in blad 2 twee of meer nummers kan vergelijken en dat mij dan verteld wordt hoeveel en welke onderdelen overeenkomen en hoeveel unieke onderdelen ze bevatten.
Uiteindelijk wil ik dan ook nog eens verschillende excel documenten aan elkaar koppelen, maar eerst dit maar eens
Alvast bedankt voor hulp!
[ Bericht 4% gewijzigd door Jesse_ op 21-11-2011 11:54:17 ]
| 1 2 3 4 5 6 7 8 9 | Kolom A Kolom B NUMMER onderdeel1 onderdeel2 onderdeel3 NUMMER onderdeel1 onderdeel2 etc. |
Nu heb ik op tabblad twee een lijst met alleen de nummers staan:
| 1 2 3 4 5 | Kolom A NUMMER NUMMER NUMMER etc |
Hoe kan ik dan de nummers van blad 2 snel/automatisch koppelen aan die van blad 1 zonder dat ik elke keer: =Blad1!A1 etc. in hoef te tikken? Vulgrepen heeft geen zin aangezien ik de witregels niet mee wil nemen. Dit is inmiddels gelukt door toch te vulgrepen en de nullen weg te halen met wat VB
En dan nog iets:
Ik wil de onderdelen in blad 1 eigenlijk koppelen aan de nummers. Zodat ik in blad 2 twee of meer nummers kan vergelijken en dat mij dan verteld wordt hoeveel en welke onderdelen overeenkomen en hoeveel unieke onderdelen ze bevatten.
Uiteindelijk wil ik dan ook nog eens verschillende excel documenten aan elkaar koppelen, maar eerst dit maar eens
Alvast bedankt voor hulp!
[ Bericht 4% gewijzigd door Jesse_ op 21-11-2011 11:54:17 ]
Het is geel en staat in mijn ondertitel!
3DS friend code: 2191-7623-9035
3DS friend code: 2191-7623-9035
Nog een vraagje:
Ik heb dit script gemaakt (uit andere voorbeelden):
De bedoeling is dat dit script kijkt of een vak in kolom B leeg is en als deze niets moet hij de cellen in kolom A naar beneden schuiven.
Ik begin met data die er zo uit ziet:
En als het klaar is moet het dit gemaakt hebben:
Maar het script werkt niet De error die ik krijg is 13 type mis match.
Aangezien dit mijn eerste VBA script is zie ik niet waar het fout gaat en van google word ik ook niet veel wijzer.
Ik heb dit script gemaakt (uit andere voorbeelden):
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | Sub Nummer_uitlijn() Rw = 1 LastRow = 8000 NxtChk: If [ISBLANK(Rw, "B")] Then Rw = Rw + 1 Else Rows(Rw, "A").Select Selection.Insert Shift:=xlDown Rw = Rw + 1 End If If Rw = LastRow Then Exit Sub GoTo NxtChk End Sub |
De bedoeling is dat dit script kijkt of een vak in kolom B leeg is en als deze niets moet hij de cellen in kolom A naar beneden schuiven.
Ik begin met data die er zo uit ziet:
| 1 2 3 4 5 6 7 | Kolom A Kolom B 12 32 A sd A 3 2 B asd |
En als het klaar is moet het dit gemaakt hebben:
| 1 2 3 4 5 6 7 | Kolom A Kolom B 12 A A 32 B sd |
Maar het script werkt niet
De error die ik krijg is 13 type mis match.Aangezien dit mijn eerste VBA script is zie ik niet waar het fout gaat en van google word ik ook niet veel wijzer.
Het is geel en staat in mijn ondertitel!
3DS friend code: 2191-7623-9035
3DS friend code: 2191-7623-9035
Regel 4 is een label en wordt later ook opnieuw aangeroepen. Dat zou moeten werken volgens mij.quote:
Het is geel en staat in mijn ondertitel!
3DS friend code: 2191-7623-9035
3DS friend code: 2191-7623-9035
Het is de enige regel waar iets vergeleken wordt, ik dacht dat dat wel een vereiste was voor error 13. Ik kijk vanavond even.
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | Sub Nummer_uitlijn() Rw = 1 LastRow = 15 NxtChk: If Range("B" & Rw).Value = "" Then Rw = Rw + 1 Else Cells(Rw, 1).Select Selection.Insert Shift:=xlDown Rw = Rw + 2 End If If Rw = LastRow Then Exit Sub GoTo NxtChk End Sub |
Dank je. Met een kleine aanpassing doet het precies wat ik nodig hebquote:
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | Sub Nummer_uitlijn() Rw = 1 LastRow = 100 NxtChk: If Range("B" & Rw).Value = "" Then Rw = Rw + 1 Else Cells(Rw, "A").Select Selection.Insert Shift:=xlDown Rw = Rw + 1 End If If Rw = LastRow Then Exit Sub GoTo NxtChk End Sub |
Nu kan ik mijn data ordenen en dan het belangrijkste, vergelijken.
Wat ik hiervoor wil doen is onderdelen koppelen aan nummers. Dus dat de getallen in kolom A gekoppeld zijn aan die in B.
Dus dat de getallen in A meerdere dingen in B onder zich hebben en ze dan vergelijken op overeenkomstigheid.
Hoe kan ik dit enigszins makkelijk aanpakken?
Het is geel en staat in mijn ondertitel!
3DS friend code: 2191-7623-9035
3DS friend code: 2191-7623-9035
Je moet denk ik even Googlen op VLOOKUP met meerdere resultaten.
Dan kan je kolommen maken waarin je elk nummer neerzet die meerdere resultaten onder elkaar zet, en dan kan je ze vergelijken.
Dan kan je kolommen maken waarin je elk nummer neerzet die meerdere resultaten onder elkaar zet, en dan kan je ze vergelijken.
Ben ik weer eens.....
In tablad 1 worden punten voor een wedstrijd bij elkaar opgeteld. Die komen in tablad 2.
In tablad 2 zet ik in kolom A (beginnende in cel 2) de namen neer die ik uit tablad 1 haal met een =tablad1!A8 code. De punten met dezelfde (maar dan V8 ipv A8). Die komen dan vanaf B2
Nu wil ik graag degene met de meeste punten bovenaan laten komen. Maar ik heb in A1 en B1 al tekst staan die bovenaan moet komen (Cel a1: Deelnemers, Cel a2 punten totaal)
Kan ik dus de 2 rijen zo koppelen oid dat degene met de meeste punten altijd bovenaan staat?
En ben ik zo duidelijk genoeg?
In tablad 1 worden punten voor een wedstrijd bij elkaar opgeteld. Die komen in tablad 2.
In tablad 2 zet ik in kolom A (beginnende in cel 2) de namen neer die ik uit tablad 1 haal met een =tablad1!A8 code. De punten met dezelfde (maar dan V8 ipv A8). Die komen dan vanaf B2
Nu wil ik graag degene met de meeste punten bovenaan laten komen. Maar ik heb in A1 en B1 al tekst staan die bovenaan moet komen (Cel a1: Deelnemers, Cel a2 punten totaal)
Kan ik dus de 2 rijen zo koppelen oid dat degene met de meeste punten altijd bovenaan staat?
En ben ik zo duidelijk genoeg?
Op dinsdag 25 augustus 2015 15:48 schreef Toekito het volgende:
de grootste schande van heel FOK! naast Fylax is Kano als mod.
de grootste schande van heel FOK! naast Fylax is Kano als mod.
Dan moet je je gegevens anders ophalen.
Je haalt eerst het aantal punten op dat het hoogste is
B2=GROOTSTE(V8:V18;RIJ()-1)
(Je doet RIJ()-1 omdat hij dan het rijnummer gebruikt ipv dat je handmatig 1;2;3 etc moet invullen, en dan is hij te slepen).
Vervolgens moet je het bijbehorende team ophalen:
A2=INDEX(A8:A10;VERGELIJKEN(B2;V8:V18;0))
Je moet deze constructie gebruiken omdat je op te zoeken waarde links staat van het puntenaantal (anders had je VERT.ZOEKEN kunnen gebruiken).
Je komt alleen in de soep als er mensen zijn met dezelfde aantal punten - is dat een probleem? Er valt wel omheen te werken maar maakt het allemaal net iets lastiger
Je haalt eerst het aantal punten op dat het hoogste is
B2=GROOTSTE(V8:V18;RIJ()-1)
(Je doet RIJ()-1 omdat hij dan het rijnummer gebruikt ipv dat je handmatig 1;2;3 etc moet invullen, en dan is hij te slepen).
Vervolgens moet je het bijbehorende team ophalen:
A2=INDEX(A8:A10;VERGELIJKEN(B2;V8:V18;0))
Je moet deze constructie gebruiken omdat je op te zoeken waarde links staat van het puntenaantal (anders had je VERT.ZOEKEN kunnen gebruiken).
Je komt alleen in de soep als er mensen zijn met dezelfde aantal punten - is dat een probleem? Er valt wel omheen te werken maar maakt het allemaal net iets lastiger
Het is mogelijk dat er mensen zijn met hetzelfde aantal punten. Krijg je dan 2 keer dezelfde naam erin?quote:Op dinsdag 22 november 2011 22:20 schreef DaFan het volgende:
Dan moet je je gegevens anders ophalen.
Je haalt eerst het aantal punten op dat het hoogste is
B2=GROOTSTE(V8:V18;RIJ()-1)
(Je doet RIJ()-1 omdat hij dan het rijnummer gebruikt ipv dat je handmatig 1;2;3 etc moet invullen, en dan is hij te slepen).
Vervolgens moet je het bijbehorende team ophalen:
A2=INDEX(A8:A10;VERGELIJKEN(B2;V8:V18;0))
Je moet deze constructie gebruiken omdat je op te zoeken waarde links staat van het puntenaantal (anders had je VERT.ZOEKEN kunnen gebruiken).
Je komt alleen in de soep als er mensen zijn met dezelfde aantal punten - is dat een probleem? Er valt wel omheen te werken maar maakt het allemaal net iets lastiger
Op dinsdag 25 augustus 2015 15:48 schreef Toekito het volgende:
de grootste schande van heel FOK! naast Fylax is Kano als mod.
de grootste schande van heel FOK! naast Fylax is Kano als mod.
Zoals zovaak met excel wil ik het te mooi maken denk ik 
Op dinsdag 25 augustus 2015 15:48 schreef Toekito het volgende:
de grootste schande van heel FOK! naast Fylax is Kano als mod.
de grootste schande van heel FOK! naast Fylax is Kano als mod.
Oké ik ben hierheen gestuurd want mn topic mocht niet in GC blijkbaar 
Ik heb dat.
Ik wil graag dit:
of in het mooi:
Iemand een idee hoe ik dat doe?
Ik heb Office 2007 trouwens. Nederlands.
[ Bericht 4% gewijzigd door Doodloper op 23-11-2011 19:58:55 ]
Ik heb dat.
Ik wil graag dit:
of in het mooi:
Iemand een idee hoe ik dat doe?
Ik heb Office 2007 trouwens. Nederlands.
[ Bericht 4% gewijzigd door Doodloper op 23-11-2011 19:58:55 ]
We zullen zien, zei de blinde.
Ik ben heel dicht bij Kanovinnie zn oplossing maar ik heb even een brainfart.
Ik heb
3
3
2
En het resultaat ernaast meot zijn
1 (eerste keer dat het voorkomt)
2 (tweede keer dat het voorkomt)
1 (eerste keer dat het voorkomt)
Iemand?
Ik heb
3
3
2
En het resultaat ernaast meot zijn
1 (eerste keer dat het voorkomt)
2 (tweede keer dat het voorkomt)
1 (eerste keer dat het voorkomt)
Iemand?
Laat maar ik heb hem.
Voorwaarde is wel dat je je bronresultaten (A8:V8 in ieder geval) gesorteerd hebt op score van hoog naar laag.
Ik heb hem nu zo:
Het is wel een lastige.
In A1:B3 staat mijn bron.
In A10:C13 staan mijn resultaten.
(Let op Engelse versie, zelf even vertalen)
A11=
RANK(B1;$B$1:$B$3)
B11=
INDEX($A$1:$A$3;SMALL(IF($B$1:$B$3=C11;ROW($B$1:$B$3));COUNTIF($C$11:C11;C11))-ROW($B$1)+1)
Ctrl-Shift-Enter bij invoegen!
C11=
LARGE($B$1:$B$3;A11)
Succes met vertalen naar je eigen ranges
Voorwaarde is wel dat je je bronresultaten (A8:V8 in ieder geval) gesorteerd hebt op score van hoog naar laag.
Ik heb hem nu zo:
Het is wel een lastige.
In A1:B3 staat mijn bron.
In A10:C13 staan mijn resultaten.
(Let op Engelse versie, zelf even vertalen)
A11=
RANK(B1;$B$1:$B$3)
B11=
INDEX($A$1:$A$3;SMALL(IF($B$1:$B$3=C11;ROW($B$1:$B$3));COUNTIF($C$11:C11;C11))-ROW($B$1)+1)
Ctrl-Shift-Enter bij invoegen!
C11=
LARGE($B$1:$B$3;A11)
Succes met vertalen naar je eigen ranges
Heyquote:Op donderdag 10 november 2011 16:37 schreef Deetch het volgende:
[..]
[..]
Daar heb ik een macro voor die als je twee cellen hebt geselecteerd er een pijl tussen tekent, maar eigenlijk hoort het gewoon in een flowchart (visio of word)
[ code verwijderd ]
das mijn code
er bestaan dacht ik wel een of andere graph enhancer voor excel....quote:
Oké ik ben hierheen gestuurd want mn topic mocht niet in GC blijkbaar
[ afbeelding ]
Ik heb dat.
Ik wil graag dit:
[ afbeelding ]
of in het mooi:
[ afbeelding ]
Iemand een idee hoe ik dat doe?
Ik heb Office 2007 trouwens. Nederlands.
Heb zelf ook een vraagje overigens. Kan ik users beletten sheets te adden of verwijderen in mijn workbook?
http://office.microsoft.c(...)cel-HP005238854.aspxquote:Op woensdag 23 november 2011 21:14 schreef Holy_Goat het volgende:
Heb zelf ook een vraagje overigens. Kan ik users beletten sheets te adden of verwijderen in mijn workbook?
Met Protect workbook - Structure dus
Maar als de bron al gesorteerd is hoef ik het toch verder niet te sorteren?quote:
Laat maar ik heb hem.
Voorwaarde is wel dat je je bronresultaten (A8:V8 in ieder geval) gesorteerd hebt op score van hoog naar laag.
Ik heb hem nu zo:
[ afbeelding ]
Het is wel een lastige.
In A1:B3 staat mijn bron.
In A10:C13 staan mijn resultaten.
(Let op Engelse versie, zelf even vertalen)
A11=
RANK(B1;$B$1:$B$3)
B11=
INDEX($A$1:$A$3;SMALL(IF($B$1:$B$3=C11;ROW($B$1:$B$3));COUNTIF($C$11:C11;C11))-ROW($B$1)+1)
Ctrl-Shift-Enter bij invoegen!
C11=
LARGE($B$1:$B$3;A11)
Succes met vertalen naar je eigen ranges
Ik ga hier morgen met een nuchter hoofd nog eens naar kijken.
Op dinsdag 25 augustus 2015 15:48 schreef Toekito het volgende:
de grootste schande van heel FOK! naast Fylax is Kano als mod.
de grootste schande van heel FOK! naast Fylax is Kano als mod.
...goed punt.quote:
[..]
Maar als de bron al gesorteerd is hoef ik het toch verder niet te sorteren?
Wtf heb ik dan lopen maken.
Je kunt aan je grafiek data labels toevoegen (in je ribbon chart tools, data labels). Daar kies je bij label options de series name.quote:
Oké ik ben hierheen gestuurd want mn topic mocht niet in GC blijkbaar
[ afbeelding ]
Ik heb dat.
Ik wil graag dit:
[ afbeelding ]
of in het mooi:
[ afbeelding ]
Iemand een idee hoe ik dat doe?
Ik heb Office 2007 trouwens. Nederlands.
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
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
Ik gebruik momenteel Excel om een gigantische lijst met titels allemaal van links te voorzien (eerste rij bevat [url=, 2e de URL, 3e ] etc), wat met name handig is omdat ik de titels dan ook nog kan ordenen en niet iedere keer de hele code in hoef te voren.. helaas merk ik dat wanneer ik het naar een browser of wordpad kopieer er een hoop ruimte (tab?) ontstaat tussen iedere kolom.. kennelijk veroorzaakt de overgang van kolom 1 naar 2 een paar spaties, etc..
Is dit op één of andere manier uit te schakelen?
Is dit op één of andere manier uit te schakelen?
Nee,quote:
Ik gebruik momenteel Excel om een gigantische lijst met titels allemaal van links te voorzien (eerste rij bevat [url=, 2e de URL, 3e ] etc), wat met name handig is omdat ik de titels dan ook nog kan ordenen en niet iedere keer de hele code in hoef te voren.. helaas merk ik dat wanneer ik het naar een browser of wordpad kopieer er een hoop ruimte (tab?) ontstaat tussen iedere kolom.. kennelijk veroorzaakt de overgang van kolom 1 naar 2 een paar spaties, etc..
Is dit op één of andere manier uit te schakelen?
wat je wel kan doen is in de volgende kolom dit te zetten:
| 1 | =A1&B1&C1 |
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
[i]What would life be like without rhethorical questions?[/i]
