Search results

@CarlettoFed, Sorry I don't see your new message.

Hello, I move forward in my project, It's near good. I added a function : Public s_Modules As String Public s_Bases As String Public Function RendValeurBase() As String RendValeurBase = s_Modules End Function In lst_Module the code : SELECT DISTINCT tblVariables.Modules...

It's clever !

Thanks @GPGeorge, I look that, for me it takes time.

In french it's call "Zone de liste déroulante"

Thanks @CarlettoFed, its works, but what appens with "All". Perhaps an iif in "[Forms]![f_Variables]![lst_NomBase]", I try it but I cannot do.

Hello, I have a form with two combobox. The combobox, lst_NomBase SELECT DISTINCT [NomBase] FROM tblVariables UNION SELECT " Tous" AS NomBase FROM tblVariables ORDER BY tblVariables.[NomBase]; Private Sub lst_NomBase_AfterUpdate() Dim sNewvar As Variant If Me.lst_NomBase = "...

I take the option of @cheekybuddha, It works perfectly. Sorry for my last reponse, I think it was the reponse of @Pat Hartman

Thanks very much @arnelgp and @cheekybuddha It's what I want.

Hello, I have two options to list module name : The first list only the current module of the database, the second can list module outside of the database open. Is there a solution to list the current module or an exterior module with the same code. Public Sub listSubFuncVBA10(PathBase As...

@Josef P. , sorry I cannot for the form, also with Rubberduck (and I changed the shortcut) However, the module are good and for the form I have the method of @ebs17 Thanks for help to you all.

Thanks, I try to install Rubberduck, but of memory, Ihave some problem with it. See you later.

Here he is. Form to open is f_NumerotationFormModules and thanksto try.

Yes, I will do (after eaten). Good appétit !

Yes, the VBE add-in already is loaded. In my "Sub essaiNumFormulaire()", it never works. In my Private Sub cmdTest_Click(), I have to click two time for it works. It is very curious.

Hello @Josef P. , I try It, for Indent a module it do. For a form it do not. I create also a button in my form : Private Sub cmdTest_Click() ' SmartModule "Inutiles2" 'OK SmartFormulaire "f_EquilibrageEssai" 'Not Ok End Sub In the same module as Function SmartFormulaire it works Sub...

I am sorry, I come back. Its different if I call from NumForm to NumForm or I call to Form_f_NumerotationFormModule to NumForm My code in NumForm, all are right and works perfectly : Sub essaiNumForm() Dim sNomForm As String sNomForm = "f_equilibrageEssai"...

All are good. Thanks you very much

Thanks, exactly, I try with a module and it work, but not in a form.

Thanks @Josef P. It open forms but it does not.