REmplir une feuille grace à un useform
z
Bonjour
Dans le fichier joint. :
J'ai commencé à remplir une feuille listing general via Useform par des fiches grace au bouton créer de la feuille menu
1 fiche = 1 ligne
mais je n'arrive pas à utiliser les infos d'une fiche (d'une listbox) contenues dans une feuille paramètre
Je voudrais également :
- > créer un n° d'inscription au fur et à mesure des créations dans listing general
- > que l'âge des enfants se calcule automatiquement dans listing general (date d'aujourdhui - date de naissance) à chaque ouverture du fichier
- > Ne pas mettre de dateN si pas de prenom enfant
-> pouvoir modifier une fiche via le nom1 prenom1
merci
zbig
b
bonsoir,
je n'ai pas saisi tous le fonctionnement, voici en tout cas comment initializer les combobox
Private Sub UserForm_Initialize()
For a = 2 To 4
usfsaisieg.conjointsalarie.AddItem Sheets("parametre").Cells(a, 3)
If a <= 3 Then
usfsaisieg.conjointbeneficiaire.AddItem Sheets("parametre").Cells(a, 5)
usfsaisieg.enfant1h.AddItem Sheets("parametre").Cells(a, 7)
usfsaisieg.enfant2h.AddItem Sheets("parametre").Cells(a, 7)
usfsaisieg.enfant3h.AddItem Sheets("parametre").Cells(a, 7)
usfsaisieg.enfant4h.AddItem Sheets("parametre").Cells(a, 7)
usfsaisieg.enfant5h.AddItem Sheets("parametre").Cells(a, 7)
usfsaisieg.enfant6h.AddItem Sheets("parametre").Cells(a, 7)
End If
Next a
End SubEnsuite pour récupérer le contenu il faut faire par exemple a = usfsaisieg.enfant1h.Value
b
Bonjour,
il faut mettre ça dans le code du userform
cordialement