Selection.NumberFormat problème de caractère

Bonjour et bonne année à toutes et à tous.

Voici mon problème

J'essai d'automatiser un format nombre en incluant la valeur d'une cellule.

Voici l'exemple qui donne comme résultat : AC - 2017 - 0001 (car il y a 2017 en C2)

Sub Macro2()

'

' Macro2 Macro

'

Range("B10:B24").Select

Selection.NumberFormat = " AC - " & Range("c2").Value & " - 0000"

End Sub

Mon problème est que je souhaite afficher BC - 2017 - 0001

Dès que je remplace le A par un B dans le code, la macro plante, erreur d'exécution '1004'

Je sèche totalement sur mon problème.

Merci pour votre aide.

Amicalement.

Fred.

Bonjour et bienvenue sur le forum

Essaie en remplaçant tes 2 instructions par celle- ci :

Range("B10:B24") = " AC - " & Range("c2").Value & " - 0000"

Résultat ?

Bye !

gmb a écrit :

Bonjour et bienvenue sur le forum

Essaie en remplaçant tes 2 instructions par celle- ci :

Range("B10:B24") = " AC - " & Range("c2").Value & " - 0000"

Résultat ?

Bye !

Merci de ton attention,

Effectivement, quand je remplace AC par BC je n'ai pas de soucis mais par contre toutes mes valeurs contenues dans les cellules B10 à B24 s'affichent 0000 au lieu de 0001, 0002, 0003 etc...

Je vais joindre le fichier pour être plus clair.

Alors, essaie ça :

    Dim pref$
    pref = "Ac - " & Range("C2") & " - "
    Range("B10:B24").NumberFormat = """" & pref & """ 0000"

Résultat ?

Bye !

SUPER !!!!

Un grand MERCI, ça marche nickel.

Je peux dire que le sujet est résolu.

Bonne journée à vous et merci pour votre précieuse aide.

@ bientôt...