Remplir 3 colonnes à partir du contenu d'une autre

Bonjour,
Je veux valoriser 3 colonnes (I,J,K) à partir de l'analyse du contenu d'une 4ème colonne (B).
Sur chaque ligne dans I j'appelle une fonction =ChercherCategorie(B2;J2;K2)
Et après analyse de B, je valorise J par retour de la fonction en String et c'est OK,
mais je n'arrive pas à valoriser J et K. Comment l'écrire ?

Voici ma fonction :
Public Function ChercherCategorie(Source As Range, _
Optional ByRef Cible2 As Range = Nothing, _
Optional ByRef Cible3 As Range = Nothing _
) As String
Comment écrire la valorisation de Cible2 et Cible3 ?

Merci de votre aide.
Configuration: Windows / Chrome 102.0.5005.63