Discussion :

[esse2016]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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.

[Menhir]

"Caisse!B92:C96" est une formulation de formule Excel qui ne convient pas au VBA.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Worksheets("Caisse").Range("B92:C96")

[esse2016]

Bonjour Menhir,

ça fonctionne parfaitement, merci pour l'aide.