passage d'un range en argument
Bonjour,
cela va paraître inintéressant, mais je n'arrive pas à passer en argument un range se trouvant sur la feuill1! lors d'appel d'une procédure comment fait on cela, SVP ?
ci dessous situé dans la feuille1
Code:
1
2
3
4
5
| Private Sub CommandButton1_Click()
Call CONCAT1_MAUVAIS(Range("Caisse!B92:C96"), Range("PARAM!X4:X17"), Range("Caisse!D91"))
Call CONCAT1_MAUVAIS(Range("Caisse!B106:C108"), Range("PARAM!X4:X17"), Range("Caisse!D105"))
Call CONCAT1_MAUVAIS(Range("Caisse!B109:C113"), Range("PARAM!X4:X17"), Range("Caisse!D108"))
End Sub |
message d'erreur "Erreur d'exécution '1004': La méthode 'Range' de l'objet '_worksheet' a échoué
(qqchose ne lui plaît pas)
ci dessous situé dans le module1
Code:
1
2
3
| Sub CONCAT1_MAUVAIS(ByVal Plage_Data As Range, ByVal Plage_Criteres As Range, ByVal Debut As Range)
blablabla...
end sub |
merci par avance pour votre aide.
