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.
Als VBA-leek heb ik nu:
Sub Macro2()
'
' Macro2 Macro
'
'
Selection.Copy
ActiveCell.Offset(0, 1).Range("A1").Select
Application.CutCopyMode = False
Selection.Copy
Cells.Replace What:="[begrip]", _
Replacement:= _
"[begrip]", LookAt _
:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
ActiveCell.Offset(1, -1).Range("A1").Select
End Sub
De handelingen kloppen volgens mij, maar in plaats van te zoeken op een specifiek tekstueel begrip moet hij bij Cells.Replace What:= de inhoud van de actieve cel pakken en die bij Replacement:= vervangen door de inhoud van de cel rechts daarvan.
Is dat mogelijk?
Sub Macro2()
'
' Macro2 Macro
'
'
Selection.Copy
ActiveCell.Offset(0, 1).Range("A1").Select
Application.CutCopyMode = False
Selection.Copy
Cells.Replace What:="[begrip]", _
Replacement:= _
"[begrip]", LookAt _
:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
ActiveCell.Offset(1, -1).Range("A1").Select
End Sub
De handelingen kloppen volgens mij, maar in plaats van te zoeken op een specifiek tekstueel begrip moet hij bij Cells.Replace What:= de inhoud van de actieve cel pakken en die bij Replacement:= vervangen door de inhoud van de cel rechts daarvan.
Is dat mogelijk?
als je met find/replace gaat werken moet je er wel zeker van zijn dat de begrippen die je gaat veranderen niet een onderdeel zijn van een ander begrip.
Voorbeeldje om uit te leggen wat ik bedoel:
kolom a: aaa, bee, cee, dee, ee
nu moet het vijfde begrip worden aangepast naar "ee1"
als je dan find/replace doet gaat het mis want je nieuwe begrippen worden dan:
aaa,bee1,cee1,dee1,ee1 terwijl je aaa,bee,cee,dee,ee1 had gewild.
Voorbeeldje om uit te leggen wat ik bedoel:
kolom a: aaa, bee, cee, dee, ee
nu moet het vijfde begrip worden aangepast naar "ee1"
als je dan find/replace doet gaat het mis want je nieuwe begrippen worden dan:
aaa,bee1,cee1,dee1,ee1 terwijl je aaa,bee,cee,dee,ee1 had gewild.
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
Hier alvast een stukje code om door alle cellen in kolom A te stappen en daarbij de tekst in een array te plaatsen.
In plaats van de regel MsgBox moet daar de code komen om te vervangen.
In plaats van de regel MsgBox moet daar de code komen om te vervangen.
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | Sub Fok_Deetch() Dim s() As String Dim i As Integer Range("A2").Select Range(Selection, Selection.End(xlDown)).Select For Each c In Selection.Cells s = Split(c.Value, ";") For i = 0 To UBound(s) MsgBox i & ": " & s(i) Next i Next c 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
Ben bezig met het volgende:
Ik wil graag dat de cel M2 rood wordt als de datum in K2 dichterbij dan 1 dag of overdue is en de tekst in L2 niet op gesloten staat. Als L2 wel op gesloten staat, hoeft M2 namelijk niet rood te worden, ongeacht de datum in K2.
Ik voer de formule in bij Conditional Formatting Rules Manager, dus dan kan ik daar zelf de opmaak kiezen als wordt voldaan aan de voorwaarden in de formule.
Waarom werkt mijn volgende formule niet, ook al schijnen er geen fouten in te zitten?
Ik wil graag dat de cel M2 rood wordt als de datum in K2 dichterbij dan 1 dag of overdue is en de tekst in L2 niet op gesloten staat. Als L2 wel op gesloten staat, hoeft M2 namelijk niet rood te worden, ongeacht de datum in K2.
Ik voer de formule in bij Conditional Formatting Rules Manager, dus dan kan ik daar zelf de opmaak kiezen als wordt voldaan aan de voorwaarden in de formule.
Waarom werkt mijn volgende formule niet, ook al schijnen er geen fouten in te zitten?
| 1 | =IF(AND(K2-TODAY())<1;L2<>"Gesloten") |
Laat maar, heb hem alquote:Op donderdag 29 maart 2012 10:10 schreef Saekerhett het volgende:
Ben bezig met het volgende:
Ik wil graag dat de cel M2 rood wordt als de datum in K2 dichterbij dan 1 dag of overdue is en de tekst in L2 niet op gesloten staat. Als L2 wel op gesloten staat, hoeft M2 namelijk niet rood te worden, ongeacht de datum in K2.
Ik voer de formule in bij Conditional Formatting Rules Manager, dus dan kan ik daar zelf de opmaak kiezen als wordt voldaan aan de voorwaarden in de formule.
Waarom werkt mijn volgende formule niet, ook al schijnen er geen fouten in te zitten?
[ code verwijderd ]
Juiste formule is dit:
| 1 | =IF(AND(TODAY()>=K2);L2<>"Gesloten") |
als je de IF weg laat ben je al een stukje op weg.
verder doet je formatting het niet omdat als K2 voor Today() ligt deze berekening een foutmelding geeft. je kunt nl. geen negatieve datum hebben. Dus de datum moet je omzetten naar een waarde. verder is je berekening verkeerd om.
Probeer AND(VALUE(TODAY()-VALUE(K2))<=1;L2<>"Gesloten") eens
[ Bericht 3% gewijzigd door Deetch op 29-03-2012 10:32:43 ]
verder doet je formatting het niet omdat als K2 voor Today() ligt deze berekening een foutmelding geeft. je kunt nl. geen negatieve datum hebben. Dus de datum moet je omzetten naar een waarde. verder is je berekening verkeerd om.
Probeer AND(VALUE(TODAY()-VALUE(K2))<=1;L2<>"Gesloten") eens
[ Bericht 3% gewijzigd door Deetch op 29-03-2012 10:32:43 ]
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
Die is wel mooier. Maar je hebt hem nog niet helemaal aangezien je ook een melding wil als je nog 1 dag hebt.quote:
[..]
Laat maar, heb hem al
Juiste formule is dit:
[ code verwijderd ]
vervang >= door > en je hebt hem
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
Jep, aangepast, thx!quote:Op donderdag 29 maart 2012 10:31 schreef Deetch het volgende:
[..]
Die is wel mooier. Maar je hebt hem nog niet helemaal aangezien je ook een melding wil als je nog 1 dag hebt.
vervang >= door > en je hebt hem
Beetje irritant garpje van Excel op het moment. Alles wat ik wil kopieren komt meteen als values in clipboard te staan. Je ziet ook (heel kort) dat die stippellijn om een selectie heen komt die je copied, en die verdwijnt dan meteen weer ook.
Hoe zou dit komen? Zit al in algemene settings te prutsen, kan niet vinden.
Heb wel in het verleden geprutst met application.onkey functies, maar dat deed ik maanden terug ook al en toen was dit probleem er niet.....
Help!
Hoe zou dit komen? Zit al in algemene settings te prutsen, kan niet vinden.
Heb wel in het verleden geprutst met application.onkey functies, maar dat deed ik maanden terug ook al en toen was dit probleem er niet.....
Help!
toevoeging: het lijkt overigens een windows issue te zijn. Heb office 2010 en 2003 verwijderd, 2003 weer opnieuw geinstalleerd, en probleem blijft bestaan >.>
Jongens, ik heb weer een mooie! 
Ik weet niet goed hoe ik deze moet zoeken met google maar misschien weet hier iemand wel de oplossing. Ik heb een kolom met een jaarbudget bedrag en een kolom ernaast met de actuele cijfers. De rijen zijn per klant gekoppeld aan een key- account manager.
Nu wil ik het vakje in de kolom actueel cijfer een kleur geven op basis van de relatie tot het budget:
Groen: op budget
geel: 90-99% van budget
Oranje: 75-90% va budget
Rood: <75% van budget
Echter de uitdaging is dat dit ook nog in verhouding moet worden gesteld tot de voortgang van het jaar, voorbeeld: eind juli actueel op 50% van het budget is groen, eind Augustus 50% van het jaarbudget is dan oranje.
Is er iemand die me op weg kan helpen?
Ik weet niet goed hoe ik deze moet zoeken met google maar misschien weet hier iemand wel de oplossing. Ik heb een kolom met een jaarbudget bedrag en een kolom ernaast met de actuele cijfers. De rijen zijn per klant gekoppeld aan een key- account manager.
Nu wil ik het vakje in de kolom actueel cijfer een kleur geven op basis van de relatie tot het budget:
Groen: op budget
geel: 90-99% van budget
Oranje: 75-90% va budget
Rood: <75% van budget
Echter de uitdaging is dat dit ook nog in verhouding moet worden gesteld tot de voortgang van het jaar, voorbeeld: eind juli actueel op 50% van het budget is groen, eind Augustus 50% van het jaarbudget is dan oranje.
Is er iemand die me op weg kan helpen?
Met onderstaande formule bereken je de voortgang van het jaar.
=Today()-DATE(YEAR(TODAY()),1,0)
procentueel: =(Today()-DATE(YEAR(TODAY()),1,0))/365
als je nu je voortgang vermenigvuldigd met je procentuele voortgang van je jaar kun je die formule in je voorwaardelijke opmaak gebruiken.
=Today()-DATE(YEAR(TODAY()),1,0)
procentueel: =(Today()-DATE(YEAR(TODAY()),1,0))/365
als je nu je voortgang vermenigvuldigd met je procentuele voortgang van je jaar kun je die formule in je voorwaardelijke opmaak 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
Hoi Fokkers,
Ik weet niet hoe het hier precies werkt, moet je op je beurt wachten om je vraag te stellen? Ik wil niet voorkruipen voor jpjedi!
Maar toch hier mijn vraag:
Ik weet niet hoe het hier precies werkt, moet je op je beurt wachten om je vraag te stellen? Ik wil niet voorkruipen voor jpjedi!
Maar toch hier mijn vraag:
SPOILEROm spoilers te kunnen lezen moet je zijn ingelogd. Je moet je daarvoor eerst gratis Registreren. Ook kun je spoilers niet lezen als je een ban hebt.Hopelijk heeft iemand een idee. Googlen op voorwaardelijke formules hielp (nog) niets. Ik weet ook niet zeker of er een dergelijke formule bestaat.
Bedankt alvast voor het meedenken.Nederlander in München, met voorliefde voor Taiwan en auti's gonna aut.
quote:
Hoi Fokkers,
Ik weet niet hoe het hier precies werkt, moet je op je beurt wachten om je vraag te stellen? Ik wil niet voorkruipen voor jpjedi!
Maar toch hier mijn vraag:extra kolom aanmaken tussen 3 en 4. Je krijgt dan dus kolom C, D en E.SPOILEROm spoilers te kunnen lezen moet je zijn ingelogd. Je moet je daarvoor eerst gratis Registreren. Ook kun je spoilers niet lezen als je een ban hebt.Hopelijk heeft iemand een idee. Googlen op voorwaardelijke formules hielp (nog) niets. Ik weet ook niet zeker of er een dergelijke formule bestaat.
Bedankt alvast voor het meedenken.
in D1: =als(C1>=E1;E1;C1) en dat doortrekken naar beneden.It's Time To Shine
[i]What would life be like without rhethorical questions?[/i]
quote:
Hoi Fokkers,
Ik weet niet hoe het hier precies werkt, moet je op je beurt wachten om je vraag te stellen? Ik wil niet voorkruipen voor jpjedi!
Maar toch hier mijn vraag:Tja eigenlijk moet je wel op je beurt wachtenSPOILEROm spoilers te kunnen lezen moet je zijn ingelogd. Je moet je daarvoor eerst gratis Registreren. Ook kun je spoilers niet lezen als je een ban hebt.Hopelijk heeft iemand een idee. Googlen op voorwaardelijke formules hielp (nog) niets. Ik weet ook niet zeker of er een dergelijke formule bestaat.
Bedankt alvast voor het meedenken.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
Superbedankt qu63!!! Dit werkt! Als eerder had bedacht dit hier te vragen had ik me denk ik zo'n 2 uur per dag gespaard deze week.quote:
[..]
extra kolom aanmaken tussen 3 en 4. Je krijgt dan dus kolom C, D en E.
in D1: =als(C1>=E1;E1;C1) en dat doortrekken naar beneden.
Sorry Deetch! Bedankt dat ik even voor mocht!
Nederlander in München, met voorliefde voor Taiwan en auti's gonna aut.
Even een vraagje van iets wat ik eigenlijk nooit gedaan heb. Ik krijg een flinke lijst spreadsheets door die ik "even moet verwerken". Ik vraag me af of er een snelle manier is om deze bij elkaar te voegen.
Het gaat om omzetten per vestiging, die elke maand in een nieuw bestand zijn gezet, waarbij niet iedere vestiging iedere maand een omzet heeft. Voorbeeld:
Bestand: Totalen
Bestand: Januari
Bestand: Februari
Nu vraag ik me dus af of Excel de bestanden van alle maanden kan "lezen" en automatisch de naam van de vestiging en de bijbehorende omzet in een goede kolom van het bestand "totalen" importeert.
Het gaat om totaal zo'n 30 maanden (dus 30 bestanden) met een groot aantal vestigingen, dus handmatig is het behoorlijk veel werk.
Het gaat om omzetten per vestiging, die elke maand in een nieuw bestand zijn gezet, waarbij niet iedere vestiging iedere maand een omzet heeft. Voorbeeld:
Bestand: Totalen
| 1 2 3 4 5 6 7 8 | Vestiging 1 - ¤200 Vestiging 2 - ¤200 Vestiging 3 - ¤200 Vestiging 4 - ¤200 Vestiging 5 - ¤200 Vestiging 6 - ¤200 Vestiging 7 - ¤200 Vestiging 8 - ¤200 |
Bestand: Januari
| 1 2 3 | Vestiging 1: ¤50 Vestiging 5: ¤80 Vestiging 8: ¤30 |
Bestand: Februari
| 1 2 3 | Vestiging 3: ¤60 Vestiging 4: ¤70 Vestiging 7: ¤40 |
Nu vraag ik me dus af of Excel de bestanden van alle maanden kan "lezen" en automatisch de naam van de vestiging en de bijbehorende omzet in een goede kolom van het bestand "totalen" importeert.
Het gaat om totaal zo'n 30 maanden (dus 30 bestanden) met een groot aantal vestigingen, dus handmatig is het behoorlijk veel werk.
[b]Op vrijdag 24 augustus 2007 09:50 schreef PretKroket het volgende:[/b]
dude? :') ik hoop voor je dat je niet serieus bent
Even voor jou: 2x1/2 = 1/2 x 1/2
[b]Neem mij niet tè serieus, dat doe ik zelf ook niet[/b]
dude? :') ik hoop voor je dat je niet serieus bent
Even voor jou: 2x1/2 = 1/2 x 1/2
[b]Neem mij niet tè serieus, dat doe ik zelf ook niet[/b]
quote:
[..]
Sorry Deetch! Bedankt dat ik even voor mocht!
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
@Barcaconia
Hebben alle bestanden wel dezelfde soort indeling?
Staat de omzet altijd in hetzelfde tabblad qua naam.
Staat de lijst met vestigingen altijd in dezelfde kolom en de omzet erachter?
Zijn de bestandnamen hetzelfde etc etc
Hebben alle bestanden wel dezelfde soort indeling?
Staat de omzet altijd in hetzelfde tabblad qua naam.
Staat de lijst met vestigingen altijd in dezelfde kolom en de omzet erachter?
Zijn de bestandnamen hetzelfde etc etc
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
Betreft Excel 2010, Taal: Nederlands.
Nu heb ik in excel 2 pull down menu's onder elkaar waar allebei dezelfde waardes gekozen kunnen worden. Nu wil ik graag dat als je in het eerste menu een bepaalde waarde kiest, deze in het 2e menu er niet meer bij staat.
Is dit mogelijk en hoe? Zónder VBA etc. dus gewoon standaard excel.
Nu heb ik in excel 2 pull down menu's onder elkaar waar allebei dezelfde waardes gekozen kunnen worden. Nu wil ik graag dat als je in het eerste menu een bepaalde waarde kiest, deze in het 2e menu er niet meer bij staat.
Is dit mogelijk en hoe? Zónder VBA etc. dus gewoon standaard excel.
Ja, dat kan.quote:Op donderdag 5 april 2012 22:52 schreef LethalP het volgende:
Betreft Excel 2010, Taal: Nederlands.
Nu heb ik in excel 2 pull down menu's onder elkaar waar allebei dezelfde waardes gekozen kunnen worden. Nu wil ik graag dat als je in het eerste menu een bepaalde waarde kiest, deze in het 2e menu er niet meer bij staat.
Is dit mogelijk en hoe? Zónder VBA etc. dus gewoon standaard excel.
http://www.get-digital-he(...)excel-array-formula/
Gegoogled op "excel multiple dropdown unique"
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]
Het is mij met bovengenoemde post niet gelukt.
Bij deze een vereenvoudigde versie van het bestandje
KLIKKERDEKLIK
Dus in het 2e lijstje wil ik de naam die in de eerste is gekozen niet meer zien.
Iemand die verder kan helpen?
Bij deze een vereenvoudigde versie van het bestandje
KLIKKERDEKLIK
Dus in het 2e lijstje wil ik de naam die in de eerste is gekozen niet meer zien.
Iemand die verder kan helpen?
volgens mij kan dat niet zonder VBA.
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
| Forum Opties | |
|---|---|
| Forumhop: | |
| Hop naar: | |