Effacer contenu et pas formule d'une cellule

[Kouks]

Bonjour tout le monde,

Est-il possible de faire en sorte qu'un commandbutton qui à le code suivant

Private Sub CommandButton1_Click()
[G24] = ""
End Sub

n'efface que la valeur de la cellule et non la fonction qu'elle contient?

Merci d'avance

 

[JeanMikael]

Re : Effacer contenu et pas formule d'une cellule

Bonjour kouks, bonjour le forum


Sans passer par macro test ceci il s'agit de mettre tes valeurs en constantes ce qui te permettra de garder tes formules j'ai pas testé, dis moi si sa marche

1. sélectionner la zone
2. appuyer sur la touche {F5}
3. dans la fenêtre qui apparaît cliquer sur le bouton 'cellule'.
4. faire sa sélection dans la fenêtre qui apparaît (dans ton cas: sélectionner 'Constante'...tu peux affiner en déselectionnant les cases à cocher sous formule - Nombres, etc...).
5. tu valides avec OK et le tour est joué.

Bonne journée

Cordialement,
Jean-Mikaël

 

[Kouks]

Re : Effacer contenu et pas formule d'une cellule

Cher JeanMikael,

merci pour avoir répondu cependant ta proposition ne semble pas marcher aurait-tu une autre solution.

merci encore

 

[pierrejean]

Re : Effacer contenu et pas formule d'une cellule

bonjour Kouks

telle que tu poses la question , je crains que la reponse soit non

par contre on peut imaginer une formule qui permette d'avoir la cellule a "" tout en conservant ladite formule

vois le fichier joint
le bouton agit sur A1
la formule brute est A2+A3
la formule qu'il faut avoir est
=SI(A1=1;A2+A3;"")

 

[Catrice]

Re : Effacer contenu et pas formule d'une cellule

Bonjour,

2 solutions :
- Effacer carrement la formule (et la remettre par macro en cas de besoin)
- Effacer les cellules auxquelles se refère la formule.
La macro ci-dessous fait ça :

Sub test()
Range("C12").Precedents.ClearContents
End Sub

Mais attention si la formule est du type : =A2/B6, il ne faudra pas effacer B6 au risque de récupérer #DIV0 dans la cellule ...

Dans ce cas il faudra faire un traitement particulier des cellules.

Voir fichier joint

Sinon, sans macro, il suffit de se mettre sur la cellule contenant la formule et :
- appuyer sur F5
- Cliquer sur Cellules
- Cocher Antécédents
- OK

Toutes les cellules sont selectionnées, il ne reste plus qu'à appuyer sur Suppr ou Del du clavier.
(La solution peut dépendre de la version d'Excel)

 

[Kouks]

Re : Effacer contenu et pas formule d'une cellule

Bonjour pierrejean,

je crois que me suis mal exprimé je vais retenter.

j'ai une cellule A1 qui est Egale à A2 + A3

Je voudrais un bouton qui efface seulement le la valeur de A1 mais non la formule A1=A2+A3

j'éspère que je suis plus claire

Merci pour ton temps

 

[Tibo]

Re : Effacer contenu et pas formule d'une cellule

Bonjour,

Une cellule ne peut être effacée et contenir en même temps une formule.

Dans ton cas, ce sont les cellules A2 et A3 qu'il faut effacer. On peut les repérer par Outils - Audit - Repérer les antécédents.

@+

 

[Kouks]

Re : Effacer contenu et pas formule d'une cellule

Merci Tibo et catrice pour vos réponses je crois que je comprend je vais procédé autrement.

Merci encore