abonnement bol.com Unibet Coolblue
  donderdag 10 november 2011 @ 13:57:47 #151
62215 qu63
..de tijd drinkt..
pi_104200751
quote:
0s.gif Op donderdag 10 november 2011 13:50 schreef Mednor het volgende:
hmm die werkbalk tekenen werkt juist niet handig.. en ik ken MS Visio helemaal niet..

Bedankt voor de andere optie van pijl tekenen, maar dat ziet er nogal amateuristisch uit. ik kan me haast niet voorstellen dat je tegelijk een pijl kunt trekken tussen bepaalde cellen. weet iemand hoe dit moet??
Excel is gemaakt om formules en getallen te verwerken, niet om stroomdiagrammen, processen en organogrammen te maken, daar is MS Visio voor.

Excel snapt dus niet dat jij een bedrijfsproces hebt getekend. Enige optie is dus om zelf de werkbalk tekenen er bij te pakken en dan aan de slag te gaan.
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_104201172
Klopt, kan niet, hoort niet, moet niet.. Enfin you get the point.
pi_104203505
that sucks :(

toch bedankt voor de reacties!
pi_104206791
quote:
0s.gif Op donderdag 10 november 2011 12:11 schreef Mednor het volgende:
Ik loop bij excel tegen het volgende aan: ik heb bedrijfsprocessen in kaart gebracht. elk proces is een aparte kolom waarbij elke handeling een cel is. Tussen de handelingen heb ik een rij leeg gelaten.

nu moet op elke lege rij een pijl tussen de cellen komen
[...]
quote:
0s.gif Op donderdag 10 november 2011 14:10 schreef DaFan het volgende:
Klopt, kan welniet, hoort niet, moet niet.. Enfin you get the point.
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)
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
Sub ArrowDraw()
'tekent 2 pijlen tussen 2 geselecteerde cellen.
    Dim Rcell As Range
    Dim RngAryCellsSelectedX(2) As Long
    Dim RngAryCellsSelectedY(2) As Long
    
    Dim DblArrowStartX As Double
    Dim DblArrowStartY As Double
    Dim DblArrowEndX As Double
    Dim DblArrowEndY As Double
    
    Dim i As Long
    
    
    If Selection.Cells.Count <> 2 Then Exit Sub
    
    i = 0
    For Each Rcell In Selection
        i = i + 1
        RngAryCellsSelectedY(i) = Rcell.Row
        RngAryCellsSelectedX(i) = Rcell.Column
        
    Next Rcell
    
    For Each Rcell In Selection
        Rcell.Borders(xlDiagonalDown).LineStyle = xlNone
        Rcell.Borders(xlDiagonalUp).LineStyle = xlNone
        With Rcell.Borders(xlEdgeLeft)
            .LineStyle = xlContinuous
            .Weight = xlThin
            .ColorIndex = xlAutomatic
        End With
        With Rcell.Borders(xlEdgeTop)
            .LineStyle = xlContinuous
            .Weight = xlThin
            .ColorIndex = xlAutomatic
        End With
        With Rcell.Borders(xlEdgeBottom)
            .LineStyle = xlContinuous
            .Weight = xlThin
            .ColorIndex = xlAutomatic
        End With
        With Rcell.Borders(xlEdgeRight)
            .LineStyle = xlContinuous
            .Weight = xlThin
            .ColorIndex = xlAutomatic
        End With
    Next Rcell
    
    
    If Abs(RngAryCellsSelectedX(1) - RngAryCellsSelectedX(2)) >= 2 Then
        
        With ActiveWorkbook.ActiveSheet
            
            If RngAryCellsSelectedX(1) < RngAryCellsSelectedX(2) Then
                
                DblArrowStartX = .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Left + .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Width
                DblArrowStartY = .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Top + .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Height / 2
                DblArrowEndX = .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Left
                DblArrowEndY = .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Top + .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Height / 2
                ActiveSheet.Shapes.AddLine(DblArrowStartX, DblArrowStartY, DblArrowEndX, DblArrowEndY).Select
                Selection.ShapeRange.Line.EndArrowheadStyle = msoArrowheadTriangle
                Selection.ShapeRange.Line.EndArrowheadLength = msoArrowheadLengthMedium
                Selection.ShapeRange.Line.EndArrowheadWidth = msoArrowheadWidthMedium
            
            Else
                
                DblArrowStartX = .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Left + .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Width
                DblArrowStartY = .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Top + .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Height / 2
                DblArrowEndX = .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Left
                DblArrowEndY = .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Top + .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Height / 2
                ActiveSheet.Shapes.AddLine(DblArrowStartX, DblArrowStartY, DblArrowEndX, DblArrowEndY).Select
                Selection.ShapeRange.Line.BeginArrowheadStyle = msoArrowheadTriangle
                Selection.ShapeRange.Line.BeginArrowheadLength = msoArrowheadLengthMedium
                Selection.ShapeRange.Line.BeginArrowheadWidth = msoArrowheadWidthMedium
            
            End If
        
        End With
        
    Else
        
        If Abs(RngAryCellsSelectedY(1) - RngAryCellsSelectedY(2)) < 2 Then Exit Sub
        
        With ActiveWorkbook.ActiveSheet
            
            If RngAryCellsSelectedY(1) < RngAryCellsSelectedY(2) Then
                
                DblArrowStartX = .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Left + .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Width / 2
                DblArrowStartY = .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Top + .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Height
                DblArrowEndX = .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Left + .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Width / 2
                DblArrowEndY = .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Top
                ActiveSheet.Shapes.AddLine(DblArrowStartX, DblArrowStartY, DblArrowEndX, DblArrowEndY).Select
                Selection.ShapeRange.Line.EndArrowheadStyle = msoArrowheadTriangle
                Selection.ShapeRange.Line.EndArrowheadLength = msoArrowheadLengthMedium
                Selection.ShapeRange.Line.EndArrowheadWidth = msoArrowheadWidthMedium
            
            Else
                
                DblArrowStartX = .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Left + .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Width / 2
                DblArrowStartY = .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Top + .Cells(RngAryCellsSelectedY(2), RngAryCellsSelectedX(2)).Height
                DblArrowEndX = .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Left + .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Width / 2
                DblArrowEndY = .Cells(RngAryCellsSelectedY(1), RngAryCellsSelectedX(1)).Top
                ActiveSheet.Shapes.AddLine(DblArrowStartX, DblArrowStartY, DblArrowEndX, DblArrowEndY).Select
                Selection.ShapeRange.Line.BeginArrowheadStyle = msoArrowheadTriangle
                Selection.ShapeRange.Line.BeginArrowheadLength = msoArrowheadLengthMedium
                Selection.ShapeRange.Line.BeginArrowheadWidth = msoArrowheadWidthMedium
            
            End If
        End With
    
    End If
    
