Le code est bien copié dans le module du FormTest, mais lorsque je clique
sur le bouton Command2, rien ne se passe.
Ai je fais une erreur ou connaissez vous une autre solution pour copier du
code. Merci d'avance.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
3stone
Salut,
"Farbin" | Je souhaite ajouter du code dans un module de form. | J'y parviens en utilisant la méthode AddfromString | | Dim frm As Form, mdl As Module | Dim Code As String | Set frm = Form_FormTest | Set mdl = frm.Module | | Code = "Private Sub Commande2_Click()" & vbCrLf | Code = Code & "MsgBox " & Chr(34) & "OK" & Chr(34) & vbCrLf | Code = Code & "End Sub" | mdl.AddFromString Code | | Le code est bien copié dans le module du FormTest, mais lorsque je clique | sur le bouton Command2, rien ne se passe. | Ai je fais une erreur ou connaissez vous une autre solution pour copier du
"Farbin"
| Je souhaite ajouter du code dans un module de form.
| J'y parviens en utilisant la méthode AddfromString
|
| Dim frm As Form, mdl As Module
| Dim Code As String
| Set frm = Form_FormTest
| Set mdl = frm.Module
|
| Code = "Private Sub Commande2_Click()" & vbCrLf
| Code = Code & "MsgBox " & Chr(34) & "OK" & Chr(34) & vbCrLf
| Code = Code & "End Sub"
| mdl.AddFromString Code
|
| Le code est bien copié dans le module du FormTest, mais lorsque je clique
| sur le bouton Command2, rien ne se passe.
| Ai je fais une erreur ou connaissez vous une autre solution pour copier du
"Farbin" | Je souhaite ajouter du code dans un module de form. | J'y parviens en utilisant la méthode AddfromString | | Dim frm As Form, mdl As Module | Dim Code As String | Set frm = Form_FormTest | Set mdl = frm.Module | | Code = "Private Sub Commande2_Click()" & vbCrLf | Code = Code & "MsgBox " & Chr(34) & "OK" & Chr(34) & vbCrLf | Code = Code & "End Sub" | mdl.AddFromString Code | | Le code est bien copié dans le module du FormTest, mais lorsque je clique | sur le bouton Command2, rien ne se passe. | Ai je fais une erreur ou connaissez vous une autre solution pour copier du
Salut et merci de ton aide Malheureusement, le code que tu m'as indiqué fait la même chose que mon ancien, à savoir qu'il copie bien la chaine de texte dans le module du form, mais à l'ouverture de ce form, le code n'est pas exécuter.
Salut,
"Farbin" | Je souhaite ajouter du code dans un module de form. | J'y parviens en utilisant la méthode AddfromString | | Dim frm As Form, mdl As Module | Dim Code As String | Set frm = Form_FormTest | Set mdl = frm.Module | | Code = "Private Sub Commande2_Click()" & vbCrLf | Code = Code & "MsgBox " & Chr(34) & "OK" & Chr(34) & vbCrLf | Code = Code & "End Sub" | mdl.AddFromString Code | | Le code est bien copié dans le module du FormTest, mais lorsque je clique | sur le bouton Command2, rien ne se passe. | Ai je fais une erreur ou connaissez vous une autre solution pour copier du
Salut et merci de ton aide
Malheureusement, le code que tu m'as indiqué fait la même chose que mon
ancien, à savoir qu'il copie bien la chaine de texte dans le module du form,
mais à l'ouverture de ce form, le code n'est pas exécuter.
Salut,
"Farbin"
| Je souhaite ajouter du code dans un module de form.
| J'y parviens en utilisant la méthode AddfromString
|
| Dim frm As Form, mdl As Module
| Dim Code As String
| Set frm = Form_FormTest
| Set mdl = frm.Module
|
| Code = "Private Sub Commande2_Click()" & vbCrLf
| Code = Code & "MsgBox " & Chr(34) & "OK" & Chr(34) & vbCrLf
| Code = Code & "End Sub"
| mdl.AddFromString Code
|
| Le code est bien copié dans le module du FormTest, mais lorsque je clique
| sur le bouton Command2, rien ne se passe.
| Ai je fais une erreur ou connaissez vous une autre solution pour copier du
Salut et merci de ton aide Malheureusement, le code que tu m'as indiqué fait la même chose que mon ancien, à savoir qu'il copie bien la chaine de texte dans le module du form, mais à l'ouverture de ce form, le code n'est pas exécuter.
Salut,
"Farbin" | Je souhaite ajouter du code dans un module de form. | J'y parviens en utilisant la méthode AddfromString | | Dim frm As Form, mdl As Module | Dim Code As String | Set frm = Form_FormTest | Set mdl = frm.Module | | Code = "Private Sub Commande2_Click()" & vbCrLf | Code = Code & "MsgBox " & Chr(34) & "OK" & Chr(34) & vbCrLf | Code = Code & "End Sub" | mdl.AddFromString Code | | Le code est bien copié dans le module du FormTest, mais lorsque je clique | sur le bouton Command2, rien ne se passe. | Ai je fais une erreur ou connaissez vous une autre solution pour copier du
Pardon, j'ai fais une erreur, ça fonctionne très bien, merci de ton aide
Salut et merci de ton aide Malheureusement, le code que tu m'as indiqué fait la même chose que mon ancien, à savoir qu'il copie bien la chaine de texte dans le module du form, mais à l'ouverture de ce form, le code n'est pas exécuter.
Salut,
"Farbin" | Je souhaite ajouter du code dans un module de form. | J'y parviens en utilisant la méthode AddfromString | | Dim frm As Form, mdl As Module | Dim Code As String | Set frm = Form_FormTest | Set mdl = frm.Module | | Code = "Private Sub Commande2_Click()" & vbCrLf | Code = Code & "MsgBox " & Chr(34) & "OK" & Chr(34) & vbCrLf | Code = Code & "End Sub" | mdl.AddFromString Code | | Le code est bien copié dans le module du FormTest, mais lorsque je clique | sur le bouton Command2, rien ne se passe. | Ai je fais une erreur ou connaissez vous une autre solution pour copier du
Pardon, j'ai fais une erreur, ça fonctionne très bien, merci de ton aide
Salut et merci de ton aide
Malheureusement, le code que tu m'as indiqué fait la même chose que mon
ancien, à savoir qu'il copie bien la chaine de texte dans le module du form,
mais à l'ouverture de ce form, le code n'est pas exécuter.
Salut,
"Farbin"
| Je souhaite ajouter du code dans un module de form.
| J'y parviens en utilisant la méthode AddfromString
|
| Dim frm As Form, mdl As Module
| Dim Code As String
| Set frm = Form_FormTest
| Set mdl = frm.Module
|
| Code = "Private Sub Commande2_Click()" & vbCrLf
| Code = Code & "MsgBox " & Chr(34) & "OK" & Chr(34) & vbCrLf
| Code = Code & "End Sub"
| mdl.AddFromString Code
|
| Le code est bien copié dans le module du FormTest, mais lorsque je clique
| sur le bouton Command2, rien ne se passe.
| Ai je fais une erreur ou connaissez vous une autre solution pour copier du
Pardon, j'ai fais une erreur, ça fonctionne très bien, merci de ton aide
Salut et merci de ton aide Malheureusement, le code que tu m'as indiqué fait la même chose que mon ancien, à savoir qu'il copie bien la chaine de texte dans le module du form, mais à l'ouverture de ce form, le code n'est pas exécuter.
Salut,
"Farbin" | Je souhaite ajouter du code dans un module de form. | J'y parviens en utilisant la méthode AddfromString | | Dim frm As Form, mdl As Module | Dim Code As String | Set frm = Form_FormTest | Set mdl = frm.Module | | Code = "Private Sub Commande2_Click()" & vbCrLf | Code = Code & "MsgBox " & Chr(34) & "OK" & Chr(34) & vbCrLf | Code = Code & "End Sub" | mdl.AddFromString Code | | Le code est bien copié dans le module du FormTest, mais lorsque je clique | sur le bouton Command2, rien ne se passe. | Ai je fais une erreur ou connaissez vous une autre solution pour copier du
