OVH Cloud OVH Cloud

ne pas écraser une formule par un chiffre

4 réponses
Avatar
FRED
Bonjour,

Je souhaiterais savoir si il est possible d'effectuer la manip suivante:

En A1, j'ai une formule qui me calcule = B1xG19
Je rentre mon chiffre dans B1, le résultat s'affiche dans A1
Je me positionne sur A1 et veut remettre le chiffre à 0 (c'était son état
initial).
Lorsque je fais ceci, la formule de la cellule A1 s'efface.
Y a-t-il moyen de faire en sorte que la fomule ne s'efface pas lorsque l'on
tape0 ?

Merci,

FRED.

4 réponses

Avatar
anomymousA
bonjour,

non.

A+


Bonjour,

Je souhaiterais savoir si il est possible d'effectuer la manip suivante:

En A1, j'ai une formule qui me calcule = B1xG19
Je rentre mon chiffre dans B1, le résultat s'affiche dans A1
Je me positionne sur A1 et veut remettre le chiffre à 0 (c'était son état
initial).
Lorsque je fais ceci, la formule de la cellule A1 s'efface.
Y a-t-il moyen de faire en sorte que la fomule ne s'efface pas lorsque l'on
tape0 ?

Merci,

FRED.






Avatar
AV
Y a-t-il moyen de faire en sorte que la fomule ne s'efface pas lorsque l'on
tape0 ?


Oui mais c'est sans aucun intérêt..me semble-t-il :
Dans le module de la feuille

Private Sub Worksheet_Change(ByVal Target As Range)
With Application
.EnableEvents = False
.Undo
.EnableEvents = True
End With
End Sub

AV

Avatar
FRED
Bonjour,

Effectivement, c'est une demande utilisateur mais je ne vois pas trop
l'intérêt.
Ce qui m'a fait me poser la question est que la personne assure "qu'avant ça
marchait"...
Je vais aller lui dire d'arrêter la coke!

Merci.

FRED.


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

Y a-t-il moyen de faire en sorte que la fomule ne s'efface pas lorsque
l'on


tape0 ?


Oui mais c'est sans aucun intérêt..me semble-t-il :
Dans le module de la feuille

Private Sub Worksheet_Change(ByVal Target As Range)
With Application
.EnableEvents = False
.Undo
.EnableEvents = True
End With
End Sub

AV





Avatar
anomymousA
re,

t'as raison, je vois pas l'interet. Au fait je t'ai répondu pour match et
countif dans l'autre fil.

A+


Y a-t-il moyen de faire en sorte que la fomule ne s'efface pas lorsque l'on
tape0 ?


Oui mais c'est sans aucun intérêt..me semble-t-il :
Dans le module de la feuille

Private Sub Worksheet_Change(ByVal Target As Range)
With Application
.EnableEvents = False
.Undo
.EnableEvents = True
End With
End Sub

AV