Reprendre le format d'une autre cellule ?

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Thierry - 30 Sep 2004 22:22 GMT

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.

Reply to this Message

Trevor Shuttleworth - 01 Oct 2004 00:10 GMT

Thierry

oui, c'est possible. Vous avez besoin d'un fonction dans le VBA:

Function CellFormula(Rng As Range) As String
CellFormula = Rng.Formula
End Function

Maintenant vous pouvez utiliser le Conditional Formatting (comment on dit en
francais ?)

Par exemple:

Formule 1: =RIGHT(CellFormula(A3),2)="A1" c'est DROITE(... ?

et vous choisissez le format: format mon?taire, police 12 gras, fond bleu

Formule 2: =RIGHT(CellFormula(A3),2)="A2"

et vous choisissez le format: format date, police 10 non gras, fond blanc.

Pardonez-moi pour mon francais mauvais.

Bon chance

Trevor

> Bonjour,
> J'aurais besoin du fonction pour recopier le format d'une cellule
[quoted text clipped - 5 lines]
> Est-ce possible ?
> Merci pour toute info.

Reply to this Message