XL 2019 Problème avec 2 Formulaires avec listview pour arbre généalogique

hemardjean

XLDnaute Occasionnel
Bonjour le forum

J’ai fait deux formulaires identiques un pour la création de la fiche et le deuxième pour le père.

Ma question:

Peut-on récupérer les infos du deuxième formulaire pour l’intégrer dans le premier formulaire.

Je vous remercie pour votre aide
 

Pièces jointes

  • Pour arbres genealogique - Copie.xls
    190 KB · Affichages: 31

Bebere

XLDnaute Barbatruc
Bonjour
Ajout feuille listes pour nom,prénom et lieu
ajout userform2 pour choix nom,prénom,lieu pour userform1
userform2 entrée nouvelles données pour feuille listes
excuses pour l'attente
 

Pièces jointes

  • GenealogiqueV1.xls
    250 KB · Affichages: 6

hemardjean

XLDnaute Occasionnel
bonjour Bebere

Pas de problème pour la durée et merci pour ce super travail.

Petite question :

Useform2 les combo2 et 3 se trouvent bien dans le tetbox1 mais lorsque l’on vide l’userform2 dans l’userform1 il ne reste dans la textbox de destination que le résultat de la combo3 comment peut-on faire pour que les deux reste « nom et prénom »
 

hemardjean

XLDnaute Occasionnel
bonjour Bebere

J’ai effectué un autre essai pour avoir le nom et prénom ensemble j’ai changé le code dans userform2 « Listes par Listes-familles »

« Sub IniCbo234() 'nom,prénom lieu

L = Application.CountA(Worksheets("Listes").Range("A:A")) - 1

Me.ComboBox2.List = Worksheets("Listes").Range("A3:A" & L).Value

Par :

L = Application.CountA(Worksheets("Listes-familles").Range("A:A")) - 1

Me.ComboBox2.List = Worksheets("Listes-familles").Range("A3:A" & L).Value

mais toujours même problème pour le garder entier dans userf1

A part ce petit souci , c’est ce que je recherchais « mais je n’aurai jamais trouvé car cela dépasse mes petites compréhensions ,les codes VBA sont trop compliqués pour moi.
 

Bebere

XLDnaute Barbatruc
Bonjour
changements effectués plus quelques autres
Je continue à contrôler, il y a encore des améliorations,corrections à faire
Il me semble qu'il manque des colonnes,à toi de contrôler
tu me le signales
 

Pièces jointes

  • GenealogiqueV2.xls
    326.5 KB · Affichages: 2

hemardjean

XLDnaute Occasionnel
Bonsoir Bebere

j’ai effectué des essais et il y a un bog lors de la validation de userform1 avec le message

erreur d’éxécution ‘1004’

erreur définie par l’application ou par l’objet

au niveau de la commande

Private Sub CommandButton3_Click() 'ajouter,modifier,supprimer

Case "Modifier"

' Identité

Ws.Cells(L, i - 5).NumberFormat = "dd-mm-yyyy"



Pour le nombre de colonnes tout va bien

cordialement
 

et1000lio

XLDnaute Junior
Bonjour,
Pourquoi n'utiliseriez-vous pas un logiciel de généalogie ? Il y en a de nombreux, bien faits et souvent gratuits. Sur Excel, dès que vous aurez quelques dizaines de personnes, ce sera ingérable...
Bonsoir à tous
Je rebondis sur cette affirmation. C'est faux Excel peut gérer un nombre important d'individus. Pour ma part je compte dans mon fichier Excel 5900 individus (lignée et collatéraux) et cela ne me pose pas de problème. Effectivement si vous gérer votre fichier via des formules c'est ingérable mais une bonne programmation sous VBA cela le fait sans problèmes.... peut être qu'avec plus de 10 000 individus cela me posera des problèmes mais j'en suis encore loin et je n'y arriverai peut-être pas !!!
 

Discussions similaires

Statistiques des forums

Discussions
311 729
Messages
2 081 971
Membres
101 852
dernier inscrit
dthi16088