End Sub


[ Bericht 0% gewijzigd door Deetch op 11-11-2011 08:58:02 ]
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_104310968
Oke ik werk dus nooit met Excel, vandaar dit stomme vraagje; Ik wil een cijferlijst onderhouden, met in een bepaalde kolom cijfers onder de 5.5 een rode kleur en 5.5 of hoger groen. Iemand enig idee hoe ik dit moet doen? Ik zit bij voorwaardelijke opmaak te kloten maar het lukt niet echt. Iemand die mij dit kan uitleggen?
  zondag 13 november 2011 @ 11:17:51 #156
65252 Bart
Slecht voor de gezondheid
pi_104311032
quote:
0s.gif Op zondag 13 november 2011 11:14 schreef -tape- het volgende:
Oke ik werk dus nooit met Excel, vandaar dit stomme vraagje; Ik wil een cijferlijst onderhouden, met in een bepaalde kolom cijfers onder de 5.5 een rode kleur en 5.5 of hoger groen. Iemand enig idee hoe ik dit moet doen? Ik zit bij voorwaardelijke opmaak te kloten maar het lukt niet echt. Iemand die mij dit kan uitleggen?
Google zoeken naar voorwaardelijke opmaak excel en je zal alles vinden wat je wil weten ;).
I have the cape. I make the fucking Whoosh noise.
Op donderdag 12 juli 2012 19:56 schreef Lithia het volgende:
Ik durf hier niets over te zeggen. Bart is koning hier.
pi_104311544
Top, is gelukt! Wat is Excel toch een aidsprogramma.
pi_104343333
quote:
0s.gif Op zondag 13 november 2011 11:40 schreef -tape- het volgende:
Top, is gelukt! Wat is Excel toch een aidsprogramma.
foei! o|O

Gebrek aan kennis is geen excuus om "de computer" de schuld te geven.
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 16 november 2011 @ 10:57:19 #159
95427 Hephaistos.
¯¯¯¯¯¯¯¯¯¯¯¯¯
pi_104428930
Ik heb een lijst met gegevens, waar ik graag de dubbele (die in zowel kolom A als B voorkomen) met een 1 gemarkeerd wil zien in kolom C.

Dus:

A ------ - B ------ - C

Piet - Sander - 0
Jan - Henk - 1
Kees - Marinus - 0
Kees - Kees - 1
Henk - Piet - 1

Dit moet natuurlijk kunnen, en is waarschijnlijk ook nog supersimpel, maar het lukt me maar niet. Wie kan helpen?
  woensdag 16 november 2011 @ 11:28:10 #160
62215 qu63
..de tijd drinkt..
pi_104429941
quote:
0s.gif Op woensdag 16 november 2011 10:57 schreef Hephaistos. het volgende:
Ik heb een lijst met gegevens, waar ik graag de dubbele (die in zowel kolom A als B voorkomen) met een 1 gemarkeerd wil zien in kolom C.

Dus:

A ------ - B ------ - C

Piet - Sander - 0
Jan - Henk - 1
Kees - Marinus - 0
Kees - Kees - 1
Henk - Piet - 1

Dit moet natuurlijk kunnen, en is waarschijnlijk ook nog supersimpel, maar het lukt me maar niet. Wie kan helpen?
je vraag komt redelijk overeen met deze: [Excel] Het grote Excel vragen topic #28
Die is zo opgeost: [Excel] Het grote Excel vragen topic #28
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  woensdag 16 november 2011 @ 13:58:44 #161
95427 Hephaistos.
¯¯¯¯¯¯¯¯¯¯¯¯¯
pi_104434553
Thanks ^O^
pi_104465026
pivot vraag

Kun je een aantal.als() gebruiken in een pivot?
Heb namelijk een kolom in een data bereik waarin ofwel een 1, 2, 3, 4, 5 of hoger dan 5 staat,
en ik wil in mijn pivot dan ook zien hoeveel enen, tween, etc er zijn :)
  donderdag 17 november 2011 @ 11:12:32 #163
62215 qu63
..de tijd drinkt..
pi_104468474
quote:
0s.gif Op donderdag 17 november 2011 08:48 schreef Holy_Goat het volgende:
pivot vraag

Kun je een aantal.als() gebruiken in een pivot?
Heb namelijk een kolom in een data bereik waarin ofwel een 1, 2, 3, 4, 5 of hoger dan 5 staat,
en ik wil in mijn pivot dan ook zien hoeveel enen, tween, etc er zijn :)
Als in A1:C5 je pivot staat kan je in D1 gewoon aantal.als() zetten.. Of is dat niet wat je bedoelt?
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_104469394
Hej vraagje:

ik heb een vergelijking tussen 2 cellen (A1 en B1) waarbij als ze gelijk zijn "1" als uitkomst/waarde moet komen in een andere cel (C1). Dat lukt, maar ik wil dat als de 2 te vergelijken cellen (A1 en B1) nog leeg zijn (blank) dat de uitkomst in C1 ook blank is. Nu staat er namelijk 1 omdat blank=blank gelijk is. Snap je? Dus:

=IF(A1=B1;"1")

Maar dan wil ik een uitzondering maken als ze leeg zijn. Ik heb iets gelezen met =ISBLANK, maar hoe toe te passen?

Alvast bedankt.
  donderdag 17 november 2011 @ 11:58:14 #165
74976 JDude
groetjes, veldmuis
pi_104469712
IF(AND(ISBLANK(A1);ISBLANK(B1));""; ... en dan de rest van je formule. Zoiets, uit m'n hoofd. Jammer dat ik nog geen Excel heb op deze laptop, anders was ik wel even wat gaan prutsen.
It's always around me, all this noise
But not nearly as loud as the voice saying
"Let it happen, let it happen (It's gonna feel so good)
Just let it happen, let it happen"
  donderdag 17 november 2011 @ 12:09:01 #166
62215 qu63
..de tijd drinkt..
pi_104470036
quote:
7s.gif Op donderdag 17 november 2011 11:58 schreef JDude het volgende:
IF(AND(ISBLANK(A1);ISBLANK(B1));""; ... en dan de rest van je formule. Zoiets, uit m'n hoofd. Jammer dat ik nog geen Excel heb op deze laptop, anders was ik wel even wat gaan prutsen.
Zo werkt ie alleen als A1 én B1 leeg zijn, als je AND vervangt door OR kan een van beide leeg zijn..
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
  donderdag 17 november 2011 @ 12:10:43 #167
74976 JDude
groetjes, veldmuis
pi_104470086
quote:
0s.gif Op donderdag 17 november 2011 12:09 schreef qu63 het volgende:

Zo werkt ie alleen als A1 én B1 leeg zijn, als je AND vervangt door OR kan een van beide leeg zijn..
Maar als één van beide leeg is zijn ze niet gelijk, dus moet de uitkomst toch al 0 zijn :P.
It's always around me, all this noise
But not nearly as loud as the voice saying
"Let it happen, let it happen (It's gonna feel so good)
Just let it happen, let it happen"
  donderdag 17 november 2011 @ 12:14:31 #168
62215 qu63
..de tijd drinkt..
pi_104470206
quote:
6s.gif Op donderdag 17 november 2011 12:10 schreef JDude het volgende:

[..]

Maar als één van beide leeg is zijn ze niet gelijk, dus moet de uitkomst toch al 0 zijn :P.
TRUE

:P
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
pi_104470966
quote:
0s.gif Op donderdag 17 november 2011 11:12 schreef qu63 het volgende:

[..]

Als in A1:C5 je pivot staat kan je in D1 gewoon aantal.als() zetten.. Of is dat niet wat je bedoelt?
uhms... ik heb sheet 1:
kolom A-Z: berg data
kolom AA: getallen tot en met 10

dan in sheet 2 een pivot van kolom A-AA
Daarin wil ik een veld hebben die mij aangeeft hoeveel getallen er 1 zijn in kolom AA,
hoeveel er 2 zijn in kolom AA, ... hoeveel er > 5 zijn in AA
  donderdag 17 november 2011 @ 12:41:19 #170
74976 JDude
groetjes, veldmuis
pi_104471039
Kolom AB vullen met alleen maar 1-tjes. Dan een draaitabel maken van de kolommen AA en AB, waarbij AA op de "y-as" komt te staan en AB wordt geteld.
It's always around me, all this noise
But not nearly as loud as the voice saying
"Let it happen, let it happen (It's gonna feel so good)
Just let it happen, let it happen"
pi_104493148
ik heb nu

IF(AND(ISBLANK(A1);ISBLANK(B1));"";)

dus nu heb ik bij een lege A1 en een lege B1 een waarde 0 in "C1".

Zolang de waarde bij A1 en B1 leeg is, moet waarde C1 ook nul zijn. Als waarde van A1 en B1 gelijk zijn (beide 1 of 2 enz..) dan moet C1 waarde 1 hebben. Dat is nu dus niet het geval.. Hoe vul ik die formule dan aan? :|W
pi_104493311
'Waarde 0' is niet hetzelfde als leeg...
Je krijgt nu een lege cel als A1 en B1 leeg zijn.
Je krijgt 0 omdat je geen nieuwe IF hebt als de eerste IF onwaar is.

Je formule zou volgens mij moeten worden;
=IF(AND(ISBLANK(A1);ISBLANK(B1));0;IF(A1=B1;1;0))
pi_104496564
Thanks so far DaFan!

Wat ik fout deed was dat A1 en B1 hun waardes ook weer uit andere cellen (D1 en D2) halen. A1 haalt zijn waarde uit D1, B1 uit D2. Daarnáááá ga ik pas A1 en B1 vergelijken en gebruik ik jouw formule om 0 of 1 punt toe te kennen. Maar wat moet ik dan bij A1 invoeren? =D1 klopt dus niet want dan krijg ik 0 in A1.

=OR(ISBLANK(D1));0;OR(D1)) werkt natuurlijk ook niet. Ik moet gewoon de waarde van D1 in A1 krijgen tenzij D1 blank is dan A1 blank zijn... t lijkt zo makkelijk
pi_104496804
=IF(ISBLANK(D1);"";D1)
pi_104553989
Na een export van outlook in excel staat er een kolom met telefoon nummers onder het verkeerde label. Deze meot aangepast worden om daarna terug te zetten in outlook. Echter voor alle nummers moet een + teken worden toegevoegd. Hoe krijg ik dit in godsnaam voor elkaar? :'). Bijkomend feit dat een deel van de vakjes in de kolom geen nummer bevatten en dus dienen te worden overgeslagen.

Het zijn 600 contacten dus heb weinig behoefte om dit met de hand te gaan doen. :')

edit: hmm lijkt alsof ik wat heb gevonden dat ikw eer kan knippen en plakken: ="+"&AL3

[ Bericht 6% gewijzigd door jpjedi op 19-11-2011 16:15:47 ]
abonnement bol.com Unibet Coolblue
Forum Opties
Forumhop:
Hop naar:
(afkorting, bv 'KLB')