XL 2016 concatener avec respect de la nomenclature

eastwick à dit:

Afin d'injecter un fichier csv dans un logiciel de comptabilité, j'aimerais savoir comment concatener des cellules en respectant leur nomenclature.
Ex : 500,00 doit rester 500,00 et 28/11/2024 doit demeurer 28/11/2024, etc...

Cliquez pour agrandir...

TooFatBoy à dit:

Pas de Joindre sous 2016.

Cliquez pour agrandir...

vgendron à dit:

Bonjour

avec la fonction Joindre.texte ? (pas sur qu'elle existe dans votre version)


JOINDRE.TEXTE(";";0;A1:V1)
sinon. avec une fonction perso

VB:

Public Function Joindre(target As Range) As String

For i = 1 To target.Count
    temp = temp & target(1, i) & ";"
Next i
    Joindre = Left(temp, Len(temp) - 1)
End Function

Cliquez pour agrandir...

eastwick à dit:

Bonjour vgendron, comment ça fonctionne ?

Cliquez pour agrandir...

vgendron à dit:

bah euh.. avec plus de 1000 messages, je n'imaginais pas qu'il fallait t'expliquer ca...

tu mets le code de la fonction dans un module standard (tu en as déjà 5 ou 6 vides)

et dans excel.. suffit de taper
=joindre (A1:V1)

Cliquez pour agrandir...

vgendron à dit:

bah euh.. avec plus de 1000 messages, je n'imaginais pas qu'il fallait t'expliquer ca...

tu mets le code de la fonction dans un module standard (tu en as déjà 5 ou 6 vides)

et dans excel.. suffit de taper
=joindre (A1:V1)

Cliquez pour agrandir...

eastwick à dit:

Les nombres comme 50000,00 donnent 50000...

Cliquez pour agrandir...

TooFatBoy à dit:

target(1, i).text

Cliquez pour agrandir...