Formule qui multiplie automatiquement

quelle multiplie sur une autre cellule c ca ??

Non automatiquement dans la même cellule.
Peut-être avec une macro mais je ne m'y connait pas... et vous?

okok. ben peut etre mais , j'avoue ..
Mais tu multipli par une valeur fixe ?

Oui c'est ça je souhaite que les cellules que je remplis se multiplie toutes pas 800

tu fai juste =1*800 ==> qui te donne 800 logique

Non je ne pense pas car si je tape cette formule le résultat qui apparaitra sera 800
alors que je souhaite que le chiffre saisi se multiplie par 800
par exemple en cellule
A2 --> je saisie 5 et la cellule affiche automatiquement 4000
A3--> je saisie 2 et la cellule affiche automatiquement 1600

Je souhaite éviter de devoir tout multiplier à chaque fois en 5*800;2*800 car j'ai beaucoup de cellule à remplir.
Merci

ok...ben la je vois pas...
ah moin que tu copie collme : "=800*" sur toute les cellules. puis tu remplie le reste par le champ du haut...

Alors, je vais te dire un truc tout simple parce que sur Excel, je ne suis capable que de faire du simple
Tu écris dans ta colonne A, par exemple 2, tu vas dans ta colonne B, tu cliques dans ta barre sur le symbole somme qui ressemble à un E (ou sigma), tu vas avoir =SOMME(A1), tu insères entre le 1 et ta parenthèse le signe * (multiplié sur ton clavier numérique) et 800. Ce qui te donnes : =SOMME(A3*800) puis tu cliques sur le V vert, sur la gauche et tu as ton produit. Ensuite, tu sélectionnes ta ligne avec tes deux colonnes A et B et tu tires sur le petit carré noir sur la droite en tenant le clic gauche de ta souris appuyé. Tu vas avoir une série de chiffres qui suivent 2 sur ta colonne A et le produit sur la colonne B, tu n'as qu'à effacer les chiffres dans ta colonne A et les remplacer par les chiffres que tu veux et à chaque fois tu auras ton produit dans la colonne B.
Voilà, c'est de la bidouille d'amateur, mais c'est une façon.

bonsoir
j'ai ça a coller dans la feuille ( clic droit sur l'onglet>visualiser le code >tu colles ça
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Set plg = Range("a1:z1000")
For Each cell In plg
If cell.Value <> 0 Then cell.Value = cell.Value * 800

Next cell
End Sub
bonne soirée

re,

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, Range("A1:A10")) Is Nothing Then Exit Sub
    If IsNumeric(Target) Then
        Application.EnableEvents = False
        Target = Target * 800
        Application.EnableEvents = True
    End If
End Sub

eric

Merci de toutes vos réponses,
Mais je ne m'y connais pas du tout en macro et là je suis perdue.
Pourriez-vous me détailler pas à pas, la manipulation a exécuter s'il vous plait?
MERCI

-clic-droit sur le nom d'onglet de la feuille concernée et choisir 'visualiser le code'
-coller le code