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.
@ 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?
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
Waar heb je die datums die je invoert dan allemaal al staan?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.
Daar maak je dan weer een aparte ALS voor. In jouw Nederlandse versie zou dat dan zo moeten worden:quote:Het invoeren van een datum mét streepjes leidt tot foute waarden.
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.
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
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 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!
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......
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
Als je naar de bovenste cel met een waarde wilt gaan kun je deze macro gebruiken
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 | 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 | 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
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
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 | 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
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
ja, de cel geeft het nu als tekst weer. Om met deze tekst als datum te werken, moet je de functie DATUMWAARDE gebruiken, bijvquote: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?
| 1 |
@ 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.
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
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?
Ze staan allemaal op tekst, dus daar ligt het niet aan. Ik zal het wel verkeerd genoteerd hebben... help?
Contemnunt spinam cum rosae deliberant
* 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
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
Zie m'n profiel. Je hebt zo te zien je PM niet geactiveerd.quote:Op donderdag 18 januari 2007 12:01 schreef Meeldraad het volgende:
PM maar een mailadres bij belangstelling.
Never in the entire history of calming down did anyone ever calm down after being told to calm down.
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: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)
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | 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 |
[ Bericht 6% gewijzigd door ralfie op 18-01-2007 16:46:38 ]
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.
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
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
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
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 | ' 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 | ' ' 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
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 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
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
| 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 | 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 |
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) ]
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..
Het moet niet mooi zijn, het moet functioneel zijn!
Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
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.
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
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
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
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..
Het moet niet mooi zijn, het moet functioneel zijn!
Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
Hehe, ik slaap in het weekend. Maar Ralfie is een betere coder dan ik en die heeft op zondag niets te doen zo te zienquote:Op zondag 21 januari 2007 00:32 schreef realbase het volgende:
Deetch need your help again
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
@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.
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
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 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 ]
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
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
[ 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..
Het moet niet mooi zijn, het moet functioneel zijn!
Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
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
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
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)
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..
Het moet niet mooi zijn, het moet functioneel zijn!
Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
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.
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
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
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..
Het moet niet mooi zijn, het moet functioneel zijn!
Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
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
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
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
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..
Het moet niet mooi zijn, het moet functioneel zijn!
Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
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)
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..
Het moet niet mooi zijn, het moet functioneel zijn!
Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
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!
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!
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.
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
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
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..
Het moet niet mooi zijn, het moet functioneel zijn!
Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
OK, maar als ik nou tekst van het getal maak met TEKST()? Dan kan ik in elk geval wel de notatie veranderen. Bijvoorbeeld: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.
="Het is vandaag "&TEKST(VANDAAG();"d mmmm")
Dus ik vroeg me af of je er dan ook opmaak aan kunt meegeven.
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
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
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:
dan staat in de actieve cel alleen een tekststring met gewenste layout.
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | 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
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
♫♪We zijn hier op de wereld om mekaar♪♫
♫♪om mekaar, om mekaar, om mekaar♪♫
♫♪te helpen niet waar♪♫
muzikaal kickje
♫♪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
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 heb zelf hulp nodig :)
ik heb een kolom met de volgende informatie:
Nu wil ik in een ander kolom alleen de tekens hebben tot het komma teken, dus:
Hoe doe ik dit :)
ik heb een kolom met de volgende informatie:
| 1 |
Nu wil ik in een ander kolom alleen de tekens hebben tot het komma teken, dus:
| 1 |
Hoe doe ik dit :)
Als er echt altijd een komma na het adres komt, dan is dit volgens mij het handigst: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
=LINKS(A1;VIND.SPEC(",";A1)-1)
Werkt als een tiet thanksquote: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)
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?
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!!
Ik zoek een functie om automatisch de laatste datum van de maand waarin we ons bevinden te tonen.
Bestaat dit eigenlijk wel?
Bestaat dit eigenlijk wel?
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?
LAATSTE.DAG is dus de functie die je kunt gebruiken ipv de engels EOMONTHquote: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)
linkje
Hiervoor heb je dus wel het Analysis Toolpack nodig.
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 |
Als in b1 het emailadres wel of niet staat dan doe je in C1 de volgende formule.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? :)
| 1 |
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
wow daar was ik niet opgekomen. ik had een vergelijking gemaakt met een leeg vakje en dan tekst aan waar geplakt. werkte ook maar was wel omweg. Ik zocht me kwijt naar de directe formule maar kon niks bedenken voor: " indien ingevuld"quote:Op maandag 29 januari 2007 10:25 schreef Deetch het volgende:
[..]
Als in b1 het emailadres wel of niet staat dan doe je in C1 de volgende formule.
[ code verwijderd ]
Bedankt joh ! Superr...
Altijd blijven lachen!!
Vraagje;
ik heb een lijst, 1 kolom.. met in enkele cellen getallen. bv; ( een '.' is leeg)
1
5
6
.
7
.
8
.
3
10
.
Nu wil ik dat ie alleen de eerste 4 bij elkaar op telt.. Ik heb nuz oiets;
For varcounter = 1 To 4
Waarde = ActiveCell.Value
Waarde_totaal = Waarde + ActiveCell.Value
ActiveCell.Offset(1, 0).Activate
Next
En dat totaal van die 4, wil ik helemaal onderaan vermelden.. en dan de volgtende 6 pakken.. en daarvan het toaal weer onderaan vermelden.
Ik kan er allene niet opkomen hoe t anders zou moeten, iemand ideeen?
ik heb een lijst, 1 kolom.. met in enkele cellen getallen. bv; ( een '.' is leeg)
1
5
6
.
7
.
8
.
3
10
.
Nu wil ik dat ie alleen de eerste 4 bij elkaar op telt.. Ik heb nuz oiets;
For varcounter = 1 To 4
Waarde = ActiveCell.Value
Waarde_totaal = Waarde + ActiveCell.Value
ActiveCell.Offset(1, 0).Activate
Next
En dat totaal van die 4, wil ik helemaal onderaan vermelden.. en dan de volgtende 6 pakken.. en daarvan het toaal weer onderaan vermelden.
Ik kan er allene niet opkomen hoe t anders zou moeten, iemand ideeen?
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..
Het moet niet mooi zijn, het moet functioneel zijn!
Verliefdheid is een uitvinding voor mensen zonder geld zodat ze gratis seks kunnen hebben..
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | Selection.End(xlUp).Select ActiveCell.Offset(1, 0).Value = "------" eindrij = ActiveCell.Row Range("a1").Select Do waarde = 0 Do Until ActiveCell.Value = "------" Or ActiveCell.Value = "" waarde = waarde + ActiveCell.Value ActiveCell.Offset(1, 0).Select Loop tussenrij = ActiveCell.Row Range("A65536").Select Selection.End(xlUp).Select ActiveCell.Offset(1, 0).Select ActiveCell.Value = waarde Range("A" & tussenrij + 1).Select Loop Until tussenrij > eindrij |
[ Bericht 5% gewijzigd door Deetch op 01-02-2007 15:16:14 (code werkend gemaakt) ]
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
