VBA remplacer la fonction ClearContents

Bonjour le Forum

Sans aucun doute basic dsl j'ai cherché mais je fatigue

Je désire effacer dans une plage de cellules le contenu des cellules, uniquement les valeurs (texte ou numérique) et non les formules ou autres

Range(Plage).ClearContents ne convient pas

M'eclairer Svp

Bisous

Cordialement

Muriel

Bonjour

Essayes

Range(Plage) = ""

Curiosité personnelle : Pourquoi tu n'utilises pas ClearContents ? (A ne pas confondre avec Clear)

Bonjour

Sans macro :

Sélectionner la plage

touche F5 ==> Cliquer sur "Cellules"

Cocher "Constantes"

Appuyer sur "Suppr"

Amicalement

Nad

Bonjour cher Banzai

ClearContent efface les formules pas les bordures

Clear efface les formules et les bordures

si je ne me gourre pas

Bisous tendre

Cordialement

Muriel

Bonjour

Suis d'accord mais alors ?

Chat a écrit :

Range(Plage).ClearContents ne convient pas

Re

Peut-être

For Each cel In Range("Plage")
If InStr(cel.Formula, "=") = 0 Then cel.Value = ""
Next cel

Edit : Avec l'enregistreur de macro, La manip donnée plus haut :

Range("Plage").SpecialCells(xlCellTypeConstants, 23).ClearContents

Nad

Bonjour

Désolé suis à côté de la plaque

Re Banzai et Nad

Banzai pas grave repose toi

Nad ca colle avec la formule qui suit ' juste qu'il ne faut pas les "" à (plage)

Merci bisous ( j'ai eu peur qu'il existe une fonction simple genre "Cleartruc" et que le mod ne m'excommunie )

For Each cel In Range("Plage")

If InStr(cel.Formula, "=") = 0 Then cel.Value = ""

Next cel

Bisous à vous deux

Cordialement

Muriel