Je kan me bereiken op volgend emailadres: davinci2k3 AT hotmail DOT com
1 reactie »
RSS feed for comments on this post. TrackBack URI
-
Abonneren
Geabonneerd
Heb je al een WordPress.com-account? Nu inloggen.
- Privacy
Finch's weblog 
Beste Finch,
Ik heb een code zolas hieronder
Sub Split_Verplaats()
For Each cl In Columns(4).SpecialCells(xlCellTypeConstants)
vSplits = ” ”
If InStr(cl.Value, ” “) > 0 Then
cl.Offset(0, -1) = Left(cl.Value, InStr(cl.Value, vSplits) – Len(vSplits))
cl.Offset(0, 0) = Right(cl.Value, Len(cl.Value) – InStr(cl.Value, vSplits))
End If
Range(“A4:A15”).Value = Application.WorksheetFunction.VLookup(“00123456”, Range(“c4:C100”), 1, False)
Selection.NumberFormat = “00000000”
Next
End Sub
Deze kijkt of er een waarde in een cel gelijk is aan.
Enkel dit is een vaste waarde, maar die moet eigenlijk variable zijn 🙂
Hierbij verwijderd hij ook gelijk de laatste gedeel die hij heeft gesplit.
Blijf in de cel over die gesplit is het geen wat er moet staan en in kolom A geef hij de nummers
Kom al een suk dichter bij mijn doel.
ik wil hier namelijk het volgende mee bereiken:
Ik heb een uniek nummer in kolom C staan gezamelijk met een naam.
Die worden dus nu gesplitst uit een lijst met als trickerwaarde kolom B.
Nu wil ik het unieke nummer laten doortrekken tot het volgende unieke gegeven.
Kom op het vlgende neer
in kolom D staat 0123456 henk
Deze wordt geslitst met bovenstaande formule naar kolom C “0123456” en in kolom D blijf “henk” over, in kolom C staat nu “0123456” dit is mij unieke gegeven.
nu wil ik in kolom A mijn unieke geven plaatsen zoals in de code.
In colom C staat bv na 5 regels of 6 regels weer een ander unieke gegeven waar we dan mee verder moeten.
Ik hoop dat dit duidelijk is de uitkomst zo ongeveer zo moeten zijn
Kolom A | Kolom B | Kolom C | Kolom D |
=======================================================
| | | 0123456 henk |
Kolom A | Kolom B | Kolom C | Kolom D |
=======================================================
| | 0123456 | henk |
Kolom A | Kolom B | Kolom C | Kolom D |
=======================================================
| | 0123456 | henk |
0123456 | | A | |
0123456 | | B | |
0123456 | | C | |
| | 0999999 | Arno |
0999999 | | A | |
0999999 | | B | |
| | 1234567 | Raymond |
1234567 | | H | |
1234567 | | K | |
1234567 | | I | |
1234567 | | L | |
1234567 | | J | |
1234567 | | A | |
1234567 | | B | |
1234567 | | D | |
Het is een moeilijk probleem en ik kom er niet uit.
misschien kan jij je hulp aanbieden.
Alvast bedankt voor de genomen moeite om dit te lezen
Henk
Reactie door Henk Verschoor — donderdag, 19 februari 2009 @ 12:16