DIG Digital Corner
Alles wat je altijd al over computers, hardware, software, internet en elektronische gadgets had willen weten, maar niet op Tweakers.net durft te vragen.
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)
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)
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?
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?
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.
[b]Laatste wedstrijd:[/b] FC Timişoara. [b]Volgende:[/b] ADO Den Haag.
Ray's Statshoekje - 2009/2010.
/offtopicquote:Op donderdag 11 januari 2007 09:24 schreef RayMania het volgende:
Handig topic, heb zelf ook af en toe wat vragen over Excel.
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
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 ]
[ Bericht 7% gewijzigd door Frollo op 11-01-2007 12:17:03 ]
Kan best met voorwaardelijke opmaak hoor. Alleen moet je dan bij het opgeven van de voorwaarde niet 'Celwaarde is' maar 'Formule is' opgeven.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?
Ik zal ff een plaatje maken, brb.
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.
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.
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.
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) ]
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 | ' ' 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
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
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?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.
juistquote: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?
"waardes "
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
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
Excel is oke. tvp
<a href="https://www.youtube.com/watch?v=yIl_jGh-LWE" target="_blank" rel="nofollow">Afleidingsmanoeuvre</a>
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.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...
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
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
Dank, ik ga hier 's ff naar kijkenquote: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 integerquote: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
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
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 | '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
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Ik weet niet veel van Excel. Wel genoeg om simpele vragen te beantwoorden. En moeilijke vragen kan ik hier dan mooi kwijt.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!
Vows are spoken to be broken
Feelings are intense, words are trivial
Pleasures remain, so does the pain
Words are meaningless and forgettable
Feelings are intense, words are trivial
Pleasures remain, so does the pain
Words are meaningless and forgettable
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
Oftewel TVP, weet ook redelijk wat van Excel
Het lijkt wel vrijdag op me werk en dit soort vraagjes zijn handig om mijn VB skills af en toe te testen.quote:
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
MOet ik nou nog wat aanpassen in die macro? Want zo werktie nietquote: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]
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
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.
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
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
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?
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!!!
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
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
Thnx,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.
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
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
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
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
Deetch,
Als ik ipv de tekst kleur het veld wil laten kleuren? kwestie van aanpassing van de kleurcode ?
Als ik ipv de tekst kleur het veld wil laten kleuren? kwestie van aanpassing van de kleurcode ?
je moet de code
vervangen door
de colorindexwaarde is alleen voor de kleur zelf
| 1 |
vervangen door
| 1 2 3 4 | .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
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
Nee dit varieert dus blijft handmatigquote: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.
Jammer maar bedankt
Shuffle up and deal!!!
Dat denk ik wel, met database programma's ben je iets flexibeler in dit soort zaken maar daar weet ik niet zoveel van af.quote:Op donderdag 11 januari 2007 15:47 schreef mirelia het volgende:
[..]
Nee dit varieert dus blijft handmatig
Jammer maar bedankt
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Ik 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.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 ben even knutselen, momentje.
Brutalen hebben de halve wereld; doe mij die andere helft dan maar
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
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
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??
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!!!
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.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??
Brutalen hebben de halve wereld; doe mij die andere helft dan maar
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.
Ja en dat word waarschijnlijk moeilijkquote: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.
Shuffle up and deal!!!
nieuwe kolom met volgende formule maken. uitgegaan van cel G1 als datum en cel F1 als factuurnummerquote: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??
=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
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
Het is de leeftijd moet je maar denkenquote:Op vrijdag 12 januari 2007 08:50 schreef realbase het volgende:
goh.. al jaren op fok.. en pas mn eerste nuttige topic
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
=100000*REST(JAAR(G1)/100)+1000*MAAND(G1)+F1quote: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
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
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)
=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
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
Niet nodig. Dit kun je opvangen door de celeigenschappen aan te passen (zie het screenshot eerder in dit topic)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)
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
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 ]
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!!!
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!!
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
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
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!!!
Beste mensen,
Ik had hier: [Excel] HELP, hoe zet ik dit in VB? een topic geopend, kan iemand mij hiermee helpen?
Ik had hier: [Excel] HELP, hoe zet ik dit in VB? een topic geopend, kan iemand mij hiermee helpen?
In me Burberry......
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
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
Hoe zorg ik er voor dat in Excel de getallen die ik typ altijd 3 tekens hebben?
voorbeeld:
01
02
03
==
14
15
etc...
voorbeeld:
01
02
03
==
14
15
etc...
Zijn dat er geen 2??
Volgens mij doe je dat met getal-> aangepast--> 000
Maar ik ben ook een redelijke leek
Volgens mij doe je dat met getal-> aangepast--> 000
Maar ik ben ook een redelijke leek
Shuffle up and deal!!!
Ik te
Een aangepaste getalnotatie maken met het aantal cijfers dat je wilt, bijvoorbeeld '00' of '000'.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...
Het moet zo worden:
De witte vlakken die ik gemaakt heb, daar moet de tekst staan die in het andere topic staan.
De witte vlakken die ik gemaakt heb, daar moet de tekst staan die in het andere topic staan.
In me Burberry......
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.
http://www.accountingweb.nl/cgi-bin/item.cgi?id=84613&d=101quote: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...
Never in the entire history of calming down did anyone ever calm down after being told to calm down.
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
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
das toch gewoon "plakken speciaal" in Word en dan "als figuur", of bedoel je meerdere tabbladen ?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.
proberen is de eerste stap naar falen
een cafe zonder Hazes, is geen kroeg
een cafe zonder Hazes, is geen kroeg
menu opmaak->voorwaardelijke opmaakquote: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
gebruik wijst zichzelf
Geluktquote:Op zondag 14 januari 2007 19:09 schreef ralfie het volgende:
[..]
menu opmaak->voorwaardelijke opmaak
gebruik wijst zichzelf
Nee, gewoon 1 tabblad, maar ik was aan het klooien met 'Insert - File'. Maar dit zal het wel zijn dan, bedankt.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 ?
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).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.
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
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
Ik 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
De rest moet je zelf maar uitzoeken met de help functie die in visual basic zit tenzij je nog gerichte vragen hebt.
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 | 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
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
Maak in het formulier een initialize functie
deze wordt uigevoerd zodra je het formulier laadt
| 1 2 3 4 | TextBox1.Value = Sheet1.Range("A1") 'etc... End Sub |
deze wordt uigevoerd zodra je het formulier laadt
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??
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??
Anyone??
Contemnunt spinam cum rosae deliberant
=ALS(B3>DATUM(1947,12,31),"ja","nee")
Komma's ipv puntkomma's dus ook. In de Engelse versie tenminste wel.
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.
@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:
die andere functie moet je nog "" om ja en nee zetten, aldus
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
EDIT: of wat arcee zegt
@meeldraad: dat kan niet in een keer, wel met een tussencel
Als je de datum in cel C9 invoert:
| 1 |
die andere functie moet je nog "" om ja en nee zetten, aldus
| 1 |
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 |
EDIT: of wat arcee zegt
Nederlandse versies.
Never in the entire history of calming down did anyone ever calm down after being told to calm down.
ach, 't was gratisquote:Op dinsdag 16 januari 2007 21:18 schreef Arcee het volgende:
Nederlandse versies.
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...
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
=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.
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.
Dat moet dd-mm-jjjj zijn, niet die nullen.quote:Op dinsdag 16 januari 2007 22:02 schreef Meeldraad het volgende:
Oké, via Celeigenschappen => aangepast => 00-00-0000
Never in the entire history of calming down did anyone ever calm down after being told to calm down.
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 =>
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 =>
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...
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 |
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 |
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
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 ]
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.
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.
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.
Hij wil het juist zonder streepjes invoeren, ik denk dat daar het probleem zit.quote:Op woensdag 17 januari 2007 01:26 schreef Arcee het volgende:
Of wil je het per se ook met streepjes in kunnen voeren?
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?
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.
=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
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
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.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.
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?
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)
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
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
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.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?
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
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
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
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
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
Wat lief van MS!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.
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.
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: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.
Zo, da's handig!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
een andere mogelijkheid is via een worksheet_onchange macro. wordt wel wat makkelijker om niet legale datums in te voeren
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
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | 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 |
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
Ja, daarom zei ik ook voer 't als datum in: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?
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.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.
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.
@ 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:
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)
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 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
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.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.
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.
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.
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.
Wat je kunt zien als ik op zo'n cel sta:quote:Op woensdag 17 januari 2007 13:25 schreef Arcee het volgende:
Datums zijn als datum ingevoerd en worden correct met streepjes afgebeeld.
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.
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.
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
Dan was dit toch gewoon goed?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).
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.
