[Excel] Het grote Excel vragen topic #20

dinsdag 30 maart 2010 @ 11:32:14 #1

DaFan

dinsdag 30 maart 2010 @ 11:35:08 #2

qu63

..de tijd drinkt..

Een excel oplossing:

quote:
Op dinsdag 30 maart 2010 11:19 schreef DaFan het volgende:

[..]

=SOM((5+(1*RIJ(INDIRECT("1:"&A1)))))
Waarbij A1 = x.
Bevestigen met Ctrl-Shift-Enter.

En een wiskundige oplossing dus!

quote:
Op dinsdag 30 maart 2010 11:26 schreef Gebraden_Wombat het volgende:

[..]

De som die je wilt uitrekenen is

(5+1) + (5+2) + (5+3) + .... + (5+x)

Het handigste is nu om al die "5+" eruit te splitsen en los op te schijven. Je bent x maal 5 aan het optellen, en het resultaat daarvan is 5*x. Je herschrijft je som dan als

(5*x) + (1 + 2 + 3 + ... + x)

Het rechtergedeelte daarvan is bekend als de rekenkundige rij, en de som daarvan is altijd gelijk aan 1/2 * aantal termen * (eerste term + laatste term), in jouw geval 1/2 * x * (1 + x).

De totale som wordt dan

5*x + 1/2 * x * (1 + x),

wat hetzelfde is als de formule van Twentsche_Ros. Benodigdheden: 1 cel voor x en 1 cel als output.

En volgens mij is de wiskundige oplossing makkelijker!

It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]

dinsdag 30 maart 2010 @ 11:41:24 #3

DaFan

Hangt ervanaf of Pheno zn formule heeft vereenvoudigd.

Als jij 6log(x) + cos(x^7) - 4*x moet doen bv...

dinsdag 30 maart 2010 @ 11:56:10 #4

Deetch

WTF?

quote:
Op dinsdag 30 maart 2010 11:41 schreef DaFan het volgende:
Hangt ervanaf of Pheno zn formule heeft vereenvoudigd.

Als jij 6log(x) + cos(x^7) - 4*x moet doen bv...

dan moet ie maar de goeie vraag stellen hoor.

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 30 maart 2010 @ 11:59:46 #5

DaFan

quote:
Op dinsdag 30 maart 2010 11:56 schreef Deetch het volgende:

[..]

dan moet ie maar de goeie vraag stellen hoor.

Mwa ben ik niet helemaal met je eens.
Of er nu 1 'x' in staat of 15, dat maakt verder voor de werking van de formule niet uit toch...

dinsdag 30 maart 2010 @ 12:52:42 #6

Pheno

quote:
Op dinsdag 30 maart 2010 11:56 schreef Deetch het volgende:

[..]

dan moet ie maar de goeie vraag stellen hoor.

Sorry? In het vorige topic was ik volgens mij vrij duidelijk, met screenshotje en wel

Ik kom er nog niet helemala uit met die INDIRECT, maar ik ga wel even verder pielen. Nu telt ie alsnog alleen een rij, dus hij telt de waarden uit de ROW nog niet op. Ik ga gewoon even zoeken

In ieder geval bedankt voor de replies, ik heb weer wat handvatten om verder te werken.

Edit: never mind: CTRL->SHIFT->ENTER. Waarom dat zo moet heb ik nooit begrepen

[ Bericht 9% gewijzigd door Pheno op 30-03-2010 13:15:22 ]

Op dinsdag 21 februari 2012 22:30 schreef JoanFranka het volgende:
PINGUINS RULEREN!! Dat zijn echt een van de grappigste dieren op aarde hahahaa

dinsdag 30 maart 2010 @ 13:14:45 #7

DaFan

Laat maar weten als het niet lukt. Al ben ik de rest van de dag niet aanwezig

dinsdag 30 maart 2010 @ 13:18:36 #8

Pheno

quote:
Op dinsdag 30 maart 2010 13:14 schreef DaFan het volgende:
Laat maar weten als het niet lukt. Al ben ik de rest van de dag niet aanwezig

Met " =+SUM(B1+(C1*ROW(INDIRECT("1:"&A1-1))))+B1 " -> CTRL-SHIFT-ENTER heb ik wat ik wil hebben. Thanks! Voor de gein ga ik de ander ook nog eens proberen, maar nu even niet meer

