Recherche:

Bonjour,

J'espère que tu as trouvé la réponse à ta question tout seul, sinon un simple test permet d'y répondre non?

Et vraiment au cas où, il manquait juste deux ligne mais je les pensais...

Faut faire attention avec les fusion, ça fait foirer des macro parfois

pour ton problème de valeur par défaut, un exemple vite fait:
si ya rien alors tu met arial
(je t'autorise à changer arial...

Un seul mot sur plusieurs cellules?


Normalement, avec le code que tu as si tu change la police dans et que tu relance la macro la police du mot change.
Si tu veux que ce soit automatique, c'est...

edit:
My bad, j'avais mal compris.
Si je comprends mieux ceci marche

Range("J16:U17").Font.Name = Range("D2")
Mais c'est exactement ton code ... (sans le select et le with)
Du coup il doit y...

Bonjour,
Ceci:

Range("J16:U17").Font.Name = Range("D2").Font.Name
Devrais convenir.