Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Philippe.R
Bonsoir, Possible avec VBA et dans le module de feuille :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) On Error Resume Next If IsEmpty(Selection.Value) Then Exit Sub Selection.Value = Selection.Value * 1000 End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre facilement le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
a écrit dans le message de news:b78d01c47983$52542760$ Bonjour, Si je tape des grand nombres...
Exemple: 250 000; 156 000; 456 000, etc
Comment faire pour éviter de taper les 3 zéros? Je pense qu'il faut créer un format personnalisé, mais je coince...
Merci,
Frédéric
Bonsoir,
Possible avec VBA et dans le module de feuille :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
If IsEmpty(Selection.Value) Then Exit Sub
Selection.Value = Selection.Value * 1000
End Sub
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre facilement le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)
<malevitchfrederic@discussions.microsoft.com> a écrit dans le message de
news:b78d01c47983$52542760$a301280a@phx.gbl...
Bonjour,
Si je tape des grand nombres...
Exemple: 250 000; 156 000; 456 000, etc
Comment faire pour éviter de taper les 3 zéros? Je pense
qu'il faut créer un format personnalisé, mais je coince...
Bonsoir, Possible avec VBA et dans le module de feuille :
Private Sub Worksheet_SelectionChange(ByVal Target As Range) On Error Resume Next If IsEmpty(Selection.Value) Then Exit Sub Selection.Value = Selection.Value * 1000 End Sub
-- Amicales Salutations Retirer A_S_ pour répondre. XL 97 / 2000 / 2002 Pour suivre facilement le forum : news://msnews.microsoft.com/microsoft.public.fr.excel (Voulez-vous vous abonner ? -> Oui)
a écrit dans le message de news:b78d01c47983$52542760$ Bonjour, Si je tape des grand nombres...
Exemple: 250 000; 156 000; 456 000, etc
Comment faire pour éviter de taper les 3 zéros? Je pense qu'il faut créer un format personnalisé, mais je coince...
Merci,
Frédéric
RaMA
Bonsoir
Pour la feuille de saisie
Private Sub Worksheet_Activate() Application.FixedDecimal = True Application.FixedDecimalPlaces = -3 End Sub
Private Sub Worksheet_Deactivate() Application.FixedDecimalPlaces = 0 Application.FixedDecimal = False End Sub
Tu peux également le faire au niveau workbook
Salutations
RaMa -- . a écrit dans le message de news:b78d01c47983$52542760$ Bonjour, Si je tape des grand nombres...
Exemple: 250 000; 156 000; 456 000, etc
Comment faire pour éviter de taper les 3 zéros? Je pense qu'il faut créer un format personnalisé, mais je coince...
Merci,
Frédéric
Bonsoir
Pour la feuille de saisie
Private Sub Worksheet_Activate()
Application.FixedDecimal = True
Application.FixedDecimalPlaces = -3
End Sub
Private Sub Worksheet_Deactivate()
Application.FixedDecimalPlaces = 0
Application.FixedDecimal = False
End Sub
Tu peux également le faire au niveau workbook
Salutations
RaMa
--
.
<malevitchfrederic@discussions.microsoft.com> a écrit dans le message de
news:b78d01c47983$52542760$a301280a@phx.gbl...
Bonjour,
Si je tape des grand nombres...
Exemple: 250 000; 156 000; 456 000, etc
Comment faire pour éviter de taper les 3 zéros? Je pense
qu'il faut créer un format personnalisé, mais je coince...
