[Toutes versions] Modifier le contenu d'un module [Résolu]

[zoom61]

Salut,

Existe t'il un moyen de modifier le code en VB dans un module par un autre module ?

Je m'explique je voudrai remplacer le code suivant :

Code :

VMax = 3

par

Code :

VMax = 5

La valeur 5 étant une valeur venant d'une requête !!!

[Philippe JOCHMANS]

Bonjour

Pourquoi ne pas passer par une variable ?

Philippe

[zoom61]

En faite de ce que je veux faire c'est :

Code :

Dim recip(3) As Variant

par

Code :

Dim recip(5) As Variant

[Philippe JOCHMANS]

Re

Il existe des instruction pour redimensionner un tableau, regardes du coté de : Redim et Redim Preserve

Philippe

[zoom61]

Ok, cela fonctionne.

Mais existe t'il un moyen de modifier en VBA un module !!!

@+.

[Philippe JOCHMANS]

Oui c'est possible, par exemple un tuto sur Excel, le principe est identique : http://silkyroad.developpez.com/VBA/VisualBasicEditor/

Mais inutile dans ton cas.

Philippe

[francishop]

Bonjour,

Un module => mdlExemple

Code :

1
2
3
4
5
6
7
8
Option Compare Database
Option Explicit
'**************************************
'Pour l'exemple on va changer la ligne 7
'**************************************
Function fExemple()
    Dim recip(3) As Variant
End Function

Puis :

Code :

1
2
3
4
5
6
7
8
9
Private Sub cmdChangeLine_Click()
    Dim Modulo As Module
 
    Set Modulo = Modules!mdlExemple
    Modulo.ReplaceLine 7, "Dim recip(5) As Variant"
    DoCmd.Save acModule, "mdlExemple"
 
    Set Modulo = Nothing
End Sub

Cordialement.

[NguyenRD]

Salut,

Code :

1
2
3
Public Function AvecArgument(Argument As Integer)
    ReDim Variable(Argument) As Variant
End Function

Puis on l'appelle CALL AvecArgument(IntVariable) IntVariable est Integer dans l'exemple.

Bon courage.

[zoom61]

Merci pour toutes ces pistes je vais étudier cela.
@+.