XL 2019 Concatener avec des 0

J

JHA

XLDnaute Barbatruc

• 3 Septembre 2019

• #2

Bonjour à tous,

Peut être:

VB:

=TEXTE(A1;"###00000")&TEXTE(B1;"###00000")

JHA

 

Vote positif 0 Vote négatif

L

LAMEMM

XLDnaute Nouveau

• 3 Septembre 2019

• #3

JHA à dit:

Bonjour à tous,

Peut être:

VB:

=TEXTE(A1;"###00000")&TEXTE(B1;"###00000")

JHA

Cliquez pour agrandir...

Merci ça fonctionne !!!

J'en profite Si je veux concatener de la même mais cette fois avec parfois des 0 et pas de 0 et le tout est de dérouler la fomule en prenant en compte chaque hypothèses (voir fichier feuil1).

Merci

 

Pièces jointes

• Copie.xlsx

  12.9 KB · Affichages: 9

Vote positif 0 Vote négatif

J

JHA

XLDnaute Barbatruc

• 4 Septembre 2019

• #4

Bonjour à tous,

A essayer,

VB:

=TEXTE(A1;"###00000000")&TEXTE(A2;"00")

JHA

 

Pièces jointes

• Copie (1).xlsx

  12.9 KB · Affichages: 5

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 4 Septembre 2019

• #5

Bonjour LAMEMM, JHA,

Avec cette fonction VBA aucun souci :

VB:

Function ConcatText(c1 As Range, c2 As Range)
ConcatText = c1.Text & c2.Text
End Function

Pour pouvoir l'utiliser dans la feuille de calcul le code doit impérativement être placé dans un module standard.

Fichier .xlsm joint.

A+

 

Pièces jointes

• ConcatText(1).xlsm

  22.9 KB · Affichages: 3

Vote positif 0 Vote négatif