XL 2016 concatener avec respect de la nomenclature

[eastwick]

Bonjour le forum,
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...
Le fichier vous aidera à mieux appréhender ma requête.
Je vous remercie.

 

[TooFatBoy]

Bonjour,

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...

Tu veux le faire par VBA ou par formule ?

Par VBA, je pense qu'il suffit d'un &.
Par formule, il doit falloir passer par des TEXTE et un &.

 

[vgendron]

Bonjour

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


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

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

 

[TooFatBoy]

Salut vgendron 😉

Pas de Joindre sous 2016.

 

[vgendron]

Pas de Joindre sous 2016.

Hello Toofatboy

 

[eastwick]

Peu importe, je vous fais confiance, du moment que le résultat escompté soit là

 

[vgendron]

je viens de voir que la fonction "joindre.texte" changeait le format des dates en standard==> ca ne donnerait donc pas le résultat attendu

par contre, ma fonction perso semble ok

 

[eastwick]

Bonjour

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


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

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

Bonjour vgendron, comment ça fonctionne ?

 

[vgendron]

Bonjour vgendron, comment ça fonctionne ?

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)

 

[eastwick]

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)

Merci vgendron, ça fonctionne. Très peu calé en VBA, plus en excel pur. Encore merci

 

[eastwick]

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)

Les nombres comme 50000,00 donnent 50000...

 

[TooFatBoy]

Les nombres comme 50000,00 donnent 50000...

target(1, i).text

 

[eastwick]

target(1, i).text

Merci TooFatBoy !!!