Op dinsdag 21 februari 2012 22:30 schreef JoanFranka het volgende:
PINGUINS RULEREN!! Dat zijn echt een van de grappigste dieren op aarde hahahaa

dinsdag 30 maart 2010 @ 13:37:16 #9

DaFan

Ctrl-Shift-Enter laat weten aan Excel dat de formule arrays bevat.

dinsdag 30 maart 2010 @ 14:34:14 #10

Deetch

WTF?

quote:
Op dinsdag 30 maart 2010 12:52 schreef Pheno het volgende:

[..]

Sorry? In het vorige topic was ik volgens mij vrij duidelijk, met screenshotje en wel

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 30 maart 2010 @ 14:38:15 #11

Pheno

quote:
Op dinsdag 30 maart 2010 14:34 schreef Deetch het volgende:

[..]

ICT'er, ik weet dat het belangrijk is zoveel mogelijk info te geven

Excel gebruik ik niet zo veel, dus al die functies ken ik niet

Op dinsdag 21 februari 2012 22:30 schreef JoanFranka het volgende:
PINGUINS RULEREN!! Dat zijn echt een van de grappigste dieren op aarde hahahaa

dinsdag 30 maart 2010 @ 14:41:51 #12

Deetch

WTF?

hey psst DaFan, heb je nog een goeie tutorial voor sumproduct?

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

Moderator dinsdag 30 maart 2010 @ 15:19:19 #13

Deisyy

Ik heb nog een vraagje over voorwaardelijke opmaak, want wat te doen als de cel leeg is, dan kleurt alles mee en ik wil de cel dan wel wit houden. Dus welke formule moet ik gebruiken om de lege cel wit te laten zijn?

quote:
Op dinsdag 23 maart 2010 09:44 schreef Twentsche_Ros het volgende:

[..]

Inderdaad voorwaardelijke opmaak:

Voorwaarde 1: opmaak rood als celwaarde kleiner is dan +NU()

Voorwaarde 2: opmaak groen als celwaarde kleiner is dan +nu()+30

Ik ga gaten graven! Want waar gaten zijn is hoop!

dinsdag 30 maart 2010 @ 15:46:48 #14

qu63

..de tijd drinkt..

quote:
Op dinsdag 30 maart 2010 15:19 schreef Deisyy het volgende:
Ik heb nog een vraagje over voorwaardelijke opmaak, want wat te doen als de cel leeg is, dan kleurt alles mee en ik wil de cel dan wel wit houden. Dus welke formule moet ik gebruiken om de lege cel wit te laten zijn?
[..]

Een 3e voorwaarde maken, celwaarde=0 of celwaarde="" dan wit

It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]

Moderator dinsdag 30 maart 2010 @ 15:51:55 #15

Deisyy

quote:
Op dinsdag 30 maart 2010 15:46 schreef qu63 het volgende:

[..]

Een 3e voorwaarde maken, celwaarde=0 of celwaarde="" dan wit

Zo simpel

En bedankt

Ik ga gaten graven! Want waar gaten zijn is hoop!

dinsdag 30 maart 2010 @ 16:48:42 #16

Gitarist

Ondertitel?

Ik heb een vreemd "probleem" met Excel.

In het bedrijf waar ik werk hebben we een Excelbestand met verschillende tabbladen waarop omzet wordt vermeld. Dit bestand wordt wekelijks bijgewerkt en onder een nieuwe bestandsnaam bijgewerkt.
Het bestand is altijd rond de 2,5MB, maar de laatste versie is ineens 22MB! En er zijn alleen maar een paar cellen met cijfertjes gevuld. Dus geen plaatjes of macro's of andere dingen. Ook geen grafieken e.d. alleen maar cellen met data, een aantal verwijzingen en wat opmaak-informatie.

Iemand een idee wat er zoveel geheugen opslokt?

[info]
Excel2003 in de Nederlandse taal

[ Bericht 13% gewijzigd door Gitarist op 30-03-2010 16:50:47 (Aanvulling) ]

me·lo·maan\ (de ~ (m.), -manen)
1 iem. met een overdreven liefde voor muziek

dinsdag 30 maart 2010 @ 17:23:28 #17

DaFan

