Contenu récent par Florian53

Bonjour à tous, merci pour vos réponses : @dysorthographie : la frame ne se situe pas dans un multipage, le principal problème est que quand je remonte afin de tester le typename de l'objet, arrivé sur le formulaire, il n'existe pas de typename 'Userform'. J'arrive sur le caption de celui ci...

J'ai essayé comme ceci: mais ça ne fonctionne pas, mais pour ce qui est du premier problème, les classes que tu as mis en place sont clairement la solution, et je trouve ce fonctionnement impressionnant :eek:👍

Bonjour dysorthographie Dans le cas ou le controle se trouve dans une frame ça ne fonctionne pas

Il faut que je regardes vraiment tes classes et comment je peux en fonction du contrôle ajouté (ex:textbox) forcer un format date ou toute autre format, car je vois qur tu disposes de format dans la fonction 'Add' j'ai essayé d'ajouter 'dd/mm/yyyy' mais pour l'instant ça ne fonctionne pas. Mais...

Je viens d'ouvrir ton fichier, je vais en avoir pour un petit moment pour comprendre, je vais regarder ça dans la soirée, de ce que je comprends au premier abord, les évènements de substitutions ne sont plus géré dans l'userform mais directement par les modules de classes? Moi ce que je faisais...

Ce n'est pas grave, je regardes ça et je te fais un retour encore un grand merci Dranreb

Je remet un nouveau fichier, car je me suis aperçu un peu tardivement qu'avec tous mes tests le fichier ne fonctionne pas correctement.

Merci Dranreb, voici mon fichier de travail.

Je veux bien m'en inspirer si cela peux résoudre ce problème de redirection

Afin que ce code : Private Sub CText_Click() Check_Txt_Parent(CText).Click_sur_TextBox CText.Caption, CText.Name End Sub redirige bien vers (avec le bon formulaire), car le code cis dessous est inscrit dans le formulaire: Sub Click_sur_TextBox(a, b) End Sub

Voici le code de l'userform : Private Sub UserForm_Initialize() Dim Ctl As MSForms.Control Dim hWnd If G_FW_BLN_Main = True Then Nb_Ctl = Nb_Ctl + 1 Set Ctl = Me.Controls.Add("forms.TextBox.1", "test")...

Actuellement je gère déjà les contrôles dans un module de classe : Option Explicit Option Base 1 Public WithEvents CText As MSForms.TextBox Public WithEvents CCombo As MSForms.ComboBox Public WithEvents CImg As MSForms.Image Public WithEvents CCbx As MSForms.CheckBox Public...

Bonjour à tous, Je souhaite récupérer l'objet Userform parent d'un control, j'ai créer des évènements de substitution mais je peux avoir plusieurs UserForm d'ouvert en même temps, et de mes événements il faut que je redirige vers le bon formulaire, je n'arrive à récupérer avec une fiabilité...

Un petit up

Bonjour à tous, J'ai créé une macro qui importe des données depuis des fichiers (.tsv, .xls, .xlsx), celle ci doit être compatible MACINTOSH/WINDOWS mais sous l'environnement impossible de faire fonctionner cet import de données. Apparemment avec une Version 11 de Excel sous Mac ça fonctionne...