abonnement Unibet Coolblue Bitvavo
pi_45239396
Het centrale Microsoft Excel topic

Aangezien ik vaker losse topics heb langs zien komen, en zelf heb aangemaakt leek het me handig een centraal
Excel topic te maken waar men hun vragen / antwoorden kwijt kan.
Dus heb je vragen , kom je ergens niet uit, hoe maak ik nu precies die macro stel dan hier je vraag.

Tip : De help functie van excel kan je echt een eind op weg helpen ! (F1)
pi_45239419
Goed TS Start zelf ...

Ik wil graag dat als er in kolom P een bepaalde status staat, dat dan de hele regel een nieuwe kleur krijgt:

A: geel
AF: rood
O: wit (zoals ie nu staat)
P: groen
NA: rood
I: lichtblauw

Ik heb eens gekeken met unconditional formatting maar dat lukte niet echt.
Dit zal toch met een macro moeten dacht ik zo. NU ben ik daar niet echt een ster in.
Iemand een idee?
pi_45239436
Handig topic, heb zelf ook af en toe wat vragen over Excel.
Achter-elkaar-bezochte-Ajax-thuiswedstrijden-meter: [b]29[/b].
[b]Laatste wedstrijd:[/b] FC Timişoara. [b]Volgende:[/b] ADO Den Haag.
Ray's Statshoekje - 2009/2010.
pi_45239477
quote:
Op donderdag 11 januari 2007 09:24 schreef RayMania het volgende:
Handig topic, heb zelf ook af en toe wat vragen over Excel.
/offtopic
tsja .. zat er ineens aan te denken.. die losse topics verzanden vaak ook in weinig en is ook steeds een beetje vervuiling. Kan volgens mij prima in een centraal topic
/offtopic
  donderdag 11 januari 2007 @ 09:29:28 #5
15967 Frollo
You know I am a righteous man
pi_45239539
Volgens mij weet ik best wel iets van Excel (al pwnt Deetch mij dik) en hoop dan ook in dit topic héél veel Fokk!ertjes blij te maken!

[ Bericht 7% gewijzigd door Frollo op 11-01-2007 12:17:03 ]
  donderdag 11 januari 2007 @ 09:31:56 #6
15967 Frollo
You know I am a righteous man
pi_45239571
quote:
Op donderdag 11 januari 2007 09:23 schreef realbase het volgende:
Goed TS Start zelf ...

Ik wil graag dat als er in kolom P een bepaalde status staat, dat dan de hele regel een nieuwe kleur krijgt:

A: geel
AF: rood
O: wit (zoals ie nu staat)
P: groen
NA: rood
I: lichtblauw

Ik heb eens gekeken met unconditional formatting maar dat lukte niet echt.
Dit zal toch met een macro moeten dacht ik zo. NU ben ik daar niet echt een ster in.
Iemand een idee?
Kan best met voorwaardelijke opmaak hoor. Alleen moet je dan bij het opgeven van de voorwaarde niet 'Celwaarde is' maar 'Formule is' opgeven.

Ik zal ff een plaatje maken, brb.
  donderdag 11 januari 2007 @ 09:33:41 #7
93304 Orealo
Tsu Tsu Tsunami!!!
pi_45239595
Goed topic!
Ik zit ook regelmatig vast met excel!
  donderdag 11 januari 2007 @ 09:37:59 #8
15967 Frollo
You know I am a righteous man
pi_45239666
Ik kom op dit:



