Format de cellule avec séparateur décimal... texte

Bonjour,

Un clic droit sur l'onglet de la feuille et tu sélectionnes la commande "Visualiser le code"

dans la page blanche, tu inscris :
Dans la procédure, tu remplaces la plage Range("A:A") par l'adresse de
la plage où tu veux appliquer le format

A ) pour ce qui est de 1.45, le format sera 1 ha,45 a
On doit maintenir la virgule sinon comment Excel peut discriminer
la partie décimale de la partie entière... il est toujours possible
d'y insérer ce que tu désires, mais ce ne sera pas un format de cellule
et tu ne pourras plus effectuer de calcul avec le contenu.

B ) la procédure lorsqu'elle modifie une entrée 0.75 en 75 a
bien que ce soit un format de cellule, la valeur de la cellule
est maintenant de 75 dans la cellule et non plus de .75 Si tu
dois utiliser le contenu de la cellule pour d'autres calculs, tu devras
en tenir compte...

'-------------------------------------------------
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Rg As Range, C As Range
Set Rg = Intersect(Range("A:A"), Target)
Application.EnableEvents = False
If Not Rg Is Nothing Then
For Each C In Rg
If C.Value > 1 Then
If C - Evaluate("trunc(" & C.Value & ")") = 0 Then
C.NumberFormat = "# ##0"" ha"""
Else
C.NumberFormat = "###0"" ha"".00"" a"""
End If
Else
C.Value = C * CLng(1 & Application.Rept(0, Len(Replace(C, "0,", ""))))
C.NumberFormat = "# ##0"" a"""
End If
Next
End If
Application.EnableEvents = True
End Sub
'-------------------------------------------------



MichD
--------------------------------------------
"HD" a écrit dans le message de groupe de discussion : ie5bd2$1g3g$1@saria.nerim.net...

Bonjour,

J'ai un ensemble de cellule sur lequel je voudrais un format qui fasse que
si je tape :
1,75 qu'il me soit affiché : 1 ha 75 a
2 qu'il me soit affiché : 2 ha
0,1 qu'il me soit affiché : 10 a

Est ce possible ?

Merci d'avance pour votre aide
--
@+
HD

bonjour HD,

au menu, Format, Cellule, onglet Nombre, Personnalisé, ###0" ha ".00" a"

isabelle

Le 2010-12-13 09:42, HD a écrit :

Bonjour,

J'ai un ensemble de cellule sur lequel je voudrais un format qui fasse que
si je tape :
1,75 qu'il me soit affiché : 1 ha 75 a
2 qu'il me soit affiché : 2 ha
0,1 qu'il me soit affiché : 10 a

Est ce possible ?

Merci d'avance pour votre aide

Bonjour,
en laissant la virgule , voici un format personnalisé possible
[<1],#0" a";# ##0" ha",00" a"

ça donne
1 ha,75 a
2 ha,00 a
,10 a

Michel

"HD" <hd@anti.spam.fr> a écrit dans le message de news:
ie5bd2$1g3g$1@saria.nerim.net...

Bonjour,

J'ai un ensemble de cellule sur lequel je voudrais un format qui fasse que
si je tape :
1,75 qu'il me soit affiché : 1 ha 75 a
2 qu'il me soit affiché : 2 ha
0,1 qu'il me soit affiché : 10 a

Est ce possible ?

Merci d'avance pour votre aide
--
@+
HD

Bonsour®

"HD" a écrit

J'ai un ensemble de cellule sur lequel je voudrais un format qui fasse que si
je tape :
1,75 qu'il me soit affiché : 1 ha 75 a
2 qu'il me soit affiché : 2 ha
0,1 qu'il me soit affiché : 10 a

format personnalisé :
[<100]#0" ca";[<10000]#0" a "#0" ca";#0" ha "#0" a "#0" ca"

format personnalisé :
[<100]#0" ca";[<10000]#0" a "#0" ca";#0" ha "#0" a "#0" ca"

Effectivement... C'est ce qui se rapprocherait le plus de ce que je
recherche. Très judicieux !!!

Je remercie tout ceux qui ont répondu à ma question.

--
@+
HD

Bonsour®

"HD" a écrit

format personnalisé :
[<100]#0" ca";[<10000]#0" a "#0" ca";#0" ha "#0" a "#0" ca"

Effectivement... C'est ce qui se rapprocherait le plus de ce que je recherche.
Très judicieux !!!

bien évidement il faut saisir des m² !!!!