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.
ik heb een vraag ik heb een veld, zeg maar B54
en ik heb velden E2 tot en met E25
nu wil ik in G2 tot en met G25
dat ie steeds aftrekking maakt
dus G2= B54-E2
G3= B54-E3
maar hoe kan ik dat in een keer doen, zonder dat ik steeds in dat G veld die formule hoef in te toetsen?
en ik heb velden E2 tot en met E25
nu wil ik in G2 tot en met G25
dat ie steeds aftrekking maakt
dus G2= B54-E2
G3= B54-E3
maar hoe kan ik dat in een keer doen, zonder dat ik steeds in dat G veld die formule hoef in te toetsen?
The Older I Get, The Better I Was
Invullen in G2:
=$B$54-E2
En dan doortrekken dmv het zwarte vierkantje rechtsonderin de cel als je G2 geselecteerd hebt.
De dollartekens zorgen ervoor dat het nummer (en de kolom) niet aanpassen als je hem sleept.
Btw goeie nick
=$B$54-E2
En dan doortrekken dmv het zwarte vierkantje rechtsonderin de cel als je G2 geselecteerd hebt.
De dollartekens zorgen ervoor dat het nummer (en de kolom) niet aanpassen als je hem sleept.
Btw goeie nick
Thanksquote:Op vrijdag 9 april 2010 13:50 schreef DaFan het volgende:
Invullen in G2:
=$B$54-E2
En dan doortrekken dmv het zwarte vierkantje rechtsonderin de cel als je G2 geselecteerd hebt.
De dollartekens zorgen ervoor dat het nummer (en de kolom) niet aanpassen als je hem sleept.
Btw goeie nick
The Older I Get, The Better I Was
Met die filter niet. Ik wil dus kunnen filteren en countif functie gebruiken.quote:Op vrijdag 9 april 2010 13:16 schreef DaFan het volgende:
Is het nog gelukt dan uberhaupt met je filter ed Che_?
[ Bericht 11% gewijzigd door Che_ op 10-04-2010 15:03:23 ]
Dat tellen in 1 cel is al opgelost.quote:Op donderdag 8 april 2010 11:31 schreef Deetch het volgende:
[..]
Nee maar jij veranderd de manier waarop je de data in je cel hebt staan steeds en verwacht dan dat wij elke keer weer een oplossing bedenken. Verder pas je formules aan zonder even de help van excel te raadplegen en dan ben je verbaasd dat hij het niet doet.
De beste tip die we je voor dit probleem kunnen geven is: zorg dat je data gewoon in losse cellen staat
Hieronder de handleiding (is trouwens voor excel 2007 engels)
Selecteer de kolom
Kies text to columns (data menu)
Kies delimited en dan next
Vink other aan en selecteer invoer veld erachter
hou ALT ingedrukt en toets 010 in op je numerieke deel van je toetsenbord, laat vervolgens ALT los
Klik op finish
Kijk dan eens naar de subtotaal-functie icm het fliter.quote:Op zaterdag 10 april 2010 14:56 schreef Che_ het volgende:
[..]
Met die filter niet. Ik wil dus kunnen filteren en countif functie gebruiken.
Als je alleen de data uit januari ofzo wilt zien (ik noem maar wat), dan pakt subtotaal() automatisch de juiste data erbij!
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
[i]What would life be like without rhethorical questions?[/i]
Ik heb weer eens iets hoor 
probeer een sheet te maken om hypotheek kosten/rente ed uit te rekenen. (ik weet dat deze ook op internet staan maar wil het zelf doen
)
Nu heb ik een paar cellen waar ik algemene info invul als looptijd, koopsom ed. Hoe krijg ik het voor elkaar dat excel afhankelijk van de looptijd een aantal cellen invult.
Dus als ik looptijd 15 invul. Dat hij 15 cellen onder elkaar zet (met in die cellen een formule van me).
probeer een sheet te maken om hypotheek kosten/rente ed uit te rekenen. (ik weet dat deze ook op internet staan maar wil het zelf doen
)Nu heb ik een paar cellen waar ik algemene info invul als looptijd, koopsom ed. Hoe krijg ik het voor elkaar dat excel afhankelijk van de looptijd een aantal cellen invult.
Dus als ik looptijd 15 invul. Dat hij 15 cellen onder elkaar zet (met in die cellen een formule van me).
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
Ik ga even uit van de annuiteiten-hypotheek. Een vast bedrag per periode (in dit geval jaar) van rente en aflossing.quote:Op zaterdag 10 april 2010 20:23 schreef znarch het volgende:
Ik heb weer eens iets hoor
probeer een sheet te maken om hypotheek kosten/rente ed uit te rekenen. (ik weet dat deze ook op internet staan maar wil het zelf doen
Nu heb ik een paar cellen waar ik algemene info invul als looptijd, koopsom ed. Hoe krijg ik het voor elkaar dat excel afhankelijk van de looptijd een aantal cellen invult.
Dus als ik looptijd 15 invul. Dat hij 15 cellen onder elkaar zet (met in die cellen een formule van me).
Zet in A1:Rente
Zet in A2:Looptijd
Zet in A3: Som
Zet in B1: 5
Zet in B2: 30
Zet in C2: 200000
Zet in D1: Annuiteit
Zet in E1: +(B3*B1/100*(1+B1/100)^B2)/((1+B1/100)^B2-1)
(Da's de formule voor annuiteit)
Zet in B8 t/m F8:Begin Annuiteit Rente Aflossing Eind
A9 t/m A100: 1 t/m 100
B9: +B3
C9: +E1
D9: +$B$1/100*B9
E9: +C9-D9
F9: +B9-E9
B10: F9
C10: C9
D10: +$B$1/100*B10
E10: +C10-D10
F10: +B10-E10
B10 t/m F10 kun je copieren naar beneden.
Het probleem is wel dat ie ook de gegevens laat zien na de laatste looptijd. Met allemaal negatieve getallen. Dit kun je tackelen met iets van "Als a zoveel hoger is dan "looptijd" dan moet de cel "" worden of zoiets". Maar dat vond ik nu iets te veel gedoe.
Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.
Ik denk eerder dat ie doelt op een macro die 15 cellen vult met 15 formules als cel A1 bv 'hypotheek' is.
Dat wordt een Worksheet_Change
Dat wordt een Worksheet_Change
Of in A10:A40 1 t/m/ 30 neerzetten en in B10:B30 de volgende formule:
(in A1 staat je looptijd in jaren)
=ALS(OF(A10>$A$1;A10=$A$1);FORMULE;"")
En dat dus doortrekken naar beneden
(in A1 staat je looptijd in jaren)
=ALS(OF(A10>$A$1;A10=$A$1);FORMULE;"")
En dat dus doortrekken naar beneden
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
[i]What would life be like without rhethorical questions?[/i]
Wat Twentse Ros bedoelt had ik zelf al ja, dan krijg je inderdaad negatieve getallen.
Ik zoek dus echt iets waarbij als ik bij looptijd 10 of 15 invul dat hij maar 15 cellen in een kolom nummert. (heb zelf al wel een idee voor de kolomnummering dus dat komt wel goed)
Ik zoek dus echt iets waarbij als ik bij looptijd 10 of 15 invul dat hij maar 15 cellen in een kolom nummert. (heb zelf al wel een idee voor de kolomnummering dus dat komt wel goed)
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
Je kunt ook met verschillende werkbladen werken. Blad1 geeft de ruwe versie. Blad2 refereert naar Blad1 en via een Als-statement wordt ie leeg (als de looptijd te hoog is) en anders laat ie het bedrag uit Blad1 zien.quote:Op zondag 11 april 2010 12:48 schreef znarch het volgende:
Wat Twentse Ros bedoelt had ik zelf al ja, dan krijg je inderdaad negatieve getallen.
Ik zoek dus echt iets waarbij als ik bij looptijd 10 of 15 invul dat hij maar 15 cellen in een kolom nummert. (heb zelf al wel een idee voor de kolomnummering dus dat komt wel goed)
Je kunt beter één kaars opsteken dan duizend maal de duisternis vervloeken.
Toevoeging op mn laatste post:
A10:A30 wordt dit:
A10: =ALS(OF(1>$A$1;1=$A$1);1;"")
A11: =ALS(OF(A10+1>$A$1;A10+1=$A$1;A10+1;"")
A12: =ALS(OF(A11+1>$A$1;A11+1=$A$1;A11+1;"")
Etc..
Dan wordt B10:B30 dit:
=ALS(ISGETAL(A10);FORMULE;"")
A10:A30 wordt dit:
A10: =ALS(OF(1>$A$1;1=$A$1);1;"")
A11: =ALS(OF(A10+1>$A$1;A10+1=$A$1;A10+1;"")
A12: =ALS(OF(A11+1>$A$1;A11+1=$A$1;A11+1;"")
Etc..
Dan wordt B10:B30 dit:
=ALS(ISGETAL(A10);FORMULE;"")
It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
[i]What would life be like without rhethorical questions?[/i]
Dit is idd wat ik bedoel denk ik. Als ik 15 invul dat hij 15 cellen (x 12 aangezien ik het per maand wil) vullen met een formule of ed. Is dat erg ingewikkeld?quote:
Ik denk eerder dat ie doelt op een macro die 15 cellen vult met 15 formules als cel A1 bv 'hypotheek' is.
Dat wordt een Worksheet_Change
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
Druk Alt-F11, dubbelklik op Worksheet1 en plak het volgende:quote:Op zondag 11 april 2010 14:25 schreef znarch het volgende:
[..]
Dit is idd wat ik bedoel denk ik. Als ik 15 invul dat hij 15 cellen (x 12 aangezien ik het per maand wil) vullen met een formule of ed. Is dat erg ingewikkeld?
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | If Not Intersect(Target, Range("a1")) Is Nothing Then If Target.Value = "Hypotheek" Then Range("A2").Value = "Hier formule1" Range("A3").Value = "Hier formule2" Range("A4").Value = "etc." End If If Target.Value = "Tweede mogelijkheid" Then Range("A2").Value = "Hier formule3" Range("A3").Value = "Hier formule4" Range("A4").Value = "etc." End If End If End Sub |
De rest kan je zelf even uitzoeken. Als je er niet uitkomt horen we het wel. Hij is iig prima uitbreidbaar en aanpasbaar, als je een klein beetje code kan lezen stelt dit niet zoveel voor.
Edit:
Waarschijnlijk is het makkelijker trouwens om .Formula te gebruiken ipv .Value !!
Succes.
Okej, dat kan wel maar heb iets handigers denk ik, stel dat ik namenlijk voor 30 jaar de mogenlijkheid wil hebben kost dat veel moeite op jouw manier (of lijkt dat).
Nu doe ik het dat als de resterende aflossing 0 is dat hij dan gewoon stopt. Werkt ook :p
Nu doe ik het dat als de resterende aflossing 0 is dat hij dan gewoon stopt. Werkt ook :p
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
Het enige dat mijn macro doet is 15 formules op je sheet zetten als je een bepaalde tekst in A1 neerzet. Meer niet.
Wat je nu precies bedoelt snap ik echt niks van
Ik ben niet zon held met hypotheken en shit.
Wat je nu precies bedoelt snap ik echt niks van
Ik ben niet zon held met hypotheken en shit.
Als je een hypotheek afbetaald eindig je ooit met een schuld van 0 (hoop je). Dus excel kijkt steeds hoe hoog je eindbedrag is. Als hij 0 is stop hij met het "maken" betaaltermijnen.quote:
Het enige dat mijn macro doet is 15 formules op je sheet zetten als je een bepaalde tekst in A1 neerzet. Meer niet.
Wat je nu precies bedoelt snap ik echt niks van
Ik ben niet zon held met hypotheken en shit.
Zo duidelijk?
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
Ik heb ook weer een vastloper in mijn Excel/word kennis. Het betreft een Word document van 1 pagina dat een Excel formulier bevat. Nu wil ik van dit document 2 pagina`s maken waarvan de tweede pagina een watermerk bevat met de tekst “kopie” en verder exact hetzelfde is als pagina 1. Pagina afhankelijk watermerk is me gelukt. De pagina bevat Word tekst en natuurlijk die Excel tabel en die moet gekopieerd worden op pagina 2. Oftewel de template en de inhoud met mee over genomen worden uit pagina 1.
Niet echt een pure excel vraag maar toch.
Niet echt een pure excel vraag maar toch.
Het is eigenlijk 1 formule die steeds in de rij erboven kijkt of de resterende schuld 0 is. Zo ja dan maakt hij geen nieuwe rij onderaan. Zo nee dan voegt hij 1 rij toe.quote:
Zijn die 15 formules (als het er 15 zijn) dan altijd hetzelfde?
Dan is het wel prima te doen..
Die formule heb ik gewoon gekopieerd
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
Misschien een hele domme vraag maar hoe selecteer ik 10.000 regels in 1x. Met ctrl shift end kan ik wel alle inhoud selecteren maar is er ook een manier waarop je alle regels kunt selecteren en dan in 1x die regels kunt verwijderen?
Ctrl-G
"1:10000"
znarch: Ik kan niet echt verder voor ik wat data zie, want het wordt niet veel duidelijker ... sorry
jpjedi;
Gewoon nog eens het formulier maken ?
Je kan wel op meerdere plekken hetzelfde veld oproepen.
"1:10000"
znarch: Ik kan niet echt verder voor ik wat data zie, want het wordt niet veel duidelijker ... sorry
jpjedi;
Gewoon nog eens het formulier maken ?
Je kan wel op meerdere plekken hetzelfde veld oproepen.
http://www.megaupload.com/?d=KA59XD9Yquote:Op dinsdag 13 april 2010 09:03 schreef DaFan het volgende:
znarch: Ik kan niet echt verder voor ik wat data zie, want het wordt niet veel duidelijker ... sorry
Speciaal voor jou
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
Nog een laatste keer proberen op de nieuwe pagina:
Ik moet een excel file op de volgende manier exporteren naar CSV:
Maar mijn excel doet het zo:
Ik heb al een aanpassing gedaan aan de separator via taal opties (lokaal) en in de opties van Excel maar helaas zonder succes. Windows 7, MS Office 2007. Iemand hier een oplossing voor?
Ik moet een excel file op de volgende manier exporteren naar CSV:
| 1 2 | "Waarde column 1","Waarde column 2","Waarde column 3","Waarde column 4" |
Maar mijn excel doet het zo:
| 1 2 | Waarde Column 1;Waarde Column 2;Waarde Column 3;Waarde Column 4;;;;;;;; |
Ik heb al een aanpassing gedaan aan de separator via taal opties (lokaal) en in de opties van Excel maar helaas zonder succes. Windows 7, MS Office 2007. Iemand hier een oplossing voor?
Chris van Nijnatten: "Het gevoel dat NAC iets onmetelijks was, iets Bredaas en iets ongelooflijk moois en warms, zelfs zo mooi en warm dat je er letterlijk voor ten strijde wilde trekken"
Ik heb een soort uitgaven inkomsten bestand aangemaakt.
Ik weet dat er veel mogelijk is, maar weet in dit geval niet hoe.
Ik heb 3 kolommen
Inkomsten/Geplande uitgaven/Impuls uitgaven
Kan ik instellen dat als ik een bedrag invul onder 1 van de lijstjes hij automatisch dekleur krijgt van de kolom dat die staat?
(inkomsten = groen, geplande = oranje , impuls = rood)
?
Ik weet dat er veel mogelijk is, maar weet in dit geval niet hoe.
Ik heb 3 kolommen
Inkomsten/Geplande uitgaven/Impuls uitgaven
Kan ik instellen dat als ik een bedrag invul onder 1 van de lijstjes hij automatisch dekleur krijgt van de kolom dat die staat?
(inkomsten = groen, geplande = oranje , impuls = rood)
?
dat kan met conditional formattin. Dit zit onder je celformat menu.
Vul dan als formule in: <>"" en dan de celkleur aangeven.
Vul dan als formule in: <>"" en dan de celkleur aangeven.
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
Selecteer heel kolom A, ga naar Opmaak, Voorwaardelijke Opmaak.
Kies Celwaarde, Is niet gelijk aan, $Z$24 (of een andere lege cel, hij moet leeg zijn!)
Geef dan een kleurtje mee via Opmaak.
Elke keer als je nu iets in kolom A zet, krijgt ie die kleur mee.
Kies Celwaarde, Is niet gelijk aan, $Z$24 (of een andere lege cel, hij moet leeg zijn!)
Geef dan een kleurtje mee via Opmaak.
Elke keer als je nu iets in kolom A zet, krijgt ie die kleur mee.
Kon het maar...quote:Op donderdag 15 april 2010 10:59 schreef Deetch het volgende:
dat kan met conditional formattin. Dit zit onder je celformat menu.
Vul dan als formule in: <>"" en dan de celkleur aangeven.
<>"" resulteert in "="<>""""
Ik zit vast verkeerdquote:
dat kan met conditional formattin. Dit zit onder je celformat menu.
Vul dan als formule in: <>"" en dan de celkleur aangeven.
| 1 |
Ik heb hier een forum waar redelijk hetzelfde word uitgelegd.
http://www.computing.net/(...)using-if-/12146.html
Maar hoe kom ik bij bij Conditional Formattin, ik heb hem in het nederlands
http://www.computing.net/(...)using-if-/12146.html
Maar hoe kom ik bij bij Conditional Formattin, ik heb hem in het nederlands
Opmaak Voorwaardelijke opmaak.
Groen achter je formule zetten werkt niet, je moet nog ff op Opmaak klikken en dan de kleur kiezen onder Patronen.
Groen achter je formule zetten werkt niet, je moet nog ff op Opmaak klikken en dan de kleur kiezen onder Patronen.
Hij werkt
Niet zoals jij zei, maar gewoon met die voorwaardelijke opmaak.
Dan selecteer je dus die kleuren. en dan de hoogste en laagste kleur hetzelfde.
klik
Cijfers zijn random.
PS Excel is een best wel tof programma
Niet zoals jij zei, maar gewoon met die voorwaardelijke opmaak.
Dan selecteer je dus die kleuren. en dan de hoogste en laagste kleur hetzelfde.
klik
Cijfers zijn random.
PS Excel is een best wel tof programma
Ach ja was een beetje snel met antwoord geven, had eigenlijk geen tijd. Maar gelukkig kom je er zo ook uit.
In office 2007 kun je conditional fromatting ook toepassen op lege cel of niet lege cel, dit zijn dan gewoon voorkeuze opties.
eigenlijk is office 2007 wel een verbetering
In office 2007 kun je conditional fromatting ook toepassen op lege cel of niet lege cel, dit zijn dan gewoon voorkeuze opties.
eigenlijk is office 2007 wel een verbetering
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
Meen je nietquote:Op donderdag 15 april 2010 11:18 schreef DaFan het volgende:
Znarch; ik heb even gekeken maar ik begrijp het nog niet
Haha wat dan?
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
Ik heb een hele reeks met in kolom A data en in kolom c en d verdere info. Nu wil ik in kolom b graag en ja als de datum in kolom a groter is dan 31-1-10 en een nee als de datum in kolom A kleiner of gelijk aan 31-1-10 is. Hoe krijg ik dat voor elkaar?
gebruik excel 2007 NL
gebruik excel 2007 NL
Ik loop hier al een hele tijd naar te zoeken op Google, maar weet niet echtg waar ik naar moet zoeken....
Ik heb een tabel met allerlei data. In deze tabel staat in kolom A een klantnummer. Nu is het een tabel van ruim 20.000 regels dus wil ik de gegevens splitsen. De volgende dingen zou ik automatisch willen zien gebeuren:
Selectie maken zodat alle regels die in kolom E niet eindigen op 31.12.9999 weggegooid worden
Van het restant alleen de regels overhouden die in de combinatie van kolommen F en G niet ouder zijn dan 26 weken na de huidige week. In kolom F staat een weeknummer en in kolom G staat een jaartal.
Per klantnummer een apart tabblad
Iemand een idee of ik dat kan automatiseren?
Ik heb een tabel met allerlei data. In deze tabel staat in kolom A een klantnummer. Nu is het een tabel van ruim 20.000 regels dus wil ik de gegevens splitsen. De volgende dingen zou ik automatisch willen zien gebeuren:
Iemand een idee of ik dat kan automatiseren?
Everything you want is on the other side of fear.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
Ik ben niet onhandelbaar, ik ben gewoon een grote uitdaging.
Probeer dit eens:quote:
Ik heb een hele reeks met in kolom A data en in kolom c en d verdere info. Nu wil ik in kolom b graag en ja als de datum in kolom a groter is dan 31-1-10 en een nee als de datum in kolom A kleiner of gelijk aan 31-1-10 is. Hoe krijg ik dat voor elkaar?
gebruik excel 2007 NL
=IF(A1>DATEVALUE("31-1-2010");Ja;Nee)
A1 wordt dan A2 A3 enz.
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
Klopt, alleen je moet wel aanhalingstekens zetten:quote:
En wat is dat precies in het nederlands?
=ALS(A1>datumwaarde("31-1-2010");Ja;Nee)
zoiets?
=ALS(A1>DATUMWAARDE("31-1-2010");"Ja";"Nee")
dus.
Jep,quote:
En wat is dat precies in het nederlands?
=ALS(A1>datumwaarde("31-1-2010");Ja;Nee)
zoiets?
IF = ALS
DATEVALUE = DATUMWAARDE
"AAAAAHH ZENNE MOAT, WOARST VLEISCH"
Ja dat kun je automatiseren..
Allereerst de datum weggooien:
Allereerst de datum weggooien:
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 | Range("A1").Select blanks = 0 For i = 0 To 25000 If ActiveCell.Offset(i, 0).Value = "" Then blanks = blanks + 1 If blanks > 5 Then Exit Sub If ActiveCell.Offset(i, 4).Value = "31/12/9999" Then ActiveCell.Offset(i, 0).EntireRow.Delete i = i - 1 End If If ActiveCell.Offset(i, 0).Value = "" Then blanks = blanks + 1 If blanks > 5 Then Exit Sub MsgBox i & " " & blanks Next i End Sub |
Supra Groningam Nihil
Postjubilea: 10.000 15.000 20.000 25.000
Sit jou kop in die koei se kont en wag tot die bul jou kom holnaai
Wat niemand je vertelt over de bioindustrie, geen bloed maar feiten
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
De onderste is een CSV (en dat is punt comma seperated).quote:Op dinsdag 13 april 2010 19:17 schreef Superheld het volgende:
Nog een laatste keer proberen op de nieuwe pagina:
Ik moet een excel file op de volgende manier exporteren naar CSV:
[ code verwijderd ]
Maar mijn excel doet het zo:
[ code verwijderd ]
Ik heb al een aanpassing gedaan aan de separator via taal opties (lokaal) en in de opties van Excel maar helaas zonder succes. Windows 7, MS Office 2007. Iemand hier een oplossing voor?
Ik denk dat windows dit controleert op de extensie: doe eens een .txt export met , in de landensettings. Kan zijn dat het dan wel netjes met dubbelquotes gebeurd.
Beatus vir qui suffert tentationem.
PSN Rinzewind en Cadsuana Melaidhrin
Stellar Blade *O* Sea of Stars *O* Trails Daybreak *O*
PSN Rinzewind en Cadsuana Melaidhrin
Stellar Blade *O* Sea of Stars *O* Trails Daybreak *O*
Hier alvast een beginquote:Op donderdag 15 april 2010 13:36 schreef sanger het volgende:
Ik loop hier al een hele tijd naar te zoeken op Google, maar weet niet echtg waar ik naar moet zoeken....
Ik heb een tabel met allerlei data. In deze tabel staat in kolom A een klantnummer. Nu is het een tabel van ruim 20.000 regels dus wil ik de gegevens splitsen. De volgende dingen zou ik automatisch willen zien gebeuren:Selectie maken zodat alle regels die in kolom E niet eindigen op 31.12.9999 weggegooid worden Van het restant alleen de regels overhouden die in de combinatie van kolommen F en G niet ouder zijn dan 26 weken na de huidige week. In kolom F staat een weeknummer en in kolom G staat een jaartal. Per klantnummer een apart tabblad
Iemand een idee of ik dat kan automatiseren?
| 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 | LastRow = Range("A65536").End(xlUp).Row For i = 2 To LastRow LastWTFNummer = Right(Range("E" & i).Value, 10) If LastWTFNummer <> "31.12.9999" Then Rows  .EntireRow.SelectMsgBox "Deze regel wordt verwijderd!!" 'Rows .EntireRow.SelectEnd If Next i LastRow = Range("A65536").End(xlUp).Row For i = 2 To LastRow If (Range("F" & i).Value > (IsoWeekNumber(Now()) + 26)) And Range("G" & i).Value = Year(Now()) Then Rows .EntireRow.SelectMsgBox "Deze regel wordt verwijderd!!" 'Rows .EntireRow.SelectEnd If Next i End Sub Public Function IsoWeekNumber(d1 As Date) As Integer 'Attributed to Daniel Maher Dim d2 As Long d2 = DateSerial(Year(d1 - Weekday(d1 - 1) + 4), 1, 3) IsoWeekNumber = Int((d1 - d2 + Weekday(d2) + 5) / 7) End Function |
Let even op!
- Maak een kopie voor je hem test!!
- Er wordt nu nog alleen een regel gehighlight en een waarschuwing gegeven
- Verander het volgende
| 1 2 3 | .EntireRow.Select MsgBox "Deze regel wordt verwijderd!!" 'Rows .EntireRow.Select |
in
| 1 | .EntireRow.Select |
Dat op verschillende tabbladen zetten kom ik even niet aan toe!
