Bonjour
N'étant pas spécialiste des fonctions je butte sur un passage de paramètre : As Range
Public Function detect(RG As Range) As String
Dim iRow As Long
Dim iColumn As Long
iRow = RG.Row
iColumn = RG.Column
detect = iRow & " " & iColumn
End Function
Private Sub test()
Dim celB As Range
celB = b3 >>>>> J'ai l'erreur à ce niveau , j'ai essayé "b3" , ("b3") .... sais plus quoi mettre ???
detect (celB)
End Sub
Si je met dans une cellule : = detect(b3) , ca marche
Ou est l'erreur ??? Merci
N'étant pas spécialiste des fonctions je butte sur un passage de paramètre : As Range
Public Function detect(RG As Range) As String
Dim iRow As Long
Dim iColumn As Long
iRow = RG.Row
iColumn = RG.Column
detect = iRow & " " & iColumn
End Function
Private Sub test()
Dim celB As Range
celB = b3 >>>>> J'ai l'erreur à ce niveau , j'ai essayé "b3" , ("b3") .... sais plus quoi mettre ???
detect (celB)
End Sub
Si je met dans une cellule : = detect(b3) , ca marche
Ou est l'erreur ??? Merci