XL 2016 formule concatener sans 0

cmdavid

XLDnaute Occasionnel
Bonjour à tous,
je cherche a retirer les 0 de la formule concatener pour obtenir uniquement les valeurs excitantes, ou une autre formule pour obtenir ce que je cherche, voir fichier joint.
Merci pour votre aide
Cordialement,
 

Pièces jointes

  • CONCATENER TEST.xlsx
    9.8 KB · Affichages: 14

ALS35

XLDnaute Occasionnel
Bonjour à tous,
La fonction JOINDRE.TEXTE n'est disponible qu'à partir d'Excel 2019.
Sinon une idée en changeant les formules en F6 G6
en F6 : =SI(D6="";"";D6)
en G6 : =SI(F7="";"";$G$4)
et à recopier vers le bas
Cordialement
 

JHA

XLDnaute Barbatruc
Bonjour à tous,

Avec la fonction personnalisée "TEXTJOIN" (merci à @Dranreb) à mettre dans un module de la feuille.

VB:
Function TEXTJOIN(Delimiter As String, IgnoreEmpty As Boolean, ParamArray Parm() As Variant)
Dim E, C As Range, V, T() As String, N&
For Each E In Parm
  If TypeName(E) = "Range" Then
     For Each C In E.Cells
        V = C.Value: GoSub 1
        Next C
     ElseIf IsArray(E) Then
        For Each V In E: GoSub 1: Next V
     Else
        V = E: GoSub 1
        End If: Next E
TEXTJOIN = Join(T, Delimiter)
Exit Function
1: If V = "" And IgnoreEmpty Then Return
N = N + 1
ReDim Preserve T(1 To N): T(N) = V
Return
End Function

JHA
 

Discussions similaires

Statistiques des forums

Discussions
311 720
Messages
2 081 885
Membres
101 830
dernier inscrit
sonia poulaert