Bonjour,
J'aurais besoin d'une fonction pour recopier le format d'une cellule
Exemple
A1 = CHF 12'500.00 (format monétaire, police 12 gras, fond bleu)
A2 = lun 12.03.2004 (format date, police 10 non gras, fond blanc)
Si dans A3 je tape : "=A1" je voudrais un fond bleu, police 12, etc.... et
si je tape "=A2" un fond blanc, etc...
Est-ce possible ?
Merci pour toute info.
Bonsour ® Thierry, une fonction ????? NON !!! une macro oui... à associer à un bouton (voir plus bas) :
Sub Reproduire_la_Mise_en_forme() '--Macro crée par geedee via l'enregistreur de macro--- Range("source").Select Selection.Copy Range("cible").Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:úlse, Transpose:úlse Application.CutCopyMode = False End Sub
Haaaaa.... mais j'y pense ;o))) dans la barre d'outils il y a DEJA (c'est là que j'ai cliqué pour récupérer ce code) !! un gros Pinceau (Reproduire la mise en forme) qui sert à ça !!!!
;o)))
-----Message d'origine----- Bonjour, J'aurais besoin d'une fonction pour recopier le format d'une cellule
Si dans A3 je tape : "¡" je voudrais un fond bleu, police 12, etc.... et
si je tape "¢" un fond blanc, etc... Est-ce possible ? Merci pour toute info.
.
Bonsour ® Thierry,
une fonction ????? NON !!!
une macro oui...
à associer à un bouton (voir plus bas) :
Sub Reproduire_la_Mise_en_forme()
'--Macro crée par geedee via l'enregistreur de macro---
Range("source").Select
Selection.Copy
Range("cible").Select
Selection.PasteSpecial Paste:=xlPasteFormats,
Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False
End Sub
Haaaaa.... mais j'y pense ;o)))
dans la barre d'outils il y a DEJA (c'est là que j'ai
cliqué pour récupérer ce code) !!
un gros Pinceau (Reproduire la mise en forme) qui sert à
ça !!!!
;o)))
-----Message d'origine-----
Bonjour,
J'aurais besoin d'une fonction pour recopier le format
d'une cellule
Bonsour ® Thierry, une fonction ????? NON !!! une macro oui... à associer à un bouton (voir plus bas) :
Sub Reproduire_la_Mise_en_forme() '--Macro crée par geedee via l'enregistreur de macro--- Range("source").Select Selection.Copy Range("cible").Select Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ SkipBlanks:úlse, Transpose:úlse Application.CutCopyMode = False End Sub
Haaaaa.... mais j'y pense ;o))) dans la barre d'outils il y a DEJA (c'est là que j'ai cliqué pour récupérer ce code) !! un gros Pinceau (Reproduire la mise en forme) qui sert à ça !!!!
;o)))
-----Message d'origine----- Bonjour, J'aurais besoin d'une fonction pour recopier le format d'une cellule