VBA effacer contenu cellule si elle même contient...

Résolu/Fermé
kealvin Messages postés 10 Date d'inscription mercredi 23 novembre 2016 Statut Membre Dernière intervention 9 janvier 2017 - 23 nov. 2016 à 23:21
kealvin Messages postés 10 Date d'inscription mercredi 23 novembre 2016 Statut Membre Dernière intervention 9 janvier 2017 - 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

4 réponses

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 775
Modifié par Patrice33740 le 23/11/2016 à 23:52
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
0