quote:
Op dinsdag 30 maart 2010 14:41 schreef Deetch het volgende:
hey psst DaFan, heb je nog een goeie tutorial voor sumproduct?

http://www.mrexcel.com/Excel_SumProduct_training.html

dinsdag 30 maart 2010 @ 17:26:46 #18

DaFan

Gitarist sla je m toevallig op als Excel 97 workbook?
Heb je per ongeluk iets in cel IV65536 gezet (of ergens anders in een 'verre' cel)?
Of niet goed gesloten op bepaalde machines; http://www.kbalertz.com/9(...)e-exponentially.aspx

dinsdag 30 maart 2010 @ 21:23:56 #19

Gitarist

Ondertitel?

quote:
Op dinsdag 30 maart 2010 17:26 schreef DaFan het volgende:
Gitarist sla je m toevallig op als Excel 97 workbook?
Heb je per ongeluk iets in cel IV65536 gezet (of ergens anders in een 'verre' cel)?
Of niet goed gesloten op bepaalde machines; http://www.kbalertz.com/9(...)e-exponentially.aspx

Ik zal morgen eens naar verre cellen gaan zoeken.

Maar ik denk dat het eerder met jouw tweede optie te maken heeft; het is namelijk een gedeeld bestand waar collega's ook vaak in kijken (en af en toe muteren).
Morgen weer verder op onderzoek.

Iig bedankt!

me·lo·maan\ (de ~ (m.), -manen)
1 iem. met een overdreven liefde voor muziek

dinsdag 30 maart 2010 @ 23:04:23 #20

WSquater

Oke, mijn vraag: wat is Windows Excel? Maakt het eten met de miljarden euro's die in dit programma zijn gespendeerd?

dinsdag 30 maart 2010 @ 23:20:20 #21

qu63

..de tijd drinkt..

quote:
Op dinsdag 30 maart 2010 23:04 schreef WSquater het volgende:
Oke, mijn vraag: wat is Windows Excel? Maakt het eten met de miljarden euro's die in dit programma zijn gespendeerd?

1) Windows Excel bestaat niet, Microsoft (Office) Excel wel..
2) Waar heb je het over?

It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]

woensdag 31 maart 2010 @ 07:40:29 #22

Twentsche_Ros

TVP

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
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115

= Tijd Voor Periodecijfers
   De stand na 19 topics:
   precies 500 deelnemers tnt



1   DaFan   1115
2   Deetch   565
3   qu63   415
4   Frollo   207
5   Joooo-pi   164
6   sanger   91
7   Stansfield   81
8   Beregd   77
9   Twentsche_Ros   76
10   Metal_Jag   59
11   Holy_Goat   56
12   Hi_flyer   53
13   BierKoning   51
14   Flaccid   50
15   ralfie   50
16   RayMania   48
17   znarch   48
18   ManAtWork   46
19   McGilles   44
20   Stpan   43
21   Thrilled   38
22   Cracka-ass   34
23   hendrik2009   34
24   tequi3   33
25   Jaheur   30
26   realbase   29
27   Cuegirllie   26
28   jakees   26
29   Damzkieee   25
30   henkway   25
31   static   25
32   gurdi   24
33   hooibaal   24
34   Brain23   23
35   EddyAlbena   23
36   Martijn85   23
37   InTrePidIvity   22
38   Folkwin   21
39   mirelia   21
40   kanovinnie   20
41   LennyKravitz   20
42   Piles   20
43   teamlead   19
44   Bill_E   18
45   hoek21   18
46   PietjePuk007   18
47   Arcee   16
48   BuupWerk   16
49   Dr_Flash   16
50   G-Mart   16
51   actuarisje   15
52   Z   15
53   dikkedorus   14
54   FortunaHome   14
55   Freak187   14
56   Maartel   14
57   SpeedyGJ   14
58   VoreG   14
59   beertenderrr   13
60   borisz   13
61   DR34M3R   13
62   dwnick   13
63   elkravo   13
64   hello_moto1992   13
65   Pheno   13
66   Schanulleke   13
67   sobriquet   13
68   wdn   13
69   Wouser   13
70   Wytze   13
71   Brighteyes   12
72   Chandler   12
73   DaviniaHR   12
74   FJD   12
75   its_me_   12
76   Jiveje   12
77   marcb1974   12
78   ReWout   12
79   sylvesterrr   12
80   Dirkh   11
81   drummerdude   11
82   Karina   11
83   HTN02   10
84   lobzorenzo   10
85   Nizno   10
86   ruudtb205   10
87   Summerscreen   10
88   UncleSam   10
89   vogeltjesdans   10
90   wc-eend   10
91   BoNi   9
92   Doodkapje   9
93   Hunky_Dory   9
94   Meeldraad   9
95   mstr   9
96   nicolasvermeersch   9
97   RoaldReurink   9
98   styliste   9
99   Tyrun   9
100   Bart   8
101   Blik   8
102   booonanza   8
103   Meddo   8
104   Puckzzz   8
105   Roeji   8
106   RoodWitBlauw   8
107   SimonVennekens   8
108   swarmahoer   8
109   Varr   8

