Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Effacer si cellule remplie, mettre "X" si cellule vide

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

mounier1950

XLDnaute Nouveau
Bonjour à tous et à tous,

Je vous félicite pour votre travail (un peu de flagornerie).

Ma question me fait rougir et va vous sembler ridicule, mais voilà :

Soit une grille de chiffres (de A3 à C3 par ex) qui contient des cases vides.

- si une cellule contient un chiffre il faut effacer le chiffre, elle devient donc vide
- si une cellule est vide, il faut la remplir par un "X"

Si vous pouviez m'aider ...
 
Re : Effacer si cellule remplie, mettre "X" si cellule vide

bjr

pourrais tu mettre un fichier d'exemple de ce que tu veux . Parce que la si la grille A3:C3 est vide comment peut elle avoir des chiffres dedans?
 
Re : Effacer si cellule remplie, mettre "X" si cellule vide

Bonjour, Je te propose ça:


Sub test()
'déclaration
Dim myRange As Range
Dim cell As Range
Set myRange = ActiveSheet.Range("A3:C3")

'on boucle sur la plage
For Each cell In myRange
'si la plage est vide on efface
If cell <> Empty Then
cell.Clear
Else
'sinon on met un X
cell = "X"
End If
Next
End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…