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.
Nee want bijvoorbeeld "T BW" of "ss nb" horen bij elkaar. Verder kan PC ook "H-L045" worden.quote:Op maandag 7 juli 2008 10:51 schreef PietjePuk007 het volgende:
Kan je met "alles vervangen" de "/" niet weghalen en dan alsnog op posities scheiden?
Nee,quote:Op maandag 7 juli 2008 11:11 schreef DaFan het volgende:
BierKoning is die lengte van de string altijd hetzelfde, afgezien van die 141 of /141?
Even een kort stukje van mn uit elkaar te pluizen stukje:
| 1 2 3 4 5 6 7 8 9 10 | EN 287-1 141/111 T BW 5 S / B t16(3/13) D168 H–L045 ss nb 1 EN 287-1 141 T BW 5 S t6 D51 H–L045 ss nb 1 EN 287-1 141 T BW 5 S t7 D168 H–L045 ss nb 1 EN 287-1 141 T BW 5 S t5.8 D50 H–L045 ss nb 1 EN 287-1 141 T BW 5 S t6.4 D158 H–L045 ss nb 1 EN 287-1 141 T BW 5 S t4 D38 H–L045 ss nb 2 EN 287-1 135 P BW 1.2 S t8 PF ss nb 2 EN 287-1 135/136 T BW 1.1 S / S t12(12/12) D168 PC ss nb 2 EN 287-1 .../135 T BW 1.1 ... / S t16(.../) D168 PC ss nb 2 |
Kan je 't niet gewoon scheiden op spatie 
. Daarna moet je misschien nog bij een paar kolommen wat extra werk verrichten maar de bulk is dan al prima toch 
?
. Daarna moet je misschien nog bij een paar kolommen wat extra werk verrichten maar de bulk is dan al prima toch ?
Op maandag 30 november 2009 19:30 schreef Ian_Nick het volgende:
Pietje's hobby is puzzelen en misschien ben jij wel het laatste stukje O+
Pietje's hobby is puzzelen en misschien ben jij wel het laatste stukje O+
Dat zou in elk geval wel al iets zijn. Daar kan ik iig wel even naar opzoek.. alle beetjes helpen.. Wellicht gaat dat nog wel sneller dan overal handmatig " " bij zetten 
Het gaat nml om een 186 rijen...
Het gaat nml om een 186 rijen...
Mja dit is niet te doen, ook niet met een macro omdat je niets vasts hebt om op te scheiden. Gewoon Tekst naar kolommen doen en dan een beetje kloten met de scheidslijnen.
Ja ben ik nu ook al mee bezig Een maar zo ruw mogelijke scheiding maken, bij een deel is het wel mogelijk.
Iig bedankt
Een maar zo ruw mogelijke scheiding maken, bij een deel is het wel mogelijk. Iig bedankt
Een vraagje door een door mij niet op te lossen Excel-probleem... Ik heb de opdracht gekregen om aan een order-werkblad een magazijnwerkblad koppelen, hiermee kan de magazijnmedewerker de verschillende artikelen in het magazijn per stuk af te strepen die hij/zij al gepakt heeft.
Het order-werkblad heeft de eerste 3 kolommen:
- 1. Itemnr. (bv. S084)
- 2. stuknr. (bv. 2)
- 3. aantal. (bv. 12)
Het magazijnblad heeft als eerste kolom de samenvoegde 3 kolommen van het order-werkblad (in het voorbeeld wordt de invulling van de cel: S084.2.12).
Daarna is het de bedoeling om alle aantalen tot 1 te vervormen, ofwel je krijgt (in het voorbeeld) 12 regels van het aantal 1. Het lukt mij niet om dit te verwerken in Excel, heeft iemand hier een oplossing voor? Of is dit überhaupt te verwezenlijken in Excel?
Het order-werkblad heeft de eerste 3 kolommen:
- 1. Itemnr. (bv. S084)
- 2. stuknr. (bv. 2)
- 3. aantal. (bv. 12)
Het magazijnblad heeft als eerste kolom de samenvoegde 3 kolommen van het order-werkblad (in het voorbeeld wordt de invulling van de cel: S084.2.12).
Daarna is het de bedoeling om alle aantalen tot 1 te vervormen, ofwel je krijgt (in het voorbeeld) 12 regels van het aantal 1. Het lukt mij niet om dit te verwerken in Excel, heeft iemand hier een oplossing voor? Of is dit überhaupt te verwezenlijken in Excel?
Wanneer wil je dit laten gebeuren? Als in het orderwerkblad een nieuw item wordt toegevoegd?
En je wil gewoon, als er Aantal: 2 staat, dat je andere werkblad heeft:
1
1
En verder niets?
En je wil gewoon, als er Aantal: 2 staat, dat je andere werkblad heeft:
1
1
En verder niets?
Ja precies, als er in het orderwerkblad een nieuwe item wordt toegevoegd met het aantal 12, zal er in het magazijnwerkblad 12 regels met het aantal 1 komen te staan...
haha nee zo bedoel ik het niet. Er moet als het aantal 12 ingevuld wordt bij het orderwerkblad dus 12 rijen/regels komen te staan met de code van het item...Zodat de magazijnmedewerker het dus kan afstrepen
Ja dat snap ik, maar als hij iets toevoegt in het Orderwerkblad kan hij dat bevestigen met een knop. Is een stuk makkelijker in ieder geval.
Ik ben er mee bezig, daarna moet je maar even zien hoe je de uitkomst vindt. (zal wel plaatjes maken).
Ben ook 2 pokertoernooien aan het spelen dus kan even duren
Ik ben er mee bezig, daarna moet je maar even zien hoe je de uitkomst vindt. (zal wel plaatjes maken).
Ben ook 2 pokertoernooien aan het spelen dus kan even duren
Oké ik begrijp niet helemaal wat je bedoelt met een knop... Maar ik wacht met smart op je uitkomst:)
Ik heb de tijd dus doe rustig aan, en succes met je toernooien haha
Ik heb de tijd dus doe rustig aan, en succes met je toernooien haha
Ok.
Zo ziet je eerste sheet eruit (heet hier "Order").
De knop kan je toevoegen via de Control werkbalk.
Je 2e sheet ziet er als volgt uit ("Magazijn")
Ga nu terug naar Order en dubbelklik op de knop, zodat je naar de Visual Basic editor gaat. Je ziet dan het volgende:
Plak dit hier tussen (op regel 2 in dit geval).
Als je nu de knop indrukt ziet je 2e sheet er als volgt uit:
Hoop dat dit een beetje in de richting komt van wat je wil
Zo ziet je eerste sheet eruit (heet hier "Order").
De knop kan je toevoegen via de Control werkbalk.
Je 2e sheet ziet er als volgt uit ("Magazijn")
Ga nu terug naar Order en dubbelklik op de knop, zodat je naar de Visual Basic editor gaat. Je ziet dan het volgende:
| 1 2 3 | End Sub |
Plak dit hier tussen (op regel 2 in dit geval).
| 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | LastRowOrder = .Range("C65536").End(xlUp).Row Aantal = .Range("C" & LastRowOrder).Value Itemnr = .Range("A" & LastRowOrder).Value Stuknr = .Range("B" & LastRowOrder).Value End With With Sheets("Magazijn") LastRowMagazijn = .Range("A65536").End(xlUp).Row + 1 For i = LastRowMagazijn To LastRowMagazijn + Aantal .Range("A" & i).Value = Itemnr & "." & Stuknr & "." & Aantal .Range("B" & i).Value = 1 Next i End With |
Als je nu de knop indrukt ziet je 2e sheet er als volgt uit:
Hoop dat dit een beetje in de richting komt van wat je wil
Nog even terugkomen op jouw vraag, zie:quote:Op vrijdag 4 juli 2008 10:55 schreef Xith het volgende:
[..]
Maar de punten die ik wil 'verbergen' uit de grafiek zijn !VERW (verwijzing fout), ook met zo'n folmule:
=ALS(B27="#VERW!";"#N/A";B27)
Wilt het niet want zijn leest B27 niet als '#VERW!' maar als een formule, geloof ik...
Wat kan ik doen?
http://peltiertech.com/WordPress/2008/05/14/dynamic-charts/
Het enige is dat je Quarter 2/3/4 niet kan zien als ze niet ingevuld zijn...weet niet zeker of je dat ook wil maar anders moet je hier maar eens kijken:
http://www.peltiertech.com/Excel/Charts/index.html
Al geven wel alle grote Excel fora aan dat je #N/A moet gebruiken om ze niet te laten plotten.
[ Bericht 2% gewijzigd door DaFan op 07-07-2008 13:18:05 ]
Ik hoor het graag!quote:Op maandag 7 juli 2008 13:00 schreef ArjenD11 het volgende:
Super! bedankt man, ik ga het verwerken en hoop dat ze blij met mij zijn...
Kijk ook even of je BEGRIJPT wat er gebeurt in de code. Dan ga je er al een heel stuk op vooruit en kan je ze over een tijdje zelf maken
DaFan,
Nog een vraagje: hoe kom het dat hij dan 13 keer een nieuwe regel maakt en niet 12? of hoe pas ik dit aan?
Nog een vraagje: hoe kom het dat hij dan 13 keer een nieuwe regel maakt en niet 12? of hoe pas ik dit aan?
Verander
naar
| 1 2 3 | For i = LastRowMagazijn To LastRowMagazijn + Aantal |
naar
| 1 2 3 | For i = LastRowMagazijn +1 To LastRowMagazijn + Aantal |
Nou het splitsen dmv " " ging erg goed. Met Word kon ik een hele hoop zoeken/vervangen en daarmee dus " " toevoegen. Daarna kon het heel gemakkelijk met 'text to columns' en dan 'delimited', selecteren dmv 'space' en " " en het was klaar!
Nu heb ik een volgend ding waar ik naar opzoek ben.
Mijn database bestaat uit 70 namen. Deze namen komen meerdere keren voor, dus bijvoorbeeld Jansen is rij 1 tm 9, De Vries is rij 10 tm 14 en Balkenende is rij 15 tm 16.
Voor de overzichtelijkheid heb ik gebruik gemaakt van 2 kleuren, blauw en lichtblauw, en 'fill' ik dus de cel met deze kleur. Deze kleuren wisselen elkaar af dus in het voorbeeld is Jansen blauw, De Vries lichtblauw en Balkenende dan weer blauw. Zo kan ik in 1 oogopslag zien welke velden bij welke namen horen.
Nu kan ik dit allemaal handmatig doen (en heb ik dus ook gedaan), alleen is het lastig wanneer ik dmv mn eerste sheet (data entry) een nieuwe naam, of een extra rij voor een bestaande naam invul. Deze wordt namelijk gewoon wit.
Is het mogelijk om:
1) Excel te laten kijken of de naam die erbij wordt gevoegd al bestaat, en dan de gehele rij de kleur te geven van de naam, als deze bestaat?
2) Bij een nieuwe naam, te kijken wat de laatste kleur was, en dan de andere kleur te gebruiken? Dus bijvoorbeeld wanneer de laatste kleur blauw was, dat de nieuwe naam dan lichtblauw wordt?
Na wat zoeken op internet kwam ik al op deze site deze geeft elke andere cel een bepaalde kleur. Is niet toereikend voor wat ik wil.
Verder heb ik al gekeken naar 'Conditional Formatting' alleen kon ik er niet de opties uit vinden die ik wilde...
Nu heb ik een volgend ding waar ik naar opzoek ben.
Mijn database bestaat uit 70 namen. Deze namen komen meerdere keren voor, dus bijvoorbeeld Jansen is rij 1 tm 9, De Vries is rij 10 tm 14 en Balkenende is rij 15 tm 16.
Voor de overzichtelijkheid heb ik gebruik gemaakt van 2 kleuren, blauw en lichtblauw, en 'fill' ik dus de cel met deze kleur. Deze kleuren wisselen elkaar af dus in het voorbeeld is Jansen blauw, De Vries lichtblauw en Balkenende dan weer blauw. Zo kan ik in 1 oogopslag zien welke velden bij welke namen horen.
Nu kan ik dit allemaal handmatig doen (en heb ik dus ook gedaan), alleen is het lastig wanneer ik dmv mn eerste sheet (data entry) een nieuwe naam, of een extra rij voor een bestaande naam invul. Deze wordt namelijk gewoon wit.
Is het mogelijk om:
1) Excel te laten kijken of de naam die erbij wordt gevoegd al bestaat, en dan de gehele rij de kleur te geven van de naam, als deze bestaat?
2) Bij een nieuwe naam, te kijken wat de laatste kleur was, en dan de andere kleur te gebruiken? Dus bijvoorbeeld wanneer de laatste kleur blauw was, dat de nieuwe naam dan lichtblauw wordt?
Na wat zoeken op internet kwam ik al op deze site deze geeft elke andere cel een bepaalde kleur. Is niet toereikend voor wat ik wil.
Verder heb ik al gekeken naar 'Conditional Formatting' alleen kon ik er niet de opties uit vinden die ik wilde...
1), ja dat heet "voorwaardelijke opmaak", kijk ff in de help hoe 't precies werkt (er is iig erg veel mogelijk)
Op maandag 30 november 2009 19:30 schreef Ian_Nick het volgende:
Pietje's hobby is puzzelen en misschien ben jij wel het laatste stukje O+
Pietje's hobby is puzzelen en misschien ben jij wel het laatste stukje O+
Voorwaardelijke opmaak gaat echt niet werken, dan zit je a) na 3 namen al tegen de limiet van condities aan, en b) kan je met geen mogelijkheid kijken wat de 'vorige' kleur was.
BK: Hoe zijn de cellen ingedeeld? Zoals ik het nu begrijp is het álleen kolom A en moet de hele rij lichtblauw worden met naam A, en zodra naam B erbij komt moet deze blauw worden?
Maw kan je toelichten hoe je data eruitziet?
BK: Hoe zijn de cellen ingedeeld? Zoals ik het nu begrijp is het álleen kolom A en moet de hele rij lichtblauw worden met naam A, en zodra naam B erbij komt moet deze blauw worden?
Maw kan je toelichten hoe je data eruitziet?
ik heb even een klein screenshotje gemaakt:
Dus wanneer ik nu als naam DaFan toevoeg, wil ik dus dat die blauw wordt. En PietjePuk007 moet daarna weer lichtblauw worden.
Voeg ik weer Gullit toe, dan wil ik dan hij weer blauw wordt (en als het automatisch kan, dmv sort ook bij de andere gullit gaat staan, maar dat lijkt me geen probleem).
[ Bericht 16% gewijzigd door BierKoning op 09-07-2008 11:14:43 ]
Dus wanneer ik nu als naam DaFan toevoeg, wil ik dus dat die blauw wordt. En PietjePuk007 moet daarna weer lichtblauw worden
. Voeg ik weer Gullit toe, dan wil ik dan hij weer blauw wordt (en als het automatisch kan, dmv sort ook bij de andere gullit gaat staan, maar dat lijkt me geen probleem).
[ Bericht 16% gewijzigd door BierKoning op 09-07-2008 11:14:43 ]
Bierkoning, beter host je je screen op tinypic.com.
Anyway, je moet je de voorwaardelijke opmaak voor oneven rijen de voorwaarde =IS.ONEVEN(RIJ()) opgeven en dan de gewenste kleur eraan koppelen. En =IS.EVEN(RIJ()) voor de even rijen.
edit: Ah ja, na het toevoegen van nieuwe rijen moet je wel de voorwaardelijke opmaak even handmatig toepassen.
Anyway, je moet je de voorwaardelijke opmaak voor oneven rijen de voorwaarde =IS.ONEVEN(RIJ()) opgeven en dan de gewenste kleur eraan koppelen. En =IS.EVEN(RIJ()) voor de even rijen.
edit: Ah ja, na het toevoegen van nieuwe rijen moet je wel de voorwaardelijke opmaak even handmatig toepassen.
| 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 | Dim c As Range Dim ColumnTarget, InteriorColor As Integer Dim Kleur As Long ColumnTarget = Target.Column Kleur = 31 If ColumnTarget = 1 Then For Each c In Range("A:A") If c.Row = 1 Then Naam = c.Value c.EntireRow.Interior.ColorIndex = Kleur End If If c.Value = "" Then Exit Sub If c.Value = Naam Then c.EntireRow.Interior.ColorIndex = Kleur Else If Kleur = 31 Then Kleur = 37 Else Kleur = 31 End If c.EntireRow.Interior.ColorIndex = Kleur Naam = c.Value End If Next End If End Sub |
Dit gaat ervanuit dat alle namen in kolom A staan en beginnen in A1 ! Als ze op een andere kolom op rij 1 beginnen, moet je de 1 (If ColumnTarget = 1 Then) veranderen naar de hoeveelste kolom het is (b=2, z =26).
Als je namen ook nog op een andere rij beginnen hoor ik het wel dan bouw ik daarvoor iets om (nu gaat hij bijvoorbeeld ook de header kleuren).
Edit: Doh vergeet ik dat de hele rij die kleur moet worden
Edit2: opgelost
Dat verplaatsen naar de plaats waar die naam al voorkomt komt later, ben nu even bezig!
Edit DREI:
Je kan de kleuren ook aanpassen als je wil. Met 2007 werken ze ook met shades en tinten enzo, hoe je dat precies moet toevoegen weet ik niet meer 31 en 37 zien er wel aardig uit. Als je een lijstje wil van de mogelijke kleuren, maak dan kort deze sub onder bv een button. Kleuren in kolom D, nummers in kolom E. Pas 31 en 37 aan zoals je zelf wil.
| 1 2 3 4 | Range("D" & i).Interior.ColorIndex = i Range("E" & i).Value = i Next i |
[ Bericht 4% gewijzigd door DaFan op 09-07-2008 11:29:40 ]
Nope, alleen kolom A bevat een naam. De rest is slechts bijbehorende data (zoals nu wel te zien is in de screenshot)
Dat tussenvoegen van een naam als hij al voorkomt gaat niet lukken. Niet vandaag in ieder geval, sorry