;)

Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.

woensdag 31 maart 2010 @ 07:52:18 #23

Twentsche_Ros

Bijdrages per weekdag:

Zondag 428
Maandag 913
Dinsdag 978
Woensdag 1158
Donderdag 1108
Vrijdag 828
Zaterdag 305

Bijdrages per uur

uur Totaal
0 77
1 61
2 17
3 12
4 5
5 5
6 12
7 38
8 161
9 372
10 423
11 505
12 490
13 502
14 481
15 482
16 456
17 322
18 216
19 198
20 256
21 260
22 207
23 160
Eindtotaal 5718

[ Bericht 33% gewijzigd door Twentsche_Ros op 31-03-2010 08:19:50 ]

Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.

woensdag 31 maart 2010 @ 07:58:07 #24

Hiddendoe

lastpost

Ik heb een vrij vaag probleem met Excel 2003.
Kan ik dat hier bespreken of juist niet?

Het gaat over de getalnotatie.
Ik zet al mijn financiele bestanden in de duizendtal getalnotatie en als ik een negatief getal heb staat er gewoon een streepje achter.
Zo dus: 12,00-

Nu heb ik sinds kort Windows 7 maar nog steeds MS Office 2003 omdat ik die prettiger vind.
En als ik nu negatieve getallen heb, worden die als volgt genoteerd: (12,00-) en ik vind dat niks.
Hoe kan ik dit verhelpen?

Ik heb zelf al geprobeerd de notatie aan te passen maar dan krijg ik een melding dat deze formule niet geldig is.

Bij voorbaat dank.

[ Bericht 86% gewijzigd door Hiddendoe op 31-03-2010 08:06:04 ]

woensdag 31 maart 2010 @ 08:10:50 #25

DaFan

Ik denk dat het met je landinstellingen te maken heeft.
Ga naar Configuratiescherm - Landinstellingen. Dan op het eerste tabblad naar 'Vermelding die op uw voorkeur aansluit', kies daar Nederlands en dan Aanpassen.
Daar staat je 'Symbool voor negatief getal' en 'Notatie van negatief getal'.

Succes.

Ik heb nog XP trouwens.

woensdag 31 maart 2010 @ 09:37:20 #26

Gitarist

Ondertitel?

quote:
Op dinsdag 30 maart 2010 17:26 schreef DaFan het volgende:
Gitarist sla je m toevallig op als Excel 97 workbook?
Heb je per ongeluk iets in cel IV65536 gezet (of ergens anders in een 'verre' cel)?
Of niet goed gesloten op bepaalde machines; http://www.kbalertz.com/9(...)e-exponentially.aspx

Ik heb de oplossing gevonden; het stond echter niet op de genoemde site, maar lag wel in het verlengde ervan: ik heb de deling van de werkmap ongedaan gemaakt en weer opnieuw ingesteld.

Nu is het bestand 677KB. Dat is wel een heel verschil met de 22MB die het eerst was!

me·lo·maan\ (de ~ (m.), -manen)
1 iem. met een overdreven liefde voor muziek

woensdag 31 maart 2010 @ 11:06:11 #27

Deetch

WTF?

quote:
Op dinsdag 30 maart 2010 23:04 schreef WSquater het volgende:
Oke, mijn vraag: wat is Windows Excel? Maakt het eten met de miljarden euro's die in dit programma zijn gespendeerd?

Drugs are bad m'kay

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 31 maart 2010 @ 11:07:13 #28

Deetch

WTF?

quote:
Op woensdag 31 maart 2010 07:52 schreef Twentsche_Ros het volgende:
geile lijstjes

Woensdag en donderdag zijn dus excel dagen bij uitstek

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 31 maart 2010 @ 12:19:18 #29

Twentsche_Ros

quote:
Op woensdag 31 maart 2010 11:07 schreef Deetch het volgende:

[..]

Woensdag en donderdag zijn dus excel dagen bij uitstek

Wellicht is een verklaring dat iemand aan 't eind van de week een overzicht wil hebben al dan niet in opdracht.
Op maandag en dinsdag probeer je 't eerst zelf te maken.
Op woensdag / donderdag neem je je toevlucht tot FOK.
En dan is op vrijdag het overzicht klaar.

Nog wat feitjes:
Er zijn 1175 dagen verstreken sinds het eerste topic
Er zijn 5718 bijdrages geweest.
4,87 bijdrages per dag
Record is 15-12-2008 met 49 stuks.
80% van de bijdrages worden in 28% van de dagen geleverd.
Ja, ja, 't is maar dat je 't weet.

[ Bericht 21% gewijzigd door Twentsche_Ros op 31-03-2010 12:35:18 ]

Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.

woensdag 31 maart 2010 @ 19:36:13 #30

Bill_E

vijf plus 98!

simpele macro, toch weet ik niet goed hoe ik het aanpak :

Als ik een bepaalde cel heb ( voor het gemak A1 ) en ik klik op die cel moet er eerst een X komen en als ik er nog een keer op klik een V, en als ik er een derde keer op klik een NVT. Ook zou ik graag willen dat de kleur veranderd. X rood V groen NVT zwart.
Waar moet ik op zoeken?

woensdag 31 maart 2010 @ 20:17:11 #31

DaFan

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Application.EnableEvents = False
a = 1
If Not Intersect(Target, Range("A1")) Is Nothing Then

    If Target.Value = "" Then
        Target.Value = "X"
    Else
        If Target.Value = "X" Then
            Target.Value = "V"
        Else
            If Target.Value = "V" Then
                Target.Value = "NVT"
            Else
                If Target.Value = "NVT" Then Target.Value = ""
            End If
        End If
    End If
End If

Application.EnableEvents = True

Je moet wel eerst van cel wisselen anders lukt het niet

De rest met Voorwaardelijke opmaak, zie vorige topic, daar staat een uitleg.

woensdag 31 maart 2010 @ 20:50:43 #32

Bill_E

vijf plus 98!

quote:
Op woensdag 31 maart 2010 20:17 schreef DaFan het volgende:

[ code verwijderd ]

Je moet wel eerst van cel wisselen anders lukt het niet

De rest met Voorwaardelijke opmaak, zie vorige topic, daar staat een uitleg.

Hmm, op zich werkt hij maar als ik tijdens het selecteren van de cel perongeluk een andere cel selecteer loopt het script vast.. het moet noob proof zijn

donderdag 1 april 2010 @ 12:36:22 #33

DaFan

quote:
Op woensdag 31 maart 2010 20:50 schreef Bill_E het volgende:

[..]

Hmm, op zich werkt hij maar als ik tijdens het selecteren van de cel perongeluk een andere cel selecteer loopt het script vast.. het moet noob proof zijn

Mja zo dan

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

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Application.EnableEvents = False

If Not Intersect(Target, Range("A1")) Is Nothing Then
    With Target

    If .Count = 1 Then
    If .Value = "" Then
        .Value = "X"
    Else
        If .Value = "X" Then
            .Value = "V"
        Else
            If .Value = "V" Then
                .Value = "NVT"
            Else
                If .Value = "NVT" Then .Value = ""
            End If
        End If
    End If
    End If

    End With
End If

Application.EnableEvents = True

End Sub

[ Bericht 5% gewijzigd door DaFan op 01-04-2010 12:47:20 (Code opgeschoond.) ]

donderdag 1 april 2010 @ 15:50:06 #34

BANNEKE

Sure we can...

Hey luitjes,

probeer al een paar dagen een VBA code te maken/vinden voor het 'verstoppen' van onbelangrijke regels in mijn excelsheet.

Het gaat om het volgende: ik heb een excelmap met 3 sheets; sheet 1 waar ik aantallen en data van te verzenden stukken invul, sheet 2 met prijzen voor verzending etc, en sheet 3 met de uiteindelijke factuur.
In principe heb ik het 'excel geraamte' klaar, met op sheet 3 een voorgemaakte factuur met alle eventuele opties (snijden/verzenden 24u/48u etc).

Nu zou ik graag achter de VBA coderegel komen om de regels die uiteindelijk 0 terug genereren (bv omdat er niet gesneden hoeft te worden, dus prijs 0 euro) te 'verstoppen', zodat deze niet zichtbaar worden op de geprinte factuur.

Iemand ideeën?
Let me know als je meer info nodig hebt!

Gr.

excel 2003, NL

donderdag 1 april 2010 @ 16:43:46 #35

Deetch

WTF?

in welke kolom staat dan de 0?

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 1 april 2010 @ 17:08:11 #36

Deetch

WTF?

Uitgaande dat de 0 in kolom D staat kun je de volgende code gebruiken om alle regels waarbij in kolom D een nul staat te verberegn

1
2
3
4
5
6
7
8
9
10
11

Sub Fok()
'
    Range("D1").Select
    For i = 1 To 100
    If ActiveCell.Offset(i, 0).Value = 0 Then
        ActiveCell.Offset(i, 0).Rows("1:1").EntireRow.Select
        Selection.EntireRow.Hidden = True
    End If
    Next i

End Sub

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 1 april 2010 @ 18:15:11 #37

ralfie

!Yvan eht nioj

quote:
Op donderdag 1 april 2010 12:36 schreef DaFan het volgende:

[..]

Mja zo dan
[ code verwijderd ]

ipv if else if else gebruik select case

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Application.EnableEvents = False
    If Not Intersect(Target, Range("A1")) Is Nothing And Target.Count = 1 Then
    Select Case Target.Value
        Case ""
            Target.Value = "X"
        Case "x"
            Target.Value = "V"
        Case "v"
            Target.Value = "NVT"
        Case "NVT"
            Target.Value = ""
    End Select
    End If
    Application.EnableEvents = True
End Sub

stukken overzichtelijker

donderdag 1 april 2010 @ 20:05:16 #38

DaFan

Achja

Tijdje niet geprogrammeerd in VBA.
Thanks.

vrijdag 2 april 2010 @ 18:59:48 #39

Bill_E

vijf plus 98!

Ralfie en dafan bedankt!

vrijdag 2 april 2010 @ 21:11:54 #40

icebeer

(heb gewoon laatste excel (.xlsx

) in het NL)
ik ben bezig met een voetbal poule voor het WK, maar daar wil ik naast de uitslagen automatisch een poule stand maken, zodat men kan zien welke 2 teams doorgaan naar de volgende ronde

de uitslag kolom is G & H
dus team A - team B en uitslag is dan G&H

nu heb ik 3 kolommen gemaakt voor winst / gelijk / verlies
dus ik zoek formules voor G > H of G=H of H>G waardoor er een 1 of een 0 moet verschijnen in de winst / gelijk / verlies kolommen

zaterdag 3 april 2010 @ 00:08:51 #41

qu63

..de tijd drinkt..

quote:
Op vrijdag 2 april 2010 21:11 schreef icebeer het volgende:
(heb gewoon laatste excel (.xlsx ) in het NL)
ik ben bezig met een voetbal poule voor het WK, maar daar wil ik naast de uitslagen automatisch een poule stand maken, zodat men kan zien welke 2 teams doorgaan naar de volgende ronde

de uitslag kolom is G & H
dus team A - team B en uitslag is dan G&H

nu heb ik 3 kolommen gemaakt voor winst / gelijk / verlies
dus ik zoek formules voor G > H of G=H of H>G waardoor er een 1 of een 0 moet verschijnen in de winst / gelijk / verlies kolommen

Ken je de ALS()-formule al?

It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]

zaterdag 3 april 2010 @ 12:39:58 #42

icebeer

nee ik weet eigenlijk alleen de standaard dingen van excel

maar als iemand misschien een voorbeeld heeft of een link naar een site met uitleg ga ik wel even puzzelen

zaterdag 3 april 2010 @ 14:34:29 #43

qu63

..de tijd drinkt..

quote:
Op zaterdag 3 april 2010 12:39 schreef icebeer het volgende:
nee ik weet eigenlijk alleen de standaard dingen van excel
maar als iemand misschien een voorbeeld heeft of een link naar een site met uitleg ga ik wel even puzzelen

Ken je google al?

It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]

zaterdag 3 april 2010 @ 18:09:25 #44

Joooo-pi

Do you want a balloon...

Tvp

heitieh

zaterdag 3 april 2010 @ 20:04:24 #45

McGilles

quote:
Op vrijdag 2 april 2010 21:11 schreef icebeer het volgende:
(heb gewoon laatste excel (.xlsx ) in het NL)
ik ben bezig met een voetbal poule voor het WK, maar daar wil ik naast de uitslagen automatisch een poule stand maken, zodat men kan zien welke 2 teams doorgaan naar de volgende ronde

de uitslag kolom is G & H
dus team A - team B en uitslag is dan G&H

nu heb ik 3 kolommen gemaakt voor winst / gelijk / verlies
dus ik zoek formules voor G > H of G=H of H>G waardoor er een 1 of een 0 moet verschijnen in de winst / gelijk / verlies kolommen

=als(g>h;1;0) etc.

zaterdag 3 april 2010 @ 20:28:11 #46

McGilles

quote:
Op donderdag 1 april 2010 17:08 schreef Deetch het volgende:
Uitgaande dat de 0 in kolom D staat kun je de volgende code gebruiken om alle regels waarbij in kolom D een nul staat te verberegn
[ code verwijderd ]

Ik probeer dit ook toe te passen in mijn sheet, maar krijg het niet voor elkaar.

Betreffende kolom = F
Voorwaarde = "In zorg"
Consequentie = hide

Lijkt mij dus puur code aanpassen in:
===============================
Sub Fok()
'
Range("F1").Select
For i = 1 To 1000
If ActiveCell.Offset(i, 0).Value = "In zorg" Then
ActiveCell.Offset(i, 0).Rows("1:1").EntireRow.Select
Selection.EntireRow.Hidden = True
End If
Next i

End Sub
================================
Toch? Wat doe ik fout?

zaterdag 3 april 2010 @ 23:13:27 #47

DaFan

rows(1:1) klopt niet. Hij hide altijd row 1

zondag 4 april 2010 @ 00:26:30 #48

ralfie

!Yvan eht nioj

quote:
Op zaterdag 3 april 2010 20:28 schreef McGilles het volgende:

[..]

Ik probeer dit ook toe te passen in mijn sheet, maar krijg het niet voor elkaar.

Betreffende kolom = F
Voorwaarde = "In zorg"
Consequentie = hide

Lijkt mij dus puur code aanpassen in:
===============================
Sub Fok()
'
Range("F1").Select
For i = 1 To 1000
If ActiveCell.Offset(i, 0).Value = "In zorg" Then
ActiveCell.Offset(i, 0).Rows("1:1").EntireRow.Select
Selection.EntireRow.Hidden = True
End If
Next i

End Sub
================================
Toch? Wat doe ik fout?

akelig lang stukje code om dit te doen:

1
2
3

For Each cell In Range("F1:F1000")
If cell.Value = "In zorg" Then cell.EntireRow.Hidden = True
Next cell

zondag 4 april 2010 @ 02:14:17 #49

anathavia

Ik heb een probleempje met het besturingselement "keuzelijst met invoervak". Bij besturingselement opmaken kan ik bij invoerbereik een bereik aangeven waaruit je met het keuzevak kunt kiezen. Ik wil echter maar een bepaald deel van het bereik (wat aan een bepaalde waarde voldoet) in het keuzevak hebben.

Klinkt volgens mij niet heel duidelijk dus zal ik een voorbeeldje geven.
op werkblad 1 heb ik een lijst staan met verschillende producten. kolom 1 de productnaam en kolom 2 het aantal.
Ik wil vervolgens een keuzelijst maken op werkblad 2 van alle producten op werkblad 1 waarvan er meer dan 3 zijn.

zondag 4 april 2010 @ 10:35:29 #50

DaFan

Iets met OFFSET en COUNTIF...ik heb geen excel in de buurt. Ik zou het met 2 manieren proberen. Of een dynamische named range, of die range in de formule zelf. Geef me paar uur dan zit ik achter de pc :p

Forum Opties
Forumhop:
Hop naar:	(afkorting, bv 'KLB')

» digital corner

» software

» digital corner

» software