Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
bonjour j'ai créer un fichier dans lequel je coche des listes et quand je valide par imprime ça me remplis le formulaire.
pourrais je avoir de l'aide. merci
Salut Luckystree,
Voici un petit fichier qui devrait correspondre à tes attentes.
Un nouvel onglet BASE a été créé. Il contient donc toutes les données (Peronnne, Véhicule, Matos et Epi)
Sur l'onglet Formulaire, clic sur le LOGO.
@+Lolote83
Salut Luckystree,
Voici un petit fichier qui devrait correspondre à tes attentes.
Un nouvel onglet BASE a été créé. Il contient donc toutes les données (Peronnne, Véhicule, Matos et Epi)
Sur l'onglet Formulaire, clic sur le LOGO.
@+Lolote83
salut lolote83
j'ai tester et cela ne fonctionne pas sur mon ordi.
j'ai un mac et je travail avec excel pour mac le problème est plus sur la sécurité macro.
encore merci et bonne soirée 🙂
.
Malheureusement, je n'ai pas de MAC sous la main pour faire des tests, mais je pensais réellement que même sur MAC, les macros VBA étaient lues. De plus le code n'est pas très compliqué.
Voici donc en fichier joint, le fichier d'hier avec quelques explications complémentaires qui te permettront peut être avec l'aide d'un collègue de parvenir à faire fonctionner le tout.
Une copie d'écran du formulaire a été jointe pour que tu te rende compte de ce que cela devrait représenter.
Bon courage !!!!!
@+ Lolote83
Pour infos
Dans la colonne, liste des applicateurs, se trouve des données nominatives.
Or
- DONNEES CONFIDENTIELLES :
Ne laissez AUCUNE donnée personnelle ou confidentielle (noms, adresses, N° de téléphone, entreprises...) dans vos pièces jointes.
Vous mettriez Excel-Downloads en contravention avec la loi Informatique et Liberté et votre fichier devrait être enlevé.
Pour le reste, je suppose que le MAC a du mal avec ce qui concerne le contrôle ListBox
(à confirmer ou infirmer) EDITION: Après vérification, ce n'est pas le ListBox qui est en cause. https://support.microsoft.com/en-us/kb/185388
Re salut,
Tu dis : .
Malheureusement, je n'ai pas de MAC sous la main pour faire des tests, mais je pensais réellement que même sur MAC, les macros VBA étaient lues. De plus le code n'est pas très compliqué.
Voici donc en fichier joint, le fichier d'hier avec quelques explications complémentaires qui te permettront peut être avec l'aide d'un collègue de parvenir à faire fonctionner le tout.
Une copie d'écran du formulaire a été jointe pour que tu te rende compte de ce que cela devrait représenter.
Bon courage !!!!!
@+ Lolote83
Re salut,
Tu dis : .
Malheureusement, je n'ai pas de MAC sous la main pour faire des tests, mais je pensais réellement que même sur MAC, les macros VBA étaient lues. De plus le code n'est pas très compliqué.
Voici donc en fichier joint, le fichier d'hier avec quelques explications complémentaires qui te permettront peut être avec l'aide d'un collègue de parvenir à faire fonctionner le tout.
Une copie d'écran du formulaire a été jointe pour que tu te rende compte de ce que cela devrait représenter.
Bon courage !!!!!
@+ Lolote83
luckystree
Voici l'explication de ton problème. https://support.microsoft.com/en-us/kb/175795/fr
Et son contournement y est détaillé
En bref, il ne faut pas utiliser RowSource pour remplir le contrôle mais List
Remplace la procédure nommée UserForm_Initialize par celle-ci
(code VBA présent dans l'userform)
Code:
Private Sub UserForm_Initialize()
Lst_Véhicule = Empty
Lst_Materiel = Empty
Lst_Epi = Empty
Lst_personne = Empty
Lst_Véhicule.List = Range("ND_Véhicule").Value
Lst_Materiel.List = Range("ND_Matériel").Value
Lst_Epi.List = Range("ND_Epi").Value
Lst_Personnel.List = Range("ND_Personne").Value
'Effacement des anciennes données
With Sheets("Formulaire")
.[B5] = ClearContents
.[H5] = ClearContents
.[B8] = ClearContents
.[B10:B100].ClearContents
End With
End Sub
luckystree
Voici l'explication de ton problème. https://support.microsoft.com/en-us/kb/175795/fr
Et son contournement y est détaillé
En bref, il ne faut pas utiliser RowSource pour remplir le contrôle mais List
Remplace la procédure nommée UserForm_Initialize par celle-ci
(code VBA présent dans l'userform)
Code:
Private Sub UserForm_Initialize()
Lst_Véhicule = Empty
Lst_Materiel = Empty
Lst_Epi = Empty
Lst_personne = Empty
Lst_Véhicule.List = Range("ND_Véhicule").Value
Lst_Materiel.List = Range("ND_Matériel").Value
Lst_Epi.List = Range("ND_Epi").Value
Lst_Personnel.List = Range("ND_Personne").Value
'Effacement des anciennes données
With Sheets("Formulaire")
.[B5] = ClearContents
.[H5] = ClearContents
.[B8] = ClearContents
.[B10:B100].ClearContents
End With
End Sub
salut merci pour ton aide j'ai essayé pas moyen ça ne fonctionne pas je te joint le fichier peut être qu'il fonctionne chez toi chez moi il ce passe rien
Je confirme que ma modification du code de Lolote83 fonctionne sur mon PC.
(Tu as bien le code dans l'userform à la place de la procédure qui portait le même nom?)
Bonjour Luckystree, Staple1600,
Je viens de faire un essai sur mon PC avec les recommandations de Staple1600 et je confirme que cela fonctionne aussi sur mon PC.
Est-ce que cela fonctionne maintenant chez toi ?
De fait, j'ai effectué les modifications sur le fichier joint au cas ou tu n'aurais pas réussi.
Merci à toi Staple1600 pour l'aide apportée.
Cordialement
Lolote83
Bonjour Luckystree, Staple1600,
Je viens de faire un essai sur mon PC avec les recommandations de Staple1600 et je confirme que cela fonctionne aussi sur mon PC.
Est-ce que cela fonctionne maintenant chez toi ?
De fait, j'ai effectué les modifications sur le fichier joint au cas ou tu n'aurais pas réussi.
Merci à toi Staple1600 pour l'aide apportée.
Cordialement
Lolote83
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.