Remplacer _xlfn.CONCAT dans une formule

[asvr]

Bonjour

J'ai reçu un fichier excel de template pour réaliser facilement mes codes de tracking à placer dans mes campagnes media.
Or, dans la formule où est sensée se présenter la ligne de code en fonction des valeurs que je rentre dans un tableau, il y a un "_xlfn.CONCAT" qui semble ne pas être adapté a ma version d'Excel (Office Famille et petite entreprise 2016). Un message "#NOM?" s'affiche.

Comment faire pour réparer la fonction en la remplaçant par une autre?

Merci !

 

[JHA]

Bonjour à tous,

En effet cette fonction n'est pas reconnue dans ta version, peux-tu mettre un bout de fichier pour essayer de te donner une solution.

JHA

 

[djidji59430]

Bonjour,

Ça dépend de ce qu'il y a derrière !

 

[Staple1600]

Bonsoir

Problème bien connu
Les détails et explications
Donc pas solution miracle, un peu de CTRL+H et réécriture des formules acceptées par la version Excel utilisée.

 

[job75]

Bonsoir à tous,

Problème bien connu

Pas bien connu pour "_xlfn.CONCAT" , en tout cas chez moi car je ne l'ai jamais rencontré...

A+

 

[Staple1600]

Bonjour job75

Je parlais du fait de voir les formules précédées par _xlfn
Sinon d'autres semblent avoir rencontré du _xlfn.CONCAT...

 

[job75]

En fait la fonction CONCAT a été introduite sur EXCEL 2019, elle remplace la fonction CONCATENATE :

https://www.excelfunctions.net/excel-concat-function.html

 

[job75]

Maintenant pour remplacer _xlfn.CONCAT par une fonction VBA lisible mettez ce code dans un module standard :

Sub Corriger()
Dim w As Worksheet
For Each w In Worksheets
    w.Cells.Replace "_xlfn.CONCAT", "MyConcat", xlPart
Next
End Sub

Function MyConcat(r As Range)
For Each r In r
    MyConcat = MyConcat & CStr(r)
Next
End Function

Exécutez la macro Corriger et enregistrez le fichier en .xlsm

 

[Staple1600]

Re

Job75
Il y a une raison pour ne pas utiliser CONCATENER?
J'ai testé un CTRL+H et cela semble fonctionner (test sur XL 2013)

Sub Macro1()
Selection.Replace What:="_xlfn.CONCAT", Replacement:="CONCATENER", LookAt:=xlPart, SearchOrder:=xlByRows
End Sub

 

[job75]

Oui bien sûr JM mais on peut penser qu'on a utilisé CONCAT pour concaténer une plage de cellules.

Ce que ne peut pas faire CONCATENER (qui en fait est peu utilisé car on se sert de l'opérateur "&").

 

[asvr]

Bonjour,
Voici la fonction :

Merci à tous pour votre temps !

 

[job75]

OK donc utiliser :

Sub Corriger()
Dim w As Worksheet
For Each w In Worksheets
    w.Cells.Replace "_xlfn.CONCAT", "CONCATENER", xlPart
Next
End Sub

 

[asvr]

Ça a marché !

Merci bien
Antoine