reprendre le format d'une cellule

2 réponses

Thierry

23/09/2004 à 22:40

Bonjour,
J'aurais besoin du 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.

2 réponses

LeSteph

23/09/2004 à 22:58

Bonsoir Thierry,
? a1+a2
..?...,11 moitié gras,bleu ciel...
:-))
Avec Format Mise en forme conditionnelle tu devrais déjà pouvoir
trouver des solutions plaisantes ...
Sinon sur excelabo , il y a des exemples avec plus d'options...

Amicalement

lSteph

"Thierry" a écrit dans le message de
news:

Bonjour,
J'aurais besoin du 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 : "¡" je voudrais un fond bleu, police 12, etc.... et
si je tape "¢" un fond blanc, etc...
Est-ce possible ?
Merci pour toute info.

24/09/2004 à 08:14

J'aurais besoin du fonction pour recopier le format d'une cellule
Une fonction ne peut renvoyer qu'un résultat

Bien que je ne perçoive pas vraiment l'intérêt de ta demande par rapport à un
copier/collage spécial > format
Dans le module de la feuille :

Private Sub Worksheet_Change(ByVal zz As Range)
If zz.Formula = "¡" Then
Application.EnableEvents = False
[A1].Copy
zz.PasteSpecial Paste:=xlFormats
Application.EnableEvents = True
ElseIf zz.Formula = "¢" Then
Application.EnableEvents = False
[A2].Copy
zz.PasteSpecial Paste:=xlFormats
Application.EnableEvents = True
End If
End Sub

AV

reprendre le format d'une cellule

2 réponses

Veuillez sélectionner un problème