Mise en forme au moyen d'une fonction VBA

Bonjour à toutes et tous,

Je suis, hélas, incapable pour le moment d'obtenir au moyen d'une fonction VBA la mise en forme suivante :

J'ai une zone nommée "FraisEnvoi" qui indique par seuil de commande le montant de la participation demandée.

Mon besoin est, à partir de cette zone, d'obtenir dans UNE SEULE CELLULE les différents paliers et le montant de la participation.

Exemple :

Seuil - Montant

6-16.50 €

12-21.65 €

18-26.80 €

Obtenir dans une cellule :

6 Blles : 16.50 €

12 Blles : 21.65 €

18 Blles : 26.80 €

Je joins à ma demande un petit fichier et vous remercie par avance de vos conseils éclairés !

Bonjour,

une solution avec une fonction personnalisée.

à utiliser ainsi

=mefbp(FraisEnvoi)

Function mefbp(r As Range) As String
    If r.Columns.Count <> 2 Then Exit Function
    sep = ""
    For Each rw In r.Rows
        m = m & sep & Format(rw.Cells(1, 1), "#0") & " blles : " & Format(rw.Cells(1, 2), "#0.00 €")
        If sep = "" Then sep = vbCrLf
    Next
    mefbp = m
End Function

Bonjour,

As-tu pensé à utiliser l'outil 'Appareil photo'?

voir exemple.

Cdlt.

h2so4 ........ Grand merci !!

Outre la solution à mon problème.... votre code va m'aider à "grandir" dans Excel.

Jean-Eric a écrit :

As-tu pensé à utiliser l'outil 'Appareil photo'?

Hélas non... je ne connais pas cet outil. Où est-il caché ?

Je renouvelle mes remerciements pour votre participation très.... réactive !