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 Pierrot,
Voilà, j'ai un Usf qui ne me pose aucun problème, cependant je voudrais, si c'est possible, à un moment (lors d'une ouverture) modifier le code ini pour y ajouter :
ca fonctionne si ajout direct dans le code de l'Usf, mais je ne souhaite l'ajouter et supprimer cet ajout de code à la fermeture.
En te remerciant et en te souhaitant une bonne journée.
je ne connais pas de code "ini" en vba, il y a bien l'événement "Initialize" de l'usf, il se déclenche lors du chargement de celui-ci, mets peut être le code à l'intérieure....
Code:
Private Sub UserForm_Initialize()
Usf_Store.Frm1.Visible = False
End Sub
servent à charger en mémoire et à afficher l'USF.... vois pas trop pourquoi elles se trouvent dans cet événement.... ou alors tu as 2 usf... soit un peu plus explicite parce que là, nous risquons de tourner en rond longtemps...
donc, dans la code d'initialisation du départ,
je désire ajouter ces lignes à un moment donné (demande de visualisation)
afin de masquer les boutons de commandes pour empêcher toute action néfaste.
Je m"exprime mal j'en suis sur.
Mon Usf fonctionne parfaitement, no problème.
Ce que je cherche à faire :
Je clique sur un bouton pour solliciter la visualisation via cet Usf
c'est là que je voudrai modifier le code d'initialisation en ajoutant ces lignes de codes, lignes qui seraient supprimées à la fermeture de l'Usf
Dois-je créer 2 fois le même Usf avec Initialisation différentes ?
Ca me paraît un peu lourd non ?
Re,
En fait, je viens d'y arriver de cette façon, en mettant ce code dans un Module
Quand Click sur bouton Visualiser :
Sub Usf_VisuStore()
Load Usf_Store 'Je charge l'Usf en mémoire
Usf_Store.Frame1.Visible = False 'Je rends les boutons de sélection invisible
Usf_Store.Cmd1.Visible = False ' Je rends le bouton Valider invisible
Usf_Store.Show 'J'affiche l'Usf_Store
End Sub
Merci à toi Pierrot car indirectement tu m'as donné la solution.
En te souhaitant une bonne journée.
- 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