@Della
Of
@ iemand... 

Doe ik hier iets fout Della?
0 pt;0 pt;40 pt;20 pt;65 pt;65 pt;0 pt;0 pt;0 pt;0 pt;45 pt;20 pt;40 pt
Dit is voor de postcode en plaat bij te voegen in LB03
Hier heb ik niks aan verandert...
Misschien ligt het hier aan..
Private Sub LB03_Click()
For i = 0 To 9
    Me("T_0" & i) = LB03.Column(i)
Next
For i = 10 To 20
    Me("T_" & i) = LB03.Column(i)
Next
T_24 = LB03.Column(21)
T_25 = LB03.Column(22)
T_26 = LB03.Column(23)
T_27 = LB03.Column(24)
T_28 = LB03.Column(25)
T_29 = LB03.Column(26)
T_30 = LB03.Column(27)
T_31 = LB03.Column(28)
T_32 = LB03.Column(29)
T_33 = LB03.Column(30)
T_34 = LB03.Column(31)
T_35 = LB03.Column(32)
LB02.ListIndex = -1
On Error Resume Next
Img00.Picture = LoadPicture(ThisWorkbook.Path & "\plaatjes\" & T_20.Value)
End Sub

Ik krijg nu tot aan datum in de listbox..
0 pt;0 pt;40 pt;20 pt;65 pt;65 pt;0 pt;0 pt;0 pt;0 pt;45
de laatste twee worden niet opgenomen.

Once again
Bedankt al bij voorhand

Goedenamiddag allen,

Als genealoog-veteraan (ben er al 25 jaar mee bezig) en zelf al enkele gepersonaliseerde excel-bestanden te automatiseren met VBA voor mijn eigen genealogie trok deze topic meteen mijn aandacht .

Ik heb niet alle berichten in dit topic gelezen omdat ik zag dat er al meteen op een goede manier geholpen werd door SoftAid en Della en er ondertussen dus al een mooi resultaat bekomen is.
Ik kan aan dat bestand zelf dus totaal niets bijdragen  ...

Maar toen ik dit :

Ik heb ook Aldfaer eens bekeken, wordt niet meer ondersteund en is zeker geen aanrader.
Maar ik bewonder het voorbeeld en de energie dat je er al ingestoken hebt.
 

las, kriebelde het toch een beetje om te reageren hierop.

@Della,
Ik gebruik zelf ook al 25 jaar Aldfaer en vraag me dus af waar juist jij gezien/gelezen hebt dat Aldfaer niet meer ondersteund zou worden?
Aldfaer is echt één van de beste programma's voor genealogie en wordt zeker en vast nog steeds ondersteund en regelmatig komen er
nieuwe updates uit.
Wél is het zo dat één van de extra opties (samenwerking met MyHeritage) niet langer ondersteund wordt maar dat heb je ook niet perse nodig.
Toen ik 25 jaar geleden gestart ben met Aldfaer was die optie er ook niet en heb ze bij de inbreng ervan ook nooit gebruikt desondanks
ik wel een account heb bij MyHeritage.

Ik wou hier dus gewoon eventjes een kleine rechtzetting maken dat Aldfaer nog steeds ondersteund wordt en dus zeker nog steeds een
aanrader is 

groetjes,
Bieke

@Della,

geen excuses nodig hoor 

Mij gebeurd het ook wel eens dat ik iets verkeerd lees of begrijp omdat ik te snel ben ofzo...
Anderzijds is het ook best mogelijk dat er ergens op één of andere site door iemand anders verkeerde info werd vermeld...

Vandaar dus mijn gedachte 'dit moet ik eventjes rechtzetten' 

groetjes,
Bieke

@Della 

En dit is echt gemeend hoor. wat een pracht van een bestand is dit nu al geworden zeg.

@SoftAid (Theo) Kan je deze misschien ook vastpinnen zodat ook andere stofvreters er evenveel met bewondering naar kijken en met plezier mee werken.
Graag de vermelding dat dit voor 99% te danken is aan Della Jordan. zou ik echt fijn vinden mocht dit vermeld worden.
Ale voor alle duidelijkheid als Della hier mee akkoord is!

Er zullen misschien nog wel verbetering mogelijk zijn maar voor mij is dit toch al schitterend! behoeft zeker geen handleiding!

nogmaals mijn oprechte dank voor al het geleverde werk tijd en energie! ( en je komische/gevatte opmerkingen  )

Natuurlijk,waarom niet?

Is niet meer dan de correcte vorm van beleefdheid om dit te vragen vind ik. Toch?

Ik neem aan dat je userform nu past in jou scherm,klopt dit?

Als gegoten ( heb er de beamer op aangesloten ... hehehehehehe) neen neen nu past dit perfect.

En heb je nu nog problemen met de postcodes, gemeenten en deelgemeenten tijdens het opzoeken?

Heb momenteel geen problemen meer met de postcodes of gemeentes of deelgemeentes.

Maar mag ik zo vrij zijn om ook enkele vraagjes te stellen. ( deze zijn enkel en alleen om van te leren hoor. Dan weet ik voor de volgende keer waarom en waarom niet.)

- Waarom de code split en geen value?
- Waarom listbox ipv de optionbuttons.

Bestaat er de mogelijkheid om automatisch de namen af te gaan en welke nog niet zijn opgenomen in de statistieken deze er automatisch worden aan toegevoegd? Nu doe ik dit manueel.

Ik neem aan dat je Array bedoeld.
Simpel, minder kans op typo's of vergeten haakjes.Het zijn comboboxen en geen listboxen.
Simpel, zo vermijd je drie overbodige kolommen.

Ik neem aan dat je Array bedoeld.

Dat ook ja.
Is idd een betere uitvoering.

Het zijn comboboxen en geen listboxen.

een mens ziet het bos niet door de bomen.
en het oogt ook mooier

Beste mvdvlist

Probeer eens: Me.Controls("T" & x)

en hoe declareer ik deze in het geheel.
Ik heb geen enkele kennis van VBA en alles wat ik tot nu toe weet heb ik geleerd op tsoeptsoep, SoftAid en natuurlijk onze Della.

Voor mijn bekrompen kennis zou dit zo iets moeten zijn

For x = 1 to ... (hier dan nog iets maar geen idee)
              if me.controls("T" & x). text ( hier dan weer een aanvulling)
                   else
                     me.controls("T" & x)= ( wat hier dan?)
          end if
             (maar hier moet toch een heel stuk code komen die alle namen controleert en indien nodig aanvult met de ontbrekende naam?

                            next x

Graag uw advies in deze

Hallo mvdvlist

Fijn om mee te denken naar de gepaste oplossing maar wat je voorstelt is niet wat de bedoeling is.

De bedoeling is om de namen van zowel de bronpersoon, de vader als de moeder weg te schrijven ook in de sheet statistieken.
Eens die daar in zijn weg geschreven kan er gecontroleerd worden naar de verschillende namen. maw indien een naam verschillende malen voorkomt in de lijst dan hoeft die in de sheet statistieken maar 1 keer voor te komen.
( voorbeeld een naam " Persoon" komt 20 keer voor in de lijst namen van de bronpersoon, maar er zijn ook varianten van de naam zoals "Persoons" of "Persone", en dan heb je nog de naam "Gasten" varianten " Gaste ", "Gaesten" enz... dan zou er in de lijst namen van de bronpersoon dus mogen staan 1 keer Persoon 1 keer Persoons 1 keer Persone enz.)

van overtuigd dat dit voor jullie een walk in the park is of een breach on the beach (met dit weertje nu heeeeeerlijk )

Alvast bedankt