Dit invullen in (bijvoorbeeld) A1 en dan de opmaak kopiëren naar alle andere cellen die ook van kleur moeten veranderen als in kolom P de tekst "een bepaalde status" staat.
pi_45240096
tvp
pi_45240394
  • Kan ik uit een willekeurige combinatie tekst waar één getal in staat dit geval isoleren en als "number" ergens anders neerfietsen?
  • Kan je alles zo afronden dat het 2 of 3 cijfers significant is? Nu pakt ie alleen het aantal getallen achter de 0...
  •   donderdag 11 januari 2007 @ 10:20:42 #11
    28946 mirelia
    Neehee ik ben geen vrouw!!
    pi_45240525
    strak topic dit
    Shuffle up and deal!!!
    pi_45240651
    Je kunt zo echter maar 3 conditional formats maken en TS heeft er 6 nodig (eigenlijk 5 want AF en NA zijn beide rood.
    Op die manier wordt het toch een macrotje ben ik bang.

    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
    Sub Macro2()
    '
    ' Macro2 Macro
    ' Macro recorded 11-1-2007 by Deetch
    '

    '
    Range("A1").Select
    Do Until ActiveCell.Value = ""
        If ActiveCell.Offset(0, 4).Value = "A" Then
            ActiveCell.EntireRow.Select
            Selection.Font.ColorIndex = 6
            ActiveCell.Offset(1, 0).Select
        ElseIf ActiveCell.Offset(0, 4).Value = "AF" Then
            ActiveCell.EntireRow.Select
            Selection.Font.ColorIndex = 3
            ActiveCell.Offset(1, 0).Select
        ElseIf ActiveCell.Offset(0, 4).Value = "O" Then
            ActiveCell.EntireRow.Select
            Selection.Font.ColorIndex = 2
            ActiveCell.Offset(1, 0).Select
        ElseIf ActiveCell.Offset(0, 4).Value = "P" Then
            ActiveCell.EntireRow.Select
            Selection.Font.ColorIndex = 4
            ActiveCell.Offset(1, 0).Select
        ElseIf ActiveCell.Offset(0, 4).Value = "I" Then
            ActiveCell.EntireRow.Select
            Selection.Font.ColorIndex = 28
            ActiveCell.Offset(1, 0).Select
        ElseIf ActiveCell.Offset(0, 4).Value = "NA" Then
            ActiveCell.EntireRow.Select
            Selection.Font.ColorIndex = 3
            ActiveCell.Offset(1, 0).Select
        Else
            ActiveCell.Offset(1, 0).Select
        End If
    Loop

    End Sub


    Uitleg:
    Do until betekend dat de macro alle regels bij langs gaat zolang de waarde in de active cell (kolom A) niet leeg is.
    activecell is de geactiveerde cel (in eerste instantie A1)
    activecell.offset(0,4) betekend vier kolommen opzij ten opzichte van de actieve cel
    activecell.offset(1,0).select beteknd de cel onder de active cel selecteren (dus volgende cel in kolom A)
    de colorindex is de kleurcode (zie onder)


    [ Bericht 5% gewijzigd door Deetch op 11-01-2007 10:38:39 (code getest) ]
    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 11 januari 2007 @ 10:28:48 #13
    15967 Frollo
    You know I am a righteous man
    pi_45240732
    quote:
    Op donderdag 11 januari 2007 10:25 schreef Deetch het volgende:
    Je kunt zo echter maar 3 conditional formats maken en TS heeft er 6 nodig (eigenlijk 5 want AF en NA zijn beide rood.
    Ooooow, ik dacht dat hij met A, AF, O enz. de kolommen bedoelde waarop de voorwaardelijke opmaak van toepassing was. Maar het zijn dus de verschillende statussen die kolom P kunnen komen?
    pi_45240832
    quote:
    Op donderdag 11 januari 2007 10:28 schreef Frollo het volgende:

    [..]

    Ooooow, ik dacht dat hij met A, AF, O enz. de kolommen bedoelde waarop de voorwaardelijke opmaak van toepassing was. Maar het zijn dus de verschillende statussen die kolom P kunnen komen?
    juist
    "waardes "
    pi_45240945
    Met bovenstaande macro moet het lukken.
    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 11 januari 2007 @ 10:37:56 #16
    15221 Falco
    Afleidingsmanoeuvre
    pi_45240988
    Excel is oke. tvp
    <a href="https://www.youtube.com/watch?v=yIl_jGh-LWE" target="_blank" rel="nofollow">Afleidingsmanoeuvre</a>
    pi_45241140
    quote:
    Op donderdag 11 januari 2007 10:14 schreef Autoreply het volgende:
  • Kan ik uit een willekeurige combinatie tekst waar één getal in staat dit geval isoleren en als "number" ergens anders neerfietsen?
  • Kan je alles zo afronden dat het 2 of 3 cijfers significant is? Nu pakt ie alleen het aantal getallen achter de 0...
  • Jawel dat kan met een macro. Hierin ga je de tekststring karakter voor karakter bij langs en bepaal je of het een integer danwel tekst is. indien getal dan deze onthouden en naar volgende karakter gaan. Als dit ook getal dan het eerste getal vermenigvuldigen met 10 en het tweede getal erbij op tellen. Uiteindelijk strip je zo alle getallen uit de tekststring.
    Ik ga wel ff prutsen, brb

    Afronden op significante cijfers: http://j-walk.com/ss/excel/usertips/tip032.htm
    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_45241269
    goed topic
    pi_45241372
    quote:
    Op donderdag 11 januari 2007 10:44 schreef Deetch het volgende:

    [..]

    Jawel dat kan met een macro. Hierin ga je de tekststring karakter voor karakter bij langs en bepaal je of het een integer danwel tekst is. indien getal dan deze onthouden en naar volgende karakter gaan. Als dit ook getal dan het eerste getal vermenigvuldigen met 10 en het tweede getal erbij op tellen. Uiteindelijk strip je zo alle getallen uit de tekststring.
    Ik ga wel ff prutsen, brb

    Afronden op significante cijfers: http://j-walk.com/ss/excel/usertips/tip032.htm
    Dank, ik ga hier 's ff naar kijken
      donderdag 11 januari 2007 @ 11:03:31 #20
    85514 ralfie
    !Yvan eht nioj
    pi_45241664
    quote:
    Op donderdag 11 januari 2007 10:44 schreef Deetch het volgende:

    [..]

    Jawel dat kan met een macro. Hierin ga je de tekststring karakter voor karakter bij langs en bepaal je of het een integer danwel tekst is. indien getal dan deze onthouden en naar volgende karakter gaan. Als dit ook getal dan het eerste getal vermenigvuldigen met 10 en het tweede getal erbij op tellen. Uiteindelijk strip je zo alle getallen uit de tekststring.
    Ik ga wel ff prutsen, brb

    Afronden op significante cijfers: http://j-walk.com/ss/excel/usertips/tip032.htm
    het lijkt me makkelijker alle cijfers in een andere string te zetten en deze dan te converteren naar integer
    pi_45241877
    Getallen uit tekst filteren macrootje.

    Handleiding:
    Selecteer de cel waarin de te filteren tekst staat.
    Start de macro

    Beschrijving:
    Onderstaande macro verzamelt alle getallen in een tekst achter elkaar en plaatst de getallen naast de geselecteerde cel als tekst (met eventuele voorloopnullen als het eerste getal in de tekst een 0 is) en nog een kolom verder als getal (zonder voorloopnullen)

    Voorbeeld:
    Naast "ri08rt6jdk1678" komt 0861678 en 861678

    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
    Sub getalfilter()

    'by Deetch


    linestring = ActiveCell.Value
    lengthstring = Len(linestring)
    savestring = ""

    For i = 1 To lengthstring
        characterstring = Mid(linestring, i, 1)
        If characterstring = "0" Then
            savestring = savestring + characterstring
        ElseIf characterstring = "1" Then
            savestring = savestring + characterstring
        ElseIf characterstring = "2" Then
            savestring = savestring + characterstring
        ElseIf characterstring = "3" Then
            savestring = savestring + characterstring
        ElseIf characterstring = "4" Then
            savestring = savestring + characterstring
        ElseIf characterstring = "5" Then
            savestring = savestring + characterstring
        ElseIf characterstring = "6" Then
            savestring = savestring + characterstring
        ElseIf characterstring = "7" Then
            savestring = savestring + characterstring
        ElseIf characterstring = "8" Then
            savestring = savestring + characterstring
        ElseIf characterstring = "9" Then
            savestring = savestring + characterstring
        End If
        
    Next i

    ActiveCell.Offset(0, 1).NumberFormat = "@"
    ActiveCell.Offset(0, 1).Value = savestring
    ActiveCell.Offset(0, 2).NumberFormat = "0"
    ActiveCell.Offset(0, 2).Value = savestring

    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 11 januari 2007 @ 11:12:47 #22
    47295 Angel_of_Dth
    Enjoy the silence
    pi_45241927
    quote:
    Op donderdag 11 januari 2007 09:29 schreef Frollo het volgende:
    Volgens mij weet ik best wel iets van Excel en hoop dan ook in dit topic héél veel Fokk!ertjes blij te maken!
    Ik weet niet veel van Excel. Wel genoeg om simpele vragen te beantwoorden. En moeilijke vragen kan ik hier dan mooi kwijt.
    Vows are spoken to be broken
    Feelings are intense, words are trivial
    Pleasures remain, so does the pain
    Words are meaningless and forgettable
      donderdag 11 januari 2007 @ 11:51:15 #23
    23137 Thegeronimo
    Ich bun ut mer....
    pi_45243112
    ik weet dat als in cel c1 dit typt "=a1+b1" dat je dan de som van de getallen in die cellen krijgt, als er getallen instaan anders krijg je #value

    Oftewel TVP, weet ook redelijk wat van Excel
    pi_45243366
    -knip-

    [ Bericht 57% gewijzigd door Ruud op 11-01-2007 12:01:29 (foutje) ]
    pi_45243777
    quote:
    Op donderdag 11 januari 2007 11:11 schreef Deetch het volgende:
    U held
    pi_45245014
    quote:
    Op donderdag 11 januari 2007 12:13 schreef Autoreply het volgende:

    [..]

    U held
    Het lijkt wel vrijdag op me werk en dit soort vraagjes zijn handig om mijn VB skills af en toe te testen.

    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_45246175
    quote:
    Op donderdag 11 januari 2007 10:25 schreef Deetch het volgende:
    Je kunt zo echter maar 3 conditional formats maken en TS heeft er 6 nodig (eigenlijk 5 want AF en NA zijn beide rood.
    Op die manier wordt het toch een macrotje ben ik bang.
    [ code verwijderd ]

    Uitleg:
    Do until betekend dat de macro alle regels bij langs gaat zolang de waarde in de active cell (kolom A) niet leeg is.
    activecell is de geactiveerde cel (in eerste instantie A1)
    activecell.offset(0,4) betekend vier kolommen opzij ten opzichte van de actieve cel
    activecell.offset(1,0).select beteknd de cel onder de active cel selecteren (dus volgende cel in kolom A)
    de colorindex is de kleurcode (zie onder)
    [afbeelding]
    MOet ik nou nog wat aanpassen in die macro? Want zo werktie niet
    ik heb bijv in op line 1 : A1 = naam : B1 = functie C1= klant D1 = datum in dienst etc etc.. en in P geef ik de status weer dmv die codes ( A, AF , NA etc ) als ik dan A intik moet die hele ene regel een kleur krijgen ( zoals ik zei in mn eerste post) Als ik juow macro draai zie ik niets gebeuren
    pi_45246340
    je moet de activecell.offset(0,4) aanpassen naar (0,15) zodat de macro kijkt naar de waarde in kolom P ipv E (zoals de voorbeeld macro).
    Dat had ik ook al uitgelegd bij de uitleg dacht ik, maar misschien was dat niet duidelijk genoeg.

    je moet wel de macro elke keer runnen als je je spreadsheet aanvult en in kolom A mogen geen lege cellen voorkomen tot onder het einde van je data.
    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 11 januari 2007 @ 13:32:17 #29
    28946 mirelia
    Neehee ik ben geen vrouw!!
    pi_45246410
    Iemand een idee hoe ik op een factuur:
    A: automatisch kan doornummeren
    B: maar dan op een speciale manier nl eerste factuur van jan 2007 is dan 0701001 en eerste feb is 0702001 etc
    Of is dit te ingewikkeld?
    Shuffle up and deal!!!
    pi_45246525
    Dat ligt eraan of de nummering van te voren bekend is en constant. Dus als het altijd 10 facturen per maand zijn dan kan dat redelijk eenvoudig. Als het aantal facturen per periode niet contant is wordt het lastig en kun je ze beter gewoon handmatig inkloppen.
    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_45246666
    quote:
    Op donderdag 11 januari 2007 13:30 schreef Deetch het volgende:
    je moet de activecell.offset(0,4) aanpassen naar (0,15) zodat de macro kijkt naar de waarde in kolom P ipv E (zoals de voorbeeld macro).
    Dat had ik ook al uitgelegd bij de uitleg dacht ik, maar misschien was dat niet duidelijk genoeg.

    je moet wel de macro elke keer runnen als je je spreadsheet aanvult en in kolom A mogen geen lege cellen voorkomen tot onder het einde van je data.
    Thnx,

    Kolom A is altijd vol ( met een nummer)
    if ActiveCell.Offset(0, 16).Value = "A" Then
    heb ik er van gemaakt
    ik run hem.. active.cell zie je schieten naar eerste lege cel in kolom A ( regel 15 in mijn geval) dus hij loopt wel maar hij kleurt nie
    pi_45247090
    je moet ok 15 ipv 16 neerzetten. hij kijkt 15 cellen naar rechts gerekend vanaf kolom a. Offset betekend zoiets als verplaatsing en het eerste getal is de regelverplaatsing en het tweede de kolomverplaatsing. 0,0 betekend geen verplaatsing.
    0=A, 1=B, 2=C, 3=D, 4=E, 5=F, 6=G en 15 is dus P
    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_45247279
    oh verrek ik kan niet tellen .. my bad
    het werkt !! thnx
    pi_45247546
    Deetch,

    Als ik ipv de tekst kleur het veld wil laten kleuren? kwestie van aanpassing van de kleurcode ?
    pi_45249045
    je moet de code
    1Selection.Font.ColorIndex = 6


    vervangen door
    1
    2
    3
    4
    With Selection.Interior
    .ColorIndex = 6
    .Pattern = xlSolid
    End With


    de colorindexwaarde is alleen voor de kleur zelf
    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 11 januari 2007 @ 15:47:17 #36
    28946 mirelia
    Neehee ik ben geen vrouw!!
    pi_45251615
    quote:
    Op donderdag 11 januari 2007 13:36 schreef Deetch het volgende:
    Dat ligt eraan of de nummering van te voren bekend is en constant. Dus als het altijd 10 facturen per maand zijn dan kan dat redelijk eenvoudig. Als het aantal facturen per periode niet contant is wordt het lastig en kun je ze beter gewoon handmatig inkloppen.
    Nee dit varieert dus blijft handmatig
    Jammer maar bedankt
    Shuffle up and deal!!!
    pi_45252115
    quote:
    Op donderdag 11 januari 2007 15:47 schreef mirelia het volgende:

    [..]

    Nee dit varieert dus blijft handmatig
    Jammer maar bedankt
    Dat denk ik wel, met database programma's ben je iets flexibeler in dit soort zaken maar daar weet ik niet zoveel van af.
    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_45256425
    quote:
    Op donderdag 11 januari 2007 13:32 schreef mirelia het volgende:
    Iemand een idee hoe ik op een factuur:
    A: automatisch kan doornummeren
    B: maar dan op een speciale manier nl eerste factuur van jan 2007 is dan 0701001 en eerste feb is 0702001 etc
    Of is dit te ingewikkeld?
    Ik denk wel dat dit kan, er van uitgaande dat je in dezelfde regel als het factuurnummer ook wel ergens de datum van de factuur hebt staan en dat ze in chronologische volgorde staan.
    Ik ben even knutselen, momentje.
    Brutalen hebben de halve wereld; doe mij die andere helft dan maar
      donderdag 11 januari 2007 @ 17:55:30 #39
    28946 mirelia
    Neehee ik ben geen vrouw!!
    pi_45256484
    De datum staat eronder......die gaat overigens wel automatisch
    Shuffle up and deal!!!
    pi_45256853
    OK, erg charmant is ie niet, maar onder de voorwaarde dat er iedere maand tenminste 1 factuur verwerkt wordt, doet ie het wel.

    Als de datum in kolom A staat, en het toe te wijzen factuurnr. ernaast in kolom B, dan kun je de onderstaande formule gebruiken.

    =ALS(MAAND(A2)=MAAND(A1);B1+1;ALS(MAAND(A1)=12;(GEHEEL(B1/1000)+89)*1000+1;(GEHEEL(B1/1000)+1)*1000+1))

    screenshotje
    Brutalen hebben de halve wereld; doe mij die andere helft dan maar
      donderdag 11 januari 2007 @ 18:23:14 #41
    28946 mirelia
    Neehee ik ben geen vrouw!!
    pi_45257295
    Er word elke maand wel een factuur gemaakt maar ik bedoelde het toch anders denk ik
    Ik bedoelde de factuurnummers OP de factuur
    Dus stel dat de datum in cel G14 staat en het factuurnummer in cel F14, hoe zou de formule dan zijn?
    en zou het wel werken zo??
    Shuffle up and deal!!!
    pi_45257580
    quote:
    Op donderdag 11 januari 2007 18:23 schreef mirelia het volgende:
    Er word elke maand wel een factuur gemaakt maar ik bedoelde het toch anders denk ik
    Ik bedoelde de factuurnummers OP de factuur
    Dus stel dat de datum in cel G14 staat en het factuurnummer in cel F14, hoe zou de formule dan zijn?
    en zou het wel werken zo??
    Alleen als er een referentie is naar het nummer van de voorgaande factuur. Excel is niet in staat om zelf te verzinnen de hoveelste factuur van de maand het is.
    Brutalen hebben de halve wereld; doe mij die andere helft dan maar
    pi_45257625
    handig zo'n topic (tvp)
    Wie heeft gezegd dat de liefde blind is? Zij is de enige die scherp ziet: zij ontdekt schoonheden waar anderen niets merken.
      donderdag 11 januari 2007 @ 19:00:45 #44
    28946 mirelia
    Neehee ik ben geen vrouw!!
    pi_45258668
    quote:
    Op donderdag 11 januari 2007 18:32 schreef hooibaal het volgende:

    [..]

    Alleen als er een referentie is naar het nummer van de voorgaande factuur. Excel is niet in staat om zelf te verzinnen de hoveelste factuur van de maand het is.
    Ja en dat word waarschijnlijk moeilijk
    Shuffle up and deal!!!
    pi_45275432
    goh.. al jaren op fok.. en pas mn eerste nuttige topic
    pi_45276400
    quote:
    Op donderdag 11 januari 2007 18:23 schreef mirelia het volgende:
    Er word elke maand wel een factuur gemaakt maar ik bedoelde het toch anders denk ik
    Ik bedoelde de factuurnummers OP de factuur
    Dus stel dat de datum in cel G14 staat en het factuurnummer in cel F14, hoe zou de formule dan zijn?
    en zou het wel werken zo??
    nieuwe kolom met volgende formule maken. uitgegaan van cel G1 als datum en cel F1 als factuurnummer

    =RIGHT(YEAR(G1);2)&IF(MONTH(G1)<10;0;"")&MONTH(G1)&IF(F1<10;"00";(IF(F1<100;"0";"")))&F1

    of in nederlands

    =RECHTS(JAAR(G1);2)&ALS(MAAND(G1)<10;0;"")&MAAND(G1)&ALS(F1<10;"00";(ALS(F1<100;"0";"")))&F1
    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_45278362
    quote:
    Op vrijdag 12 januari 2007 08:50 schreef realbase het volgende:
    goh.. al jaren op fok.. en pas mn eerste nuttige topic
    Het is de leeftijd moet je maar denken
    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
      vrijdag 12 januari 2007 @ 11:11:05 #48
    80690 hooibaal
    Be prepared.
    pi_45278390
    quote:
    Op vrijdag 12 januari 2007 09:46 schreef Deetch het volgende:

    [..]

    nieuwe kolom met volgende formule maken. uitgegaan van cel G1 als datum en cel F1 als factuurnummer

    =RIGHT(YEAR(G1);2)&IF(MONTH(G1)<10;0;"")&MONTH(G1)&IF(F1<10;"00";(IF(F1<100;"0";"")))&F1

    of in nederlands

    =RECHTS(JAAR(G1);2)&ALS(MAAND(G1)<10;0;"")&MAAND(G1)&ALS(F1<10;"00";(ALS(F1<100;"0";"")))&F1
    =100000*REST(JAAR(G1)/100)+1000*MAAND(G1)+F1

    Is korter en vermijd het 'trage' gebruik van ALS-lussen.

    De vraag is, hoe kom je aan de informatie uit F1, 'de hoeveelste factuur van de maand' dus, en die zul je vermoedelijk toch handmatig moeten invoeren...
    Brutalen hebben de halve wereld; doe mij die andere helft dan maar
    pi_45281341
    mn excel kennis gaat niet verder dan sum, dus daarom tvp
    pi_45281483
    elegante oplossing, je mist alleen de voorloopnul als het jaar onder 2010 is. Toch nog een ALS statement nodig hiervoor.

    =ALS(REST(JAAR(G1);100)<10;"0"&100000*REST(JAAR(G1)/100)+1000*MAAND(G1)+F1;100000*REST(JAAR(G1)/100)+1000*MAAND(G1)+F1)
    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
      vrijdag 12 januari 2007 @ 13:02:18 #51
    80690 hooibaal
    Be prepared.
    pi_45281737
    quote:
    Op vrijdag 12 januari 2007 12:55 schreef Deetch het volgende:
    elegante oplossing, je mist alleen de voorloopnul als het jaar onder 2010 is. Toch nog een ALS statement nodig hiervoor.

    =ALS(REST(JAAR(G1);100)<10;"0"&100000*REST(JAAR(G1)/100)+1000*MAAND(G1)+F1;100000*REST(JAAR(G1)/100)+1000*MAAND(G1)+F1)
    Niet nodig. Dit kun je opvangen door de celeigenschappen aan te passen (zie het screenshot eerder in dit topic)

    Kies Celeigenschappen, aangepast en vul in '0000000'. Dan maakt ie van het getal in de cel automatisch een getal van 7 cijfers. '1' ziet er dan uit als 0000001, en 701001 (eerste nota van 2007) als 0701001.
    Brutalen hebben de halve wereld; doe mij die andere helft dan maar
      vrijdag 12 januari 2007 @ 14:35:30 #52
    28946 mirelia
    Neehee ik ben geen vrouw!!
    pi_45285186
    Nou ik krijg het met beide formules niet voor elkaar heren
    Maar dat zal aan mij liggen
    Ik heb het stukje uit de factuur waar het om gaat even in een leeg blad gepasted omdat ik niet al mijn bedrijfsgegevens op inet wil gooien
    Het is een heel compleet systeem namelijk
    Test staat hier:
    www.xs4all.nl/~mirelia/test2.xls

    [ Bericht 4% gewijzigd door mirelia op 12-01-2007 14:40:58 ]
    Shuffle up and deal!!!
      vrijdag 12 januari 2007 @ 14:58:41 #53
    80690 hooibaal
    Be prepared.
    pi_45286071
    Ja, ik vermoedde inmiddels wel dat het zoiets ging worden.
    Ik denk dat je het beste de factuurnummers handmatig kunt intikken. Wil je dat toch écht niet, dan zul je aan je formulier een cel moeten toevoegen waarin je het nummer van de factuur in die maand intypt. Iets handmatig intypen zul je dus toch moeten doen, vrees ik, of je moet e.e.a. wel heel grondig in de steigers gaan zetten.

    Stel dat je in cel Q37 het bewuste nummer gaat zetten, dan moet je in cel J1 intikken:
    =100000*REST(JAAR(J2)/100)+1000*MAAND(J2)+$Q$37.

    Maar het biedt weinig voordeel, lijkt me.
    En aangezien je de datum van de factuur óók door Excel laat genereren d.m.v. =NU() heb je een probleem als je je factuur opslaat en de volgende dag weer opent (of erger: doormailt aan je klant, die het zootje eens per maand verwerkt). Je zult zien dat dan niet alleen de datum van de factuur is veranderd (wat ook al nooit de bedoeling kan zijn, lijkt me...) maar met een beetje pech ook nog eens het factuurnummer!!
    Brutalen hebben de halve wereld; doe mij die andere helft dan maar
      vrijdag 12 januari 2007 @ 15:07:33 #54
    28946 mirelia
    Neehee ik ben geen vrouw!!
    pi_45286449
    Het was voor mij geen probleem om het handmatig in te tikken hoor
    Alleen nu moet ik naar een apart tabje waar mijn facturen staan voor de rest van de boekhouding en daar kijken wat het laatste nummer was.
    Kijk het is 5 sec werk hoor maar ik dacht als het makkelijker kan dan is het leuk
    Wij maken van een factuur altijd een PDF en die word bewaard en geprint en evt gemailed
    Dan kan er niets met ons systeem fout gaan

    Maar evengoed beiden bedankt voor de hulp
    Shuffle up and deal!!!
    pi_45314936
    ik ben ook van de partij
      zondag 14 januari 2007 @ 14:36:39 #56
    129106 Chav
    Oi Oi Oi !!!
    pi_45342514
    Beste mensen,

    Ik had hier: [Excel] HELP, hoe zet ik dit in VB? een topic geopend, kan iemand mij hiermee helpen?
    In me Burberry......
    pi_45343535
    Er zijn erg veel mogelijkheden om het op te lossen. Voornamelijk omdat je niet precies aangeeft hoe je het wil invullen. Wil je dat er een serie schermpjes door je scherm heen vliegen (Msgbox of Inputbox) of wil je gewoon een aantal cellen invullen en dat hij daarna naar de juiste locatie wordt gekopieerd.

    Ik ben zelf een voorstander van dat tweede, omdat je dan ook nog allerlei andere excel trucjes kan gebruiken zoals validatielijsten e.d. Om duidelijk te krijgen wat je wil heb ik een voorbeeldje gemaakt: www.snirc.nl/extra/voorbeeld-fok1.xls
      zondag 14 januari 2007 @ 15:36:04 #58
    136730 PiRANiA
    All thinking men are atheists.
    pi_45344245
    Hoe zorg ik er voor dat in Excel de getallen die ik typ altijd 3 tekens hebben?

    voorbeeld:
    01
    02
    03
    ==
    14
    15

    etc...
      zondag 14 januari 2007 @ 15:38:34 #59
    28946 mirelia
    Neehee ik ben geen vrouw!!
    pi_45344335
    Zijn dat er geen 2??
    Volgens mij doe je dat met getal-> aangepast--> 000
    Maar ik ben ook een redelijke leek
    Shuffle up and deal!!!
      zondag 14 januari 2007 @ 15:41:02 #60
    15967 Frollo
    You know I am a righteous man
    pi_45344420
    Ik te
    quote:
    Op zondag 14 januari 2007 15:36 schreef PiRANiA het volgende:
    Hoe zorg ik er voor dat in Excel de getallen die ik typ altijd 3 tekens hebben?

    voorbeeld:
    01
    02
    03
    ==
    14
    15

    etc...
    Een aangepaste getalnotatie maken met het aantal cijfers dat je wilt, bijvoorbeeld '00' of '000'.
      zondag 14 januari 2007 @ 16:00:03 #61
    129106 Chav
    Oi Oi Oi !!!
    pi_45345135
    Het moet zo worden:



    De witte vlakken die ik gemaakt heb, daar moet de tekst staan die in het andere topic staan.
    In me Burberry......
    pi_45345980
    Kun je een Excel-bestand in zijn geheel invoegen in een Word-bestand? Het lukte mij alleen maar door het kopiëren van tabellen, maar ik wilde eigenlijk alle tabellen tegelijk als een soort 'plaatje' invoegen in een Word-bestand.
      FOK!-Schrikkelbaas zondag 14 januari 2007 @ 17:20:47 #63
    862 Arcee
    Look closer
    pi_45348063
    quote:
    Op zondag 14 januari 2007 15:36 schreef PiRANiA het volgende:
    Hoe zorg ik er voor dat in Excel de getallen die ik typ altijd 3 tekens hebben?

    voorbeeld:
    01
    02
    03
    ==
    14
    15

    etc...
    http://www.accountingweb.nl/cgi-bin/item.cgi?id=84613&d=101
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      zondag 14 januari 2007 @ 18:54:39 #64
    136730 PiRANiA
    All thinking men are atheists.
    pi_45350905
    Dan een tweede vraag:

    Getallen lager dan zes, wil ik rood hebben, hoe doe ik dat?

    -edit- Het zal ongeveer zo iets zijn:
    ¤ #.##0,00_-;¤ #.##0,00-

    maar dan zonder eurotekens, en bij waarden lager dan zes, niet bij lager dan 0
      zondag 14 januari 2007 @ 19:04:14 #65
    80382 manny
    30 is best veel
    pi_45351228
    quote:
    Op zondag 14 januari 2007 16:23 schreef Isegrim het volgende:
    Kun je een Excel-bestand in zijn geheel invoegen in een Word-bestand? Het lukte mij alleen maar door het kopiëren van tabellen, maar ik wilde eigenlijk alle tabellen tegelijk als een soort 'plaatje' invoegen in een Word-bestand.
    das toch gewoon "plakken speciaal" in Word en dan "als figuur", of bedoel je meerdere tabbladen ?
    proberen is de eerste stap naar falen
    een cafe zonder Hazes, is geen kroeg
      zondag 14 januari 2007 @ 19:09:30 #66
    85514 ralfie
    !Yvan eht nioj
    pi_45351395
    quote:
    Op zondag 14 januari 2007 18:54 schreef PiRANiA het volgende:
    Dan een tweede vraag:

    Getallen lager dan zes, wil ik rood hebben, hoe doe ik dat?

    -edit- Het zal ongeveer zo iets zijn:
    ¤ #.##0,00_-;¤ #.##0,00-

    maar dan zonder eurotekens, en bij waarden lager dan zes, niet bij lager dan 0
    menu opmaak->voorwaardelijke opmaak

    gebruik wijst zichzelf
      zondag 14 januari 2007 @ 19:12:16 #67
    136730 PiRANiA
    All thinking men are atheists.
    pi_45351494
    quote:
    Op zondag 14 januari 2007 19:09 schreef ralfie het volgende:

    [..]

    menu opmaak->voorwaardelijke opmaak

    gebruik wijst zichzelf
    Gelukt
    pi_45358250
    quote:
    Op zondag 14 januari 2007 19:04 schreef manny het volgende:

    [..]

    das toch gewoon "plakken speciaal" in Word en dan "als figuur", of bedoel je meerdere tabbladen ?
    Nee, gewoon 1 tabblad, maar ik was aan het klooien met 'Insert - File'. Maar dit zal het wel zijn dan, bedankt.
    pi_45364270
    quote:
    Op zondag 14 januari 2007 16:00 schreef Chav het volgende:
    Het moet zo worden:

    [afbeelding]

    De witte vlakken die ik gemaakt heb, daar moet de tekst staan die in het andere topic staan.
    In visual basic editor naar het formulier gaan en dan view object. Vervolgens kun je de naam van het tekstvak lezen (rechts klikken op tekstvak en dan properties).

    Stel dat je formulier "formulier" heet en het tekstlabel heet "label" dan kun je (als ik het mij goed herinner) de tekst uit een cel als volgt aan dat label koppelen:

    formulier.label.caption = verwijzing naar cel of variabele waarin de celwaarde al is opgeslagen
    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
      maandag 15 januari 2007 @ 16:19:46 #70
    129106 Chav
    Oi Oi Oi !!!
    pi_45375620
    Ik ken de formules gewoon echt niet, het is allemaal hokus pokus voor me.
    In me Burberry......
    pi_45377136
    Ik neem aan dat je wel al de macro hebt voor het laten verschijnen van het formulier aangezien je al een print screen hebt gemaakt. Ok nu de labels dus een variabele naam geven.

    uitgaande van volgende gegevens:

    formuliernaam = formulier
    werkblad waar gegevens voor de labels staat = labelgegevens
    label tekstvaknaam in formulier = label1 tm label7 (op basis van de witte vlakken in je plaatje)
    celverwijzingen voor de teksten van label1 tm label 7 = cel A2, B2, .. , G2
    werkblad waarin het formulier moet verschijnen = uitvoer

    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Sheets("labelgegevens").activate
    waarde1 = Range("A2").value
    waarde2 = Range("B2").value

    ****** idem voor waarde3 tm 7 ******

    Sheets("uitvoer").activate
    load formulier
    formulier.label1.Caption = waarde1
    formulier.label2.Caption = waarde2

    ****** idem voor label3 tm 7 ******

    formulier.show


    De rest moet je zelf maar uitzoeken met de help functie die in visual basic zit tenzij je nog gerichte vragen hebt.
    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
      maandag 15 januari 2007 @ 17:30:12 #72
    85514 ralfie
    !Yvan eht nioj
    pi_45378086
    Maak in het formulier een initialize functie

    1
    2
    3
    4
    Private Sub UserForm_Initialize()
        TextBox1.Value = Sheet1.Range("A1")
        'etc...
    End Sub

    deze wordt uigevoerd zodra je het formulier laadt
      dinsdag 16 januari 2007 @ 15:54:06 #73
    129106 Chav
    Oi Oi Oi !!!
    pi_45408168
    Ik heb een beetje geknutseld en nu krijg ik dit probleem (1e regel)

    In me Burberry......
      dinsdag 16 januari 2007 @ 20:58:39 #74
    165854 Meeldraad
    Lekker doorstampen
    pi_45418450
    Jikez, een excel voor gevorderden topic! Komt dat even goed uit, want ik kom er zelf niet uit. Iemand misschien een helpende hand?
    Ik wil graag dat ik in excel een datum invul in B3 volgens ddmmjjjj en dat er dan automatisch dd-mm-jjjj komt te staan. En dan komt 't: vervolgens moet ik er mee kunnen werken als een datumwaarde. Dus als ik in cel B4 zet: =ALS(B3>DATUMWAARDE("31-12-1947");ja;nee) moet er vervolgens ja of nee staan en niet #WAARDE zoals ik het nu heb Anyone??
    Contemnunt spinam cum rosae deliberant
      FOK!-Schrikkelbaas dinsdag 16 januari 2007 @ 21:13:56 #75
    862 Arcee
    Look closer
    pi_45418990
    =ALS(B3>DATUM(1947,12,31),"ja","nee")

    Komma's ipv puntkomma's dus ook. In de Engelse versie tenminste wel.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      dinsdag 16 januari 2007 @ 21:16:14 #76
    85514 ralfie
    !Yvan eht nioj
    pi_45419086
    @Chav: zet eens een spatie tussen 'sub' en 'knop' op die regel

    @meeldraad: dat kan niet in een keer, wel met een tussencel
    Als je de datum in cel C9 invoert:
    1=DATUM(DEEL(C9;5;4);DEEL(C9;3;2);DEEL(C9;1;2))

    die andere functie moet je nog "" om ja en nee zetten, aldus
    1=ALS(F16>DATUMWAARDE("31-12-1947");"ja";"nee")

    als je de eerste formule in F16 heb gezet

    mocht je deze datum nergens anders nodig hebben, kun je het ook in 1 keer doen
    1=ALS(DATUM(DEEL(C9;5;4);DEEL(C9;3;2);DEEL(C9;1;2))>DATUMWAARDE("31-12-1947");"ja";"nee")


    EDIT: of wat arcee zegt
      FOK!-Schrikkelbaas dinsdag 16 januari 2007 @ 21:18:53 #77
    862 Arcee
    Look closer
    pi_45419175
    Nederlandse versies.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      dinsdag 16 januari 2007 @ 21:36:26 #78
    85514 ralfie
    !Yvan eht nioj
    pi_45419890
    quote:
    Op dinsdag 16 januari 2007 21:18 schreef Arcee het volgende:
    Nederlandse versies.
    ach, 't was gratis
      dinsdag 16 januari 2007 @ 22:02:25 #79
    165854 Meeldraad
    Lekker doorstampen
    pi_45420930
    Oké, via Celeigenschappen => aangepast => 00-00-0000 krijg ik wel automatisch streepjes, maar dan herkent ie het niet als datumwaarde. En als ik dan inderdaad overal waar in een rekencel B3 staat dit neerzet: DATUMWAARDE(TEKST.SAMENVOEGEN(LINKS(B3;2);"-";DEEL(B3;3;2);"-";RECHTS(B3;4)) dan rekent ie er mee, maar omdat overal te veranderen is echt, echt een ontzettend @#$$-werk (excuse my French). Bovendien leiden kleine vertikkingen in B3 tot vreemde uitkomsten, omdat ie 'm niet automatisch als datum herkent. Het is een oplossing, dus dank voor de inspiratie en als het niet simpeler kan dan wordt dit inderdaad dé oplossing, maar ideaal is het niet. Zou het niet te regelen zijn via een macro??

    Het enige wat die macro feitelijk moet doen is die cel als datum aanmerken en er streepjes zetten als ze er nog niet staan, staan ze er wel, dan moet ie ze laten staan en er geen rare dingen meedoen. Iets zegt me dat dit met een simpele macro moet kunnen. Maar aangezien ik daar helemaal niet in thuis ben, kan ik ook wel voorgelogen worden...
    Contemnunt spinam cum rosae deliberant
      FOK!-Schrikkelbaas dinsdag 16 januari 2007 @ 22:09:07 #80
    862 Arcee
    Look closer
    pi_45421157
    =ALS(B3>DATUM(1947,12,31);"ja";"nee")

    Dat werkt niet?

    Je kunt wel rechtstreeks met die datum in B3 werken, hoor. Daar heb je niet die tussenstap voor nodig.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      FOK!-Schrikkelbaas dinsdag 16 januari 2007 @ 22:10:58 #81
    862 Arcee
    Look closer
    pi_45421217
    quote:
    Op dinsdag 16 januari 2007 22:02 schreef Meeldraad het volgende:
    Oké, via Celeigenschappen => aangepast => 00-00-0000
    Dat moet dd-mm-jjjj zijn, niet die nullen.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      woensdag 17 januari 2007 @ 00:47:45 #82
    165854 Meeldraad
    Lekker doorstampen
    pi_45426122
    Als ik ipv 00-00-0000 er dd-mm-jjjj van maak voegt ie niet automatisch streepjes toe. En ik kan inderdaad wel rechtstreeks met een DATUM in B3 werken, maar dan wel een datum zonder streepjes. Wil ik iets met automatisch toegevoegde streepjes dan kan dat dus alleen via aangepast en 00-00-0000, maaar dan herkent ie het niet automatisch als datum. Het is echt tenenkrommend!

    Voor wie het wil uitproberen zet ik hieronder twee bewerkingen van cellen die uit m'n sheet komen:

    B3 => celeigenschappen => aangepast => 00-00-0000
    B4 =>
    1=ALS((C7+C8+F8-F9+F10)>0;ALS(OF(b3=0;b3>DATUMWAARDE("31-12-1941"));1990;P5);0)


    Om automatisch streepjes te krijgen in B3 als je 31121941 intypt, moet in elke rekencel waar een datumvergelijking komt, B3 vervangen worden door: DATUMWAARDE(TEKST.SAMENVOEGEN(LINKS(B3;2);"-";DEEL(B3;3;2);"-";RECHTS(B3;4))). Dus dan krijg je

    B4 =>
    1=ALS((C7+C8+F8-F9+F10)>0;ALS(OF(B3=0;DATUMWAARDE(TEKST.SAMENVOEGEN(LINKS(B3;2);"-";DEEL(B3;3;2);"-";RECHTS(B3;4)))>DATUMWAARDE("31-12-1941"));1990;P5);0)


    Maar stel dan dat je 731121941 invoert per ongeluk dan krijg je wel een antwoord in de rekencel, terwijl de datum niet juist is. Dit is ook weer niet de bedoeling, dat leidt tot werken met foutieve informatie. (Overigens nu ik het nog een keer probeer krijg ik wel een foutmelding wat in dit geval wenselijk is, zodat je niet met die foutieve info doorwerkt). En als je er al wél gelijk streepjes tussen typt, snapt ie er weer niks van. Maar goed, op zich werkt ie zo wel enigszins, maar hier moet toch een elegantere oplossing voor zijn...
    Contemnunt spinam cum rosae deliberant
      FOK!-Schrikkelbaas woensdag 17 januari 2007 @ 01:04:13 #83
    862 Arcee
    Look closer
    pi_45426407
    Voer je de datum wel als datum in B3 in?

    Dus bijvoorbeeld vandaag invoeren als 1/17/2007 en dat Excel 't dan afbeeldt als 17-01-2007 door dd-mm-jjjj bij celeigenschappen in te vullen.

    Dus niét 17-01-2007 intypen, want dan maakt Excel er een tekst-type van.

    [ Bericht 0% gewijzigd door Arcee op 17-01-2007 01:15:24 ]
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      FOK!-Schrikkelbaas woensdag 17 januari 2007 @ 01:18:30 #84
    862 Arcee
    Look closer
    pi_45426451


    Dit zou 't toch moeten zijn. In de linker kolom een rij willekeurige datums die als datum zijn ingevoerd en als dd-mm-jjjj worden afgebeeld. In de tweede kolom de formule zoals ik 'm al een paar keer heb genoemd (deze is alleen in het Engels). Geen tussencellen met extra formules nodig dus.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      FOK!-Schrikkelbaas woensdag 17 januari 2007 @ 01:26:33 #85
    862 Arcee
    Look closer
    pi_45426558
    Of wil je het per se ook met streepjes in kunnen voeren?
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      woensdag 17 januari 2007 @ 09:23:22 #86
    15967 Frollo
    You know I am a righteous man
    pi_45428888
    quote:
    Op woensdag 17 januari 2007 01:26 schreef Arcee het volgende:
    Of wil je het per se ook met streepjes in kunnen voeren?
    Hij wil het juist zonder streepjes invoeren, ik denk dat daar het probleem zit.

    Want stel dat ik '112007' invoer, hoe moet Excel dan weten of ik a) 1 januari 2007 bedoel, b) een datum in november 2007 waarvan ik de dag vergeten ben in te voeren, of c) een elfde dag ergens in 2007 waarvan ik de maand vergeten ben?
    pi_45430007
    Het handigste is denk ik een extra kolom toe te voegen naast B3 met de onderstaande formule zodat in die kolom je streepjesdatum komt.

    =DATE(MOD(B3;10000);((MOD(B3;1000000)-MOD(B3;10000))/10000);TRUNC(B3;-6)/1000000)

    of in het nederlands (volgens http://cherbe.free.fr/traduc_fonctions_xl97.html)

    =DATUM(REST(B3;10000);((REST(B3;1000000)-REST(B3;10000))/10000);GEHEEL(B3;-6)/1000000)

    Vervolgens de kolom ernaast de functie
    =ALS(C3>DATUM(1947;12;31);"ja";"nee")

    Het kan zijn dat ; vervangen moet worden door , maar dat verschilt per taal wat trouwens de grootste stommiteit is die MS ooit heeft begaan, net als het vertalen van alle functies in de spreadsheet.
    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 17 januari 2007 @ 10:22:02 #88
    15967 Frollo
    You know I am a righteous man
    pi_45430147
    quote:
    Op woensdag 17 januari 2007 10:17 schreef Deetch het volgende:
    dat verschilt per taal wat trouwens de grootste stommiteit is die MS ooit heeft begaan, net als het vertalen van alle functies.
    Het gekke is dat als je een bestand tussen verschillende taalversies uitwisselt, dus bijvoorbeeld in een Engelse Excel een bestand maken en in een Nederlandse Excel weer inlezen, dat de vertaling van de functies en de leestekens gewoon goed gaat.
    Hij KAN het dus wel! Maar waarom kan ik dan in mijn Nederlandse Excel niet gewoon meteen =SUM(A1:B1) intypen als ik dat zou willen?
    pi_45430252
    Je kunt kolom B fixeren op een tekstlengte van 8 tekens. data validatie, tekstlengte, min 8, max 8.

    Dan moet je echter de formule in C3 ook aanpassen naar:
    =DATUM(REST(WAARDE(B3);10000);((REST(WAARDE(B3);1000000)-REST(WAARDE(B3);10000))/10000);GEHEEL(WAARDE(B3);-6)/1000000)
    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_45430409
    quote:
    Op woensdag 17 januari 2007 10:22 schreef Frollo het volgende:

    [..]

    Het gekke is dat als je een bestand tussen verschillende taalversies uitwisselt, dus bijvoorbeeld in een Engelse Excel een bestand maken en in een Nederlandse Excel weer inlezen, dat de vertaling van de functies en de leestekens gewoon goed gaat.
    Hij KAN het dus wel! Maar waarom kan ik dan in mijn Nederlandse Excel niet gewoon meteen =SUM(A1:B1) intypen als ik dat zou willen?
    omdat MS "klantvriendelijk" wil zijn voor gebruikers zonder enige voorkennis en de functies graag intuititef wil laten aanvoelen. Zodra je echter al programmeerkennis hebt of in een andere taal hebt gewerkt ben je dus mooi zuur.
    Met Excel95 (geloof ik) was het zelfs zo erg dat de visual basic in excel ook vertaald was.

    dan kreeg je dus macro met "indien .. dan .. anders" etc, gelukkig zijn ze daar snel van afgestapt. Ik meen mij te herinneren dat er wel een spreadsheet was waarin de functies vertaald werden. Ik zal eens even zoeken.
    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_45431040
    Gratis vertaal plugin voor excel functies. Je krijgt een werkbalk met de functie in je geinstalleerde taal, de functie in een andere taal en een taalkeuze. Je kunt dus alle functies van en naar je geinstalleerde taal naar een andere taal vertalen.

    http://members.chello.nl/jvolk/keepitcool/files/TranslateIT.zip
    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 17 januari 2007 @ 11:00:35 #92
    15967 Frollo
    You know I am a righteous man
    pi_45431171
    quote:
    Op woensdag 17 januari 2007 10:30 schreef Deetch het volgende:

    [..]

    omdat MS "klantvriendelijk" wil zijn voor gebruikers zonder enige voorkennis en de functies graag intuititef wil laten aanvoelen.
    Wat lief van MS!

    Toch blijft het typisch dat ik niet zelf Engelse functies kan typen in mijn Nederlandse Excel, want dan houdt hij zich van den domme, maar dat hij diezelfde functies ineens wel begrijpt bij het inlezen.
    quote:
    Zodra je echter al programmeerkennis hebt of in een andere taal hebt gewerkt ben je dus mooi zuur.
    Met Excel95 (geloof ik) was het zelfs zo erg dat de visual basic in excel ook vertaald was.

    dan kreeg je dus macro met "indien .. dan .. anders" etc, gelukkig zijn ze daar snel van afgestapt.
    Juist. Hier op het werk hebben we nog steeds af en toe macro's nodig die in Word 95 zijn geschreven, in fraai Nederlands WordBasic dus, en nu heb ik pas geleden te taak gekregen om dat om te zetten naar VBA. Leuke klus.
    quote:
    Op woensdag 17 januari 2007 10:55 schreef Deetch het volgende:
    Gratis vertaal plugin voor excel functies. Je krijgt een werkbalk met de functie in je geinstalleerde taal, de functie in een andere taal en een taalkeuze. Je kunt dus alle functies van en naar je geinstalleerde taal naar een andere taal vertalen.

    http://members.chello.nl/jvolk/keepitcool/files/TranslateIT.zip
    Zo, da's handig!
      woensdag 17 januari 2007 @ 11:05:52 #93
    85514 ralfie
    !Yvan eht nioj
    pi_45431289
    een andere mogelijkheid is via een worksheet_onchange macro. wordt wel wat makkelijker om niet legale datums in te voeren
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    Private Sub Worksheet_Change(ByVal Target As Range)
        If Not Intersect(Range("A1:A100"), Target) Is Nothing Then
            On Error GoTo wrong
            Dim vale As String
            For Each cell In Target
                If Not Len(cell.Value) = 10 And Not Len(cell.Value) = 0 Then
                    vale = cell.Value
                    cell.Value = Left$(vale, 2) & "-" & Mid$(vale, 3, 2) & "-" & Right$(vale, 4)
                    vale = DateValue(cell.Value)
                End If
            Next cell
        End If
        Exit Sub
    wrong:
        MsgBox "De ingevulde waarde: '" & vale & "' is geen geldige datum!"
    End Sub
    Het enige wat je moet doen is de range ("A1:A100") aanpassen aan jouw wensen en de cellen in deze range de TEXT-NOTATIE geven, anders werkt het niet.

    Mocht de macro vastlopen, gebruik dan ctr+pause/break. Hij kan in een oneindige lus komen omdat de macro de celwaarde aanpast en deze aanpassing de macro zelf weer oproept
      FOK!-Schrikkelbaas woensdag 17 januari 2007 @ 11:12:50 #94
    862 Arcee
    Look closer
    pi_45431469
    quote:
    Op woensdag 17 januari 2007 09:23 schreef Frollo het volgende:
    Hij wil het juist zonder streepjes invoeren, ik denk dat daar het probleem zit.

    Want stel dat ik '112007' invoer, hoe moet Excel dan weten of ik a) 1 januari 2007 bedoel, b) een datum in november 2007 waarvan ik de dag vergeten ben in te voeren, of c) een elfde dag ergens in 2007 waarvan ik de maand vergeten ben?
    Ja, daarom zei ik ook voer 't als datum in:
    quote:
    Op woensdag 17 januari 2007 01:04 schreef Arcee het volgende:
    Voer je de datum wel als datum in B3 in?

    Dus bijvoorbeeld vandaag invoeren als 1/17/2007 en dat Excel 't dan afbeeldt als 17-01-2007 door dd-mm-jjjj bij celeigenschappen in te vullen.

    Dus niét 17-01-2007 intypen, want dan maakt Excel er een tekst-type van.
    Dat kun je uitproberen door het veld iets breder te maken. Als je de datum invoert en het wordt naar rechts uitgelijnd dan is het een datum, blijft het links staan dan is het tekst en niet goed dus.



    16-10-1934 is dus niet als datum ingevoerd, de rest wel.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      woensdag 17 januari 2007 @ 13:22:05 #95
    165854 Meeldraad
    Lekker doorstampen
    pi_45435225
    @ Deetchs oplossing:
    Andere cellen gebruiken zijn geen goede optie, het is te bewerkelijk. Kolommen toevoegen ook niet want ik wil met minimale invul van data, maximale overzichtelijkheid.

    @ Arcees oplossing:
    Celeigenschappen => aangepast => dd-mm-jjj. Dit is hoe ik het nu ook laat werken, maar dit leidt niet tot de automatische tussenvoeging van streepjes.

    @ Ralphies oplossing:
    Hoe maak ik een worksheet_onchange macro? Dit is hoe ik het geprobeerd heb: Extra => Macro => Nieuwe macro opnemen => naamgeven, OK => stopknop. Vervolgens in Macro's bewerken heb ik alles geselecteerd en jouw scriptje eroverheen geplakt. Daarna heb ik A1:A100 vervangen door B3 (aangezien er maar een cel is waarin je de geboortedatum moet invullen). Misschien heb ik een fout gemaakt, maar het resultaat is in ieder geval geen streepjes en de rekencellen rekenen er niet mee. Een voorbeeld van een rekencel is dit:

    1=ALS((C23+C24+F24-F25+F26)>0;ALS(OF(B3=0;B3>DATUMWAARDE("31-12-1947"));1894;P22);0)


    Als ik nu in bijv C23 19000 invul en in B3 30061950 invul, zou er dus 1894 moeten komen te staan.

    Maar ik ben wel meer en meer tot de overtuiging gekomen dat een macro de oplossing is. Ik heb feitelijk maar drie eisen aan wat die macro moet kunnen:

    1. Als ik in een cel 31121947 invoer, moet er automatisch 31-12-1947 komen te staan.
    2. Als ik er 31-12-1947 invoer, moet dat ook herkend worden en moet er 31-12-1947 blijven staan.
    3. De cel moet als datumwaarde gelden.

    Vereiste 2 is een bonus als het lukt, maar de minst belangrijke van de drie. Als de heren excelgoeroes zich eens in die richting zouden willen experimenteren... :s)
    Contemnunt spinam cum rosae deliberant
      FOK!-Schrikkelbaas woensdag 17 januari 2007 @ 13:25:13 #96
    862 Arcee
    Look closer
    pi_45435331
    quote:
    Op woensdag 17 januari 2007 13:22 schreef Meeldraad het volgende:
    @ Arcees oplossing:
    Celeigenschappen => aangepast => dd-mm-jjj. Dit is hoe ik het nu ook laat werken, maar dit leidt niet tot de automatische tussenvoeging van streepjes.
    Voer je de datum wel als echte datum in? Dus niét 31121947, maar 12/31/1947, of hoe die Nederlandse versie van Excel het ook maar wil hebben.

    Ik zou 't gewoon als datumveld invoeren. Dan maakt Excel er zelf wel 31-12-1947 van.

    Nogmaals:



    Datums zijn als datum ingevoerd en worden correct met streepjes afgebeeld.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      FOK!-Schrikkelbaas woensdag 17 januari 2007 @ 13:31:06 #97
    862 Arcee
    Look closer
    pi_45435511
    In mijn Engelse versie zien de celeigenschappen van de datumvelden er zo uit:



    Misschien moet jij ook yyyy gebruiken? In ieder geval 4 letters, in je post noemde je er 3 (jjj).

    Maar in de Nederlandse versie zou het dd-mm-jjjj moeten zijn, lijkt me.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      FOK!-Schrikkelbaas woensdag 17 januari 2007 @ 13:42:16 #98
    862 Arcee
    Look closer
    pi_45435900
    quote:
    Op woensdag 17 januari 2007 13:25 schreef Arcee het volgende:
    Datums zijn als datum ingevoerd en worden correct met streepjes afgebeeld.
    Wat je kunt zien als ik op zo'n cel sta:



    04-02-1919 is dus ingevoerd als 2/4/1919.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      woensdag 17 januari 2007 @ 13:43:03 #99
    165854 Meeldraad
    Lekker doorstampen
    pi_45435918
    Haha, nee mijn jaartelling is begonnen met de Vrede van Munster en dus is het pas 358 n.VvM en heb ik maar drie j's nodig..... Oké, oké, het was een foutje....
    Maar inderdaad celeigenschappen => aangepast => dd-mm-jjjj. Maar die slashforwards zijn niet echt een oplossing, want dan kan ik net zo goed gelijk streepjes neerzetten. Nee, het is me er juist om te doen om zo snel mogelijk een datum in te kunnen voeren door 31101947 in te vullen en dat excel er dan vervolgens zélf een datumwaarde met streepjes van maakt.
    Contemnunt spinam cum rosae deliberant
      FOK!-Schrikkelbaas woensdag 17 januari 2007 @ 13:47:57 #100
    862 Arcee
    Look closer
    pi_45436090
    quote:
    Op dinsdag 16 januari 2007 22:02 schreef Meeldraad het volgende:
    Oké, via Celeigenschappen => aangepast => 00-00-0000 krijg ik wel automatisch streepjes, maar dan herkent ie het niet als datumwaarde. En als ik dan inderdaad overal waar in een rekencel B3 staat dit neerzet: DATUMWAARDE(TEKST.SAMENVOEGEN(LINKS(B3;2);"-";DEEL(B3;3;2);"-";RECHTS(B3;4)) dan rekent ie er mee, maar omdat overal te veranderen is echt, echt een ontzettend @#$$-werk (excuse my French).
    Dan was dit toch gewoon goed?

    Je moet die formule dan af en toe even kopiëren. Dat kun je makkelijk doen door te dubbelklikken op het kleine vierkantje rechtsonderin de cel die je wilt kopiëren.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      FOK!-Schrikkelbaas woensdag 17 januari 2007 @ 13:50:32 #101
    862 Arcee
    Look closer
    pi_45436152


    Dat vierkantje dus. Als je links de datums invoert en dan rechts de formule meekopieert, dan moet 't goed gaan.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      woensdag 17 januari 2007 @ 13:55:45 #102
    85514 ralfie
    !Yvan eht nioj
    pi_45436310
    quote:
    Op woensdag 17 januari 2007 13:22 schreef Meeldraad het volgende:
    @ Ralphies oplossing:
    Hoe maak ik een worksheet_onchange macro? Dit is hoe ik het geprobeerd heb: Extra => Macro => Nieuwe macro opnemen => naamgeven, OK => stopknop. Vervolgens in Macro's bewerken heb ik alles geselecteerd en jouw scriptje eroverheen geplakt. Daarna heb ik A1:A100 vervangen door B3 (aangezien er maar een cel is waarin je de geboortedatum moet invullen). Misschien heb ik een fout gemaakt, maar het resultaat is in ieder geval geen streepjes en de rekencellen rekenen er niet mee. Een voorbeeld van een rekencel is dit:
    ga naar extra->macro->visual basic editor
    Linksboven in de project explorer (of hoe dat ook heet) dubbelklikken op het blad waarop je het wilt hebben (bijv blad 1)
    daarna kun je de code in het scherm plakken.
      woensdag 17 januari 2007 @ 14:20:35 #103
    107951 JortK
    Immer kwaliteitsposts
      woensdag 17 januari 2007 @ 14:27:28 #104
    165854 Meeldraad
    Lekker doorstampen
    pi_45437332
    @ Arcee
    Klopt die oplossing was ook werkzaam, maar als je weet hoeveel verwijzingen ik dan handmatig zou moeten omzetten, daar wordt je niet blij van, komt nog eens bij dat de formules nog ondoorzichtiger worden dan ze al zijn en als er ergens toch nog fouten inzitten wordt het nog lastiger ze op te sporen. De formules moeten zo gestroomlijnd mogelijk zijn. En zoals gezegd lost het niet alle problemen op. Het invoeren van een datum mét streepjes leidt tot foute waarden.

    @ralfie
    Oké gelukt, en inderdaad maakt het nu niet uit of ik ze met of zonder streepje invoer, uiteindelijk staan ze er zoals ik ze wil zien. A sight for sore eyes! Alleen de rekencellen doen er nog niks mee. Moet ik misschien een andere verwijzing gebruiken dan in mijn vorige post?
    Contemnunt spinam cum rosae deliberant
      FOK!-Schrikkelbaas woensdag 17 januari 2007 @ 14:40:27 #105
    862 Arcee
    Look closer
    pi_45437801
    quote:
    Op woensdag 17 januari 2007 14:27 schreef Meeldraad het volgende:
    @ Arcee
    Klopt die oplossing was ook werkzaam, maar als je weet hoeveel verwijzingen ik dan handmatig zou moeten omzetten, daar wordt je niet blij van, komt nog eens bij dat de formules nog ondoorzichtiger worden dan ze al zijn en als er ergens toch nog fouten inzitten wordt het nog lastiger ze op te sporen. De formules moeten zo gestroomlijnd mogelijk zijn. En zoals gezegd lost het niet alle problemen op.
    Waar heb je die datums die je invoert dan allemaal al staan?
    quote:
    Het invoeren van een datum mét streepjes leidt tot foute waarden.
    Daar maak je dan weer een aparte ALS voor. In jouw Nederlandse versie zou dat dan zo moeten worden:

    DATUMWAARDE(TEKST.SAMENVOEGEN(LINKS(B3;2);"-";DEEL(B3;ALS(DEEL(B3;3;1)="-";4;3);2);"-";RECHTS(B3;4))

    Ervaanuitgaande dat die DATUMWAARDE-functie zo al werkt.

    Die formule hoef je maar 1 keer in te voeren en mee te kopiëren.

    Nederlandse versies zijn kut!

    [ Bericht 3% gewijzigd door Arcee op 17-01-2007 14:46:01 ]
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
    pi_45438537
    met ctrl-H kun je in de formules in een werkblad heel eenvoudig vervangingen toepassen.
    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 17 januari 2007 @ 21:35:57 #107
    129106 Chav
    Oi Oi Oi !!!
    pi_45452175
    Ik word gek! Hij zegt steeds dat mn sub niet goed is.

    Wat ik doe.

    extra, macro, nieuwe macro opnemen, macronaam geven, knop maken, macro toevoegen en dan de formule in VB. Ik krijg dan de fout: Compileerfout: Sub of Function is niet gedefinieerd.

    Grrrrr!
    In me Burberry......
    pi_45463906
    Een paar kleine handige macrotjes die ikzelf veel gebruik bij dateverwerking (tevens schopje)

    Stel je hebt een kolom met datat erin maar ook lege plekken tussen de data. Met ctrl+pijltje naar beneden of naar boven kun je dan naar de eerstvolgende (lager danwel hoger gelegen) lege cel. Soms wil je echter direct naar de alleronderste waarde of de allerbovenste waarde, daarvoor heb ik onderstaande twee macro's gemaakt.

    Als je naar de onderste cel met een waarde wilt gaan kun je deze macro gebruiken
    1
    2
    3
    4
    Sub Last_data()
        Application.Goto Reference:="R65536C[0]"
        Selection.End(xlUp).Select
    End Sub


    Als je naar de bovenste cel met een waarde wilt gaan kun je deze macro gebruiken
    1
    2
    3
    4
    Sub First_data()
        Application.Goto Reference:="R1C[0]"
        If ActiveCell.Value = "" Then Selection.End(xlDown).Select
    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
    pi_45464258
    Onderstaande macro geeft elke cel in de actieve kolom een zelf te kiezen kleur als de waarde die erin staat overeenkomt met de waarde (getal of string) die je in de inputbox invoert. Macro begint in de actieve cel en gaat door tot eerstvolgende lege cel.

    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
    Sub Mark_cell_color()

    Dim Mark As Integer
    Dim Marker, Markcolor As String

    Marker = InputBox("Welke tekenreeks (getal of string) staat in de te markeren cel?", "Merkteken")
    If Marker = "" Then Exit Sub

    Markcolor = InputBox("Welke kleur markering? (rood, groen, blauw, geel, roze)", "Markerkleur", "rood")
    bool = Markcolor = "rood" Or Markcolor = "groen" Or Markcolor = "blauw" Or Markcolor = "geel" Or Markcolor = "roze"
    If bool = False Then Exit Sub
    If Markcolor = "rood" Then Mark = 3
    If Markcolor = "groen" Then Mark = 4
    If Markcolor = "blauw" Then Mark = 5
    If Markcolor = "geel" Then Mark = 6
    If Markcolor = "roze" Then Mark = 7

    Do Until ActiveCell.Value = ""
        
        If ActiveCell = Marker Then ActiveCell.Interior.ColorIndex = Mark
        If CStr(ActiveCell.Value) = Marker Then ActiveCell.Interior.ColorIndex = Mark
        ActiveCell.Offset(1, 0).Range("a1").Select
    Loop
       
    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 18 januari 2007 @ 11:10:10 #110
    85514 ralfie
    !Yvan eht nioj
    pi_45464704
    quote:
    Op woensdag 17 januari 2007 14:27 schreef Meeldraad het volgende:
    @ralfie
    Oké gelukt, en inderdaad maakt het nu niet uit of ik ze met of zonder streepje invoer, uiteindelijk staan ze er zoals ik ze wil zien. A sight for sore eyes! Alleen de rekencellen doen er nog niks mee. Moet ik misschien een andere verwijzing gebruiken dan in mijn vorige post?
    ja, de cel geeft het nu als tekst weer. Om met deze tekst als datum te werken, moet je de functie DATUMWAARDE gebruiken, bijv
    1=ALS(DATUMWAARDE(A1)>DATUMWAARDE("13-3-2001");"ja";"nee")
      donderdag 18 januari 2007 @ 12:01:27 #111
    165854 Meeldraad
    Lekker doorstampen
    pi_45466421
    @ ralfie
    Dat is nog een relatief kleine toevoeging... even testen....


    Wauw, ik geloof dat dit een oplossing is waar ik mee kan leven! Het is niet zo te regelen dat de celeigenschap al op datum staat en dat je vervolgens via een macro het hele streepverhaal bewerkstelligt? (Zoals gezegd, ik wil de formules zo kort mogelijk houden)

    @ Arcee
    Je formule krijg ik niet werkend. En de oplossing van ralfie is gestroomlijnder. Evengoed, enorm bedankt voor al je input. Heb ik echt gewaardeerd!

    Als jullie er belangstelling bij hebben, wil ik het eindproduct wel naar je toemailen. Dan begrijp je misschien ook beter waarom het me te doen was en wie weet zie je nog dingen die beter of handiger zouden kunnen. Het is een sheet waarin je met relatief weinig variabelen, snel je inkomstenbelasting kunt uitrekenen. PM maar een mailadres bij belangstelling.
    Contemnunt spinam cum rosae deliberant
      donderdag 18 januari 2007 @ 12:11:18 #112
    165854 Meeldraad
    Lekker doorstampen
    pi_45466707
    Trouwens, nog een vraag: de RANGE betreft 6 cellen, maar als ik het zo noteer: Range("c6;c22;c38;c54;c71;c87") werken ze niet, behalve de eerste waar ik mee getest heb, namelijk cel c22. (Bij c6 was ik arcee's opmerkingen aan het proberen).
    Ze staan allemaal op tekst, dus daar ligt het niet aan. Ik zal het wel verkeerd genoteerd hebben... help?
    Contemnunt spinam cum rosae deliberant
    pi_45471354
    * Deetch noteert worksheet_change idee voor later gebruik
    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
      FOK!-Schrikkelbaas donderdag 18 januari 2007 @ 14:37:17 #114
    862 Arcee
    Look closer
    pi_45471799
    quote:
    Op donderdag 18 januari 2007 12:01 schreef Meeldraad het volgende:
    PM maar een mailadres bij belangstelling.
    Zie m'n profiel. Je hebt zo te zien je PM niet geactiveerd.
    Never in the entire history of calming down did anyone ever calm down after being told to calm down.
      donderdag 18 januari 2007 @ 16:40:50 #115
    85514 ralfie
    !Yvan eht nioj
    pi_45476889
    quote:
    Op donderdag 18 januari 2007 12:01 schreef Meeldraad het volgende:
    @ ralfie
    Dat is nog een relatief kleine toevoeging... even testen....


    Wauw, ik geloof dat dit een oplossing is waar ik mee kan leven! Het is niet zo te regelen dat de celeigenschap al op datum staat en dat je vervolgens via een macro het hele streepverhaal bewerkstelligt? (Zoals gezegd, ik wil de formules zo kort mogelijk houden)
    Het probleem is dat een illegale datum door excel niet kan worden omgezet en dan kun je er in visual basic ook niks mee.Maar na wat experimenteren net iets uitgevonden. Cell.value2 geeft de ingevoerde waarde, ook als deze geen legale datum is. De aangepaste code wordt dan:
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    Private Sub Worksheet_Change(ByVal Target As Range)
        If Not Intersect(Range("A1:A100"), Target) Is Nothing Then
            On Error GoTo wrong
            Dim vale As String, length As Integer
            For Each cell In Target
                length = Len(cell.Value2)
                If length = 7 Or length = 8 And Not length = 0 Then
                    If length = 7 Then
                        vale = "0" & cell.Value2
                    Else
                        vale = cell.Value2
                    End If
                    cell.Value = DateValue(Left$(vale, 2) & "-" & Mid$(vale, 3, 2) & "-" & Right$(vale, 4))
                End If
            Next cell
        End If
        Exit Sub
    wrong:
        MsgBox "De ingevulde waarde: '" & vale & "' is geen geldige datum!"
    End Sub
    Nu kun je je cellen wel op dd-mm-jjjj zetten, en er gewoon mee rekenen

    [ Bericht 6% gewijzigd door ralfie op 18-01-2007 16:46:38 ]
      donderdag 18 januari 2007 @ 18:05:27 #116
    165854 Meeldraad
    Lekker doorstampen
    pi_45480598
    Exact!!! ZOOOO moet ie zijn!!! You just made my day! Elk biertje dat ik drink vandaag zal zijn op Ralph van Hoorn, wat een held! Zegt het voort!

    Alle anderen, met name Arcee ook hartelijk dank!

    Oh en als je nog belangstelling hebt bij het resultaat, dan moet je maar even een mailadres naar mijn inmiddels geactiveerde PM-inbox sturen.
    Contemnunt spinam cum rosae deliberant
    pi_45499548
    Soms moet je duplicaten uit een kolom verwijderen. hiervoor heb ik twee macros geschreven:

    De eerste macro verwijderd duplicaten als ze direct onder elkaar staan.
    1, 1, 2, 2, 3, 4, 5, 1, 1,2
    wordt
    1, 2, 3, 4, 5, 1, 2

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

    ' Deze macro kijkt of de cel onder de active cell dezelfde waarde bevat.
    ' Zo ja dan wordt deze verwijderd, anders wordt er verder gegaan
        
    Do While ActiveCell.Value <> ""
        
        Curr = ActiveCell.Value
        ActiveCell.Offset(1, 0).Range("A1").Select
        Do
            Application.CutCopyMode = False
            Selection.Delete Shift:=xlUp
        Loop While ActiveCell.Value = Curr
        
    Loop
    End Sub


    De tweede macro verwijderd alle duplicaten uit een kolom.
    1, 1, 2, 2, 3, 4, 5, 1, 1,2
    wordt
    1, 2, 3, 4, 5

    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
    Sub Del_duplicate_column()
    '
    ' Deze macro verwijderd duplicaten uit een ongesorteerde kolom
    ' Hierbij wordt bovenaan begonnen
        
    Do While ActiveCell.Value <> ""
        Check = ActiveCell.Value
        rij = ActiveCell.Row
        kol = ActiveCell.Column
        
        Do While ActiveCell.Value <> ""
            ActiveCell.Offset(1, 0).Range("a1").Select
            If ActiveCell.Value = Check Then
                Selection.Delete Shift:=xlUp
                Else: End If
            Loop
        
    'activecell weer terug naar check cell en 1 cel naar beneden en do -loop
    Range("a1").Select
    ActiveCell.Offset(rij, kol - 1).Range("a1").Select
    Loop

    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
    pi_45549314
    Deetch need your help again
    Maat van me is naar het volgende op zoek.. ( dont ask me why )
    Regel 1 heeft x velden gevuld
    Regel 2 .. etc etc

    Door het draaien van een macro wil hij op blad 2 het volgende krijgen
    A1
    B1
    C1 D1 E1 F1 G1 etc..

    Dus blad1 A1 komt op A1, Blad1 B1 komt op A2, Blad1 C1 komt op A3 en de rest komt naast A3..
    de 2e regel van blad 1 gaat hetzelfde verder,

    vb.
    Regel 1 : 1 2 3 4 5 6 7
    Regel 2 : a b c d e f g

    blad 2:
    1
    2
    3 4 5 6 7
    a
    b
    c d e f g h
      zondag 21 januari 2007 @ 11:39:13 #119
    85514 ralfie
    !Yvan eht nioj
    pi_45553922
    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
    Sub test()
    Dim arr() As Integer
    Dim vals() As Variant
    Dim number As Integer
    number = ThisWorkbook.Sheets("blad1").UsedRange.Count

    ReDim arr(number, 2)
    ReDim vals(number)

    Dim x

    For Each cell In ThisWorkbook.Sheets("blad1").UsedRange
        If Not cell.Value = "" Then
            arr(x, 1) = cell.Column
            arr(x, 2) = cell.Row
            vals(x) = cell.Value
            x = x + 1
        End If
    Next cell


    ThisWorkbook.Sheets("blad2").Activate
    Dim drow As Integer, dcol As Integer

    For y = 0 To x - 1
        dcol = arr(y, 1) - 2
        If dcol < 1 Then dcol = 1
        drow = arr(y, 2) * 3
        If arr(y, 1) = 1 Then
            drow = drow - 2
        ElseIf arr(y, 1) = 2 Then
            drow = drow - 1
        End If
        Cells(drow, dcol).Value = vals(y)
    Next y
    End Sub
    hoeft alleen nog maar de sheets namen te veranderen mochten die anders zijn
      maandag 22 januari 2007 @ 11:28:43 #120
    163064 Cuegirllie
    Vreemd, maar lekker!
    pi_45573572
    Ik zit met een probleem.. Ik moet een gestapelde grafiek maken, maar hij wil niet zoals ik dat wil.. iemand hier een idee?? Jammergenoeg geen idee hoe ik een mooie screenshot ervan kan maken.. maar zal t proberen uit te leggen dmv overname;
    Dit zijn mijn gegevens

    Persoon A
    Datum Kosten1 Kosten 2
    Jan 50.00 0.00
    Feb 60.00 5.00
    Maart 70.00 10.00
    April 50.00 10.00

    Persoon B
    Datum Kosten1 Kosten 2
    Jan 20.00 1.00
    Feb 30.00 10.00
    Maart 60.00 7.00
    april 10.00 5.00

    Nu wil ik dus een gestapelde grafiek, waarin per maand aan wordt gegeven wat de kosten per persoon zijn.
    op de x-as de maanden
    op de y-as de bedragen

    In sitautie van hierboven wil ik dus 1 grafiek met 2 staven per maand (persoon A en B)
    Elk zo';n staaf bestaat uit kosten 1 en kosten 2 (bovenop elkaar, gestapeld)
    Echter in mijn geval gaat het om 12 maanden en zo'n 12 werknemers, dus zijn bv aparte grafieken geen opties.

    Iemand enig idee hoe ik dit moet doen?? Hoop dat het een beetje duidelijk is.

    Wat mijn probleem namelijk is, is dat ie of alles bij elkaar in een gestapelde balk zet (dus van alle personen) of alle maanden bij elkaar doet. Het wil gewoon niet lukken. Hoop dat iemand t antwoord weet

    [ Bericht 11% gewijzigd door Cuegirllie op 22-01-2007 13:17:00 (verduidelijking probleem) ]
    Cue, het komkommermeisje!
    Het moet niet mooi zijn, het moet functioneel zijn!
    Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
    pi_45575041
    Ik heb geprobeerd een voorbeeldje te maken maar kan hem niet posten omdat ik geen ftp toegang heb. Ik kan hem wel naar je mailen als je ff je mail adres doet.
    Wat ik nu heb is een grafiek met op de x-as de maanden als volgt: jan feb mrt dec en dan weer jan feb mrt dec voor persoon twee. Op de y-as staan de gestapelde kosten (kosten 1 en 2) per persoon. Je hebt dus in totaal 8 stapels.
    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
      maandag 22 januari 2007 @ 12:26:42 #122
    163064 Cuegirllie
    Vreemd, maar lekker!
    pi_45575251
    hm.. dat gaat jammer genoeg ook niet werken.. vergeten bij te vermelden.. Maar het gaat om zo'n 12 personen. Dus dan zou het erg veel worden.
    Evt voorbeelden kun je pm-en
    Cue, het komkommermeisje!
    Het moet niet mooi zijn, het moet functioneel zijn!
    Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
    pi_45575297
    quote:
    Op zondag 21 januari 2007 00:32 schreef realbase het volgende:
    Deetch need your help again
    Hehe, ik slaap in het weekend. Maar Ralfie is een betere coder dan ik en die heeft op zondag niets te doen zo te zien
    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_45575860
    @Cuegirllie: probeer het hier eens mee: http://support.microsoft.com/default.aspx?scid=kb;EN-US;Q214119

    Ik kan zelf helaas nu ff niet helpen ivm lunchmeeting.
    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_45579467
    Ik heb een voorbeeld excelletje klaar op basis van bovengenoemde link, volgens mij hoef je alleen de namen en bedragen nog in te vullen.

    Waar kan ik hem heen sturen? Je kunt nl. geen bestanden PM'en.

    [ Bericht 22% gewijzigd door Deetch op 22-01-2007 14:48:17 ]
    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
      maandag 22 januari 2007 @ 14:46:43 #126
    163064 Cuegirllie
    Vreemd, maar lekker!
    pi_45579583


    [ Bericht 100% gewijzigd door Cuegirllie op 22-01-2007 14:54:14 ]
    Cue, het komkommermeisje!
    Het moet niet mooi zijn, het moet functioneel zijn!
    Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
    pi_45579767
    Bling you got mail. Verander je @ nog even in [at] ivm spam enzo?
    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
      maandag 22 januari 2007 @ 14:57:35 #128
    163064 Cuegirllie
    Vreemd, maar lekker!
    pi_45579944
    zoiets is inderdaad wat ik nodig heb..
    Alleen mijn gegevens staan in een leuke tabelletje.. enig idee of t daarmee ook kan.. stuur je wel effe bestandje op met voorbeeld.. (is voor stage, kan/mag t dus ook geen andere layout geven)
    Cue, het komkommermeisje!
    Het moet niet mooi zijn, het moet functioneel zijn!
    Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
    pi_45580360
    Vanuit een tabel (zonder lege ruimtes) kan het niet direct juist omdat je door die lege ruimtes meerder aparte stacks creert.
    Met behulp van vert.zoeken (vlookup) of gewoon celverwijzingen zou je de getallen wel op de juiste plek in de grafiek kunnen krijgen. Dat is even wat werk maar dan werkt de grafiek wel. kost je hooguit een half uurtje.
    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
      maandag 22 januari 2007 @ 15:16:37 #130
    163064 Cuegirllie
    Vreemd, maar lekker!
    pi_45580453
    Is het uit te leggen hoe dat precies werkt.. dat vert.zoeken/celverwijzignen?
    Cue, het komkommermeisje!
    Het moet niet mooi zijn, het moet functioneel zijn!
    Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
    pi_45580916
    Ik heb wat ruzie met vlookup maar met eenvoudige celverwijzingen en het handig toevoegen van lege regels en lege cellen kun je een bruikbare tabel maken van je originele tabel. Dat hoeft maar een keer als de invoer steeds in een gelijk format zit. Aangezien je ook op stage bent heb je wel ff de tijd hiervoor. ik heb je een mail teruggestuurd met uitleg.

    Succes
    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
      maandag 22 januari 2007 @ 15:33:01 #132
    163064 Cuegirllie
    Vreemd, maar lekker!
    pi_45580970
    Tnx.. ik zal effe kijken En inderdaad.. genoeg tijd
    Cue, het komkommermeisje!
    Het moet niet mooi zijn, het moet functioneel zijn!
    Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
      maandag 22 januari 2007 @ 16:24:41 #133
    163064 Cuegirllie
    Vreemd, maar lekker!
    pi_45582657
    Nou.. t lukt me TNX!!
    Kost inderdaad wel wat werk.. en op de helft ofzo.. maarja.. eerst maar es nagaan of ze t zo wel willen.. want weet ook niet in hoeverre dingen gaan veranderen in de toekomst als ik er niet ben.. en dan vinden ze dit veels te ingewikkeld (al is t dat eigenlijk helemaal niet)
    Cue, het komkommermeisje!
    Het moet niet mooi zijn, het moet functioneel zijn!
    Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
      dinsdag 23 januari 2007 @ 09:51:20 #134
    15967 Frollo
    You know I am a righteous man
    pi_45588759
    Ik wil iets doen wat vast hééél simpel is, maar ik kan er gewoon even niet opkomen.

    Ik heb een een cel het volgende:

    ="Het antwoord is "&A1

    In die cel verschijnt dus: "Het antwoord is " plus de waarde uit A1. Nu wil ik die waarde uit A1 graag opmaak meegeven, bijvoorbeeld vet (Het antwoord is 15) of blauw of cursief of alles tegelijk. Hoe doe ik dat? Bedankt!
    pi_45589956
    Volgens mij kun je bij formulegebruik alleen de hele cel dezelfde layout geven.
    Als de cel geheel is gevuld met text en dan kun je wel deel layouts gebruiken.
    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 23 januari 2007 @ 10:53:36 #136
    163064 Cuegirllie
    Vreemd, maar lekker!
    pi_45590084
    jah.. dat dacht ik ook.. is volgsen mij niet mogelijk om alleen die 15 qua opmaak te veranderen.
    Cue, het komkommermeisje!
    Het moet niet mooi zijn, het moet functioneel zijn!
    Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
      dinsdag 23 januari 2007 @ 10:56:30 #137
    15967 Frollo
    You know I am a righteous man
    pi_45590155
    quote:
    Op dinsdag 23 januari 2007 10:48 schreef Deetch het volgende:
    Volgens mij kun je bij formulegebruik alleen de hele cel dezelfde layout geven.
    Als de cel geheel is gevuld met text en dan kun je wel deel layouts gebruiken.
    OK, maar als ik nou tekst van het getal maak met TEKST()? Dan kan ik in elk geval wel de notatie veranderen. Bijvoorbeeld:
    ="Het is vandaag "&TEKST(VANDAAG();"d mmmm")

    Dus ik vroeg me af of je er dan ook opmaak aan kunt meegeven.
    pi_45594689
    Detekst functie zit aan de zelfde getalsnotaties vast als de gewone getalsnotaties uit format, cells en dus kun je alleen de gehele cel een bepaalde format meegeven.. Je hebt nog steeds met een formule te maken dus blijft mijn vorige post ook gelden.
    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 23 januari 2007 @ 13:44:55 #139
    15967 Frollo
    You know I am a righteous man
    pi_45594750
    Nou dat vind ik dan stom.
    pi_45594895
    Via een macro kan wel. Ga naast de cel staan waarin het getal staat (of pas in de macro de offset verwijzing aan) en run dan onderstaande macro:

    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    Sub Macro2()

        getal = ActiveCell.Offset(0, -1).Value
        ActiveCell.FormulaR1C1 = "Het antwoord is: " & getal
        With ActiveCell.Characters(Start:=18, Length:=Len(getal)).Font
            .Name = "Arial"
            .FontStyle = "Vet"
            .Size = 10
            .Strikethrough = False
            .Superscript = False
            .Subscript = False
            .OutlineFont = False
            .Shadow = False
            .Underline = xlUnderlineStyleNone
            .ColorIndex = xlAutomatic
        End With
        
    End Sub

    dan staat in de actieve cel alleen een tekststring met gewenste layout.
    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 23 januari 2007 @ 13:53:11 #141
    15967 Frollo
    You know I am a righteous man
    pi_45594998
    Bedankt Deetch!
    pi_45655849
    ♫♪We zijn hier op de wereld om mekaar♪♫
    ♫♪om mekaar, om mekaar, om mekaar♪♫
    ♫♪te helpen niet waar♪♫

    muzikaal kickje
    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
      vrijdag 26 januari 2007 @ 11:37:14 #143
    107951 JortK
    Immer kwaliteitsposts
    pi_45690401
    Ik heb zelf hulp nodig :)

    ik heb een kolom met de volgende informatie:

    1Postbus 20, 1910 AA Uitgeest


    Nu wil ik in een ander kolom alleen de tekens hebben tot het komma teken, dus:

    1Postbus 20


    Hoe doe ik dit :)
      vrijdag 26 januari 2007 @ 12:02:56 #144
    15967 Frollo
    You know I am a righteous man
    pi_45691101
    quote:
    Op vrijdag 26 januari 2007 11:37 schreef JortK het volgende:
    Ik heb zelf hulp nodig

    ik heb een kolom met de volgende informatie:


    [ code verwijderd ]

    Nu wil ik in een ander kolom alleen de tekens hebben tot het komma teken, dus:


    [ code verwijderd ]

    Hoe doe ik dit
    Als er echt altijd een komma na het adres komt, dan is dit volgens mij het handigst:

    =LINKS(A1;VIND.SPEC(",";A1)-1)
      vrijdag 26 januari 2007 @ 12:29:07 #145
    107951 JortK
    Immer kwaliteitsposts
    pi_45691950
    quote:
    Op vrijdag 26 januari 2007 12:02 schreef Frollo het volgende:

    [..]

    Als er echt altijd een komma na het adres komt, dan is dit volgens mij het handigst:

    =LINKS(A1;VIND.SPEC(",";A1)-1)
    Werkt als een tiet thanks
    pi_45751134
    Wilde eerst een topic openen maar zag gelukkig deze reeks.

    Ik wil in een simpel excelsheetje het volgende weergeven

    kolom1: naam
    kolom2: mailadres
    kolom3: text: "op mailinglijst"

    kolom 3 moet die text weergeven indien het mailadres is ingevuld.

    Ik ben aan het proberen met als maar kan niet vinden hoe ik die formule zo moet maken dat hij niet op waarde of text de text erin knalt maar dat hij het bij alle waardes of letters de text in die kolom knalt.

    Wie weet raad?
    Altijd blijven lachen!!
    pi_45754443
    Ik zoek een functie om automatisch de laatste datum van de maand waarin we ons bevinden te tonen.
    Bestaat dit eigenlijk wel?
    pi_45755063
    quote:
    Op zondag 28 januari 2007 13:31 schreef Da_KlouwN het volgende:
    Ik zoek een functie om automatisch de laatste datum van de maand waarin we ons bevinden te tonen.
    Bestaat dit eigenlijk wel?
    quote:
    Dit kun je doen door de functie "LAATSTE.DAG" , maar deze is niet onmiddelijk beschikbaar. Deze extra functies moet je eerst "activeren".
    Ga hiervoor naar Extra> invoegtoepassingen en zet een vinkje voor "analysis toolpak".

    Nu de formule.
    Veronderstel dat in cel A1 de functie "=VANDAAG()" hebt staan (de datum van vandaag) en je wilt de factuur betaald hebben 2 maanden na vandaag gebruik je volgende formule.
    =LAATSTE.DAG(A1;2) .
    ALs je een Engelse Excel gebruikt , noemt de functie =EOMONTH(A1;2)
    LAATSTE.DAG is dus de functie die je kunt gebruiken ipv de engels EOMONTH

    linkje

    Hiervoor heb je dus wel het Analysis Toolpack nodig.
      zondag 28 januari 2007 @ 13:58:17 #149
    85514 ralfie
    !Yvan eht nioj
    pi_45755227
    quote:
    Op zondag 28 januari 2007 13:31 schreef Da_KlouwN het volgende:
    Ik zoek een functie om automatisch de laatste datum van de maand waarin we ons bevinden te tonen.
    Bestaat dit eigenlijk wel? :?
    1=DATUM(JAAR(VANDAAG());MAAND(VANDAAG())+1;0)
    pi_45783032
    quote:
    Op zondag 28 januari 2007 11:20 schreef BattleLies het volgende:
    Wilde eerst een topic openen maar zag gelukkig deze reeks. ^O^

    Ik wil in een simpel excelsheetje het volgende weergeven

    kolom1: naam
    kolom2: mailadres
    kolom3: text: "op mailinglijst"

    kolom 3 moet die text weergeven indien het mailadres is ingevuld.

    Ik ben aan het proberen met als maar kan niet vinden hoe ik die formule zo moet maken dat hij niet op waarde of text de text erin knalt maar dat hij het bij alle waardes of letters de text in die kolom knalt.

    Wie weet raad? :)
    Als in b1 het emailadres wel of niet staat dan doe je in C1 de volgende formule.
    1=als(b1="";"";"op mailingslijst")
    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
    abonnement Unibet Coolblue Bitvavo
    Forum Opties
    Forumhop:
    Hop naar:
    (afkorting, bv 'KLB')