VBA effacer contenu cellule si elle même contient... [Résolu/Fermé]

kealvin 10 Messages postés mercredi 23 novembre 2016Date d'inscription 9 janvier 2017 Dernière intervention - 23 nov. 2016 à 23:21 - Dernière réponse : kealvin 10 Messages postés mercredi 23 novembre 2016Date d'inscription 9 janvier 2017 Dernière intervention
- 24 nov. 2016 à 07:05
Bonjour,
Qu'elle serait le code pour effacer le contenu d'une cellule si elle même contient la lettre A .

Cordialement
Afficher la suite 

5 réponses

Patrice33740 6541 Messages postés dimanche 13 juin 2010Date d'inscription 19 janvier 2018 Dernière intervention - Modifié par Patrice33740 le 23/11/2016 à 23:52
0
Utile
Bonjour,

Exemple :
Option Explicit
Sub Test()
Dim c As Range
    ' définir la cellule concernée
    Set c = Worksheets("Feuil1").Range("B12")
    ' tester le contenu
    If c.Value = "A" Then
        ' effacer son contenu
        c.ClearContents
    End If
End Sub

Cordialement
Patrice
Utilisateur anonyme - 23 nov. 2016 à 23:59
0
Utile
Bonjour kealvin, bonjour le forum,

Si ta cellule est par exemple D5, je te propose ce code VBA :

  If [D5] = "A" Then [D5].ClearContents

Ou si tu préfères :

  If [D5] = "A" Then [D5] = ""

Si ton problème est réglé, merci d'aller en haut de page
pour cliquer sur « Marquer comme résolu ».

Cordialement.  😊
 
eriiic 21284 Messages postés mardi 11 septembre 2007Date d'inscriptionContributeurStatut 21 janvier 2018 Dernière intervention - 24 nov. 2016 à 00:09
0
Utile
1
Bonjour,

le même qu'ici : http://www.commentcamarche.net/forum/affich-34123722-vba-effacer-cellule-si-elle-meme-contient#p34123824
Merci d'éviter les doublons...
eric
kealvin 10 Messages postés mercredi 23 novembre 2016Date d'inscription 9 janvier 2017 Dernière intervention - 24 nov. 2016 à 07:04
Bonjour ,
Effectivement j'ai fait une mauvaise manip lors de mon inscription désolé
kealvin 10 Messages postés mercredi 23 novembre 2016Date d'inscription 9 janvier 2017 Dernière intervention - 24 nov. 2016 à 07:05
0
Utile
Bonjour , et un grand merci à tous