VBA - Appeler un bloque de codes

Peon33 -  
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à toutes et à tous,

Je cherche à appeler un bloque de codes dans ma macros afin de répéter plusieurs fois ces lignes de code.
Pour cela, il me semblait qu'il était possible de leur donner un nom mais je n'arrive pas à retrouver d'exemple la dessus...

c'est de la forme :

Sub Macro1()

....code...

Fonction1 : 'mon bloque de code à pour nom "Fonction1"
...code...
...code...
...code...

Et le but étant de pouvoir appeler Fonction1 pour répéter les lignes de code du genre :

...code...
...code...
Fonction1 'les lignes de code de Fonction1 s'exécutent
...code... ' le prgm continue


Merci d'avance pour tout aide :)
A voir également:

1 réponse

Réponse 1 / 1
Polux31 Messages postés 6917 Date d'inscription   Statut Membre Dernière intervention   1 204
 
Bonjour,

Ce n'est pas très clair mais peut être que ceci répond à la question: 

sub Macro1
Dim pVar1 As Integer
Dim pVar2 As Integer
Dim res1 As Integer
Dim res2 As Integer

pVar1 = 25
pVar2 = 5

    res1 = maFonction1(pVar1, pVar2)

    MaProc1
    '.....
    res2 = maFonction2(pVar1, res1)
    '....

    maProc2
    '....
    End Sub

Private Function maFonction1(Byval var1 As Integer, Byval var2 As Integer)
     maFonction1 = var1 + var2
End Function

Private Function maFonction2(Byval var1 As Integer, Byval var2 As Integer)
     maFonction2 = var1 * var2
End Function

Public Sub maProc1()
'...
Sub

Public Sub maProc2()
'...
Sub



«Ce que l'on conçoit bien s'énonce clairement, Et les mots pour le dire arrivent aisément.»
Nicolas Boileau
0

Discussions similaires

Redmi note 11, numéro entrant bloqué
SoLavand -
clo -

9 réponses