Supprimer la valeur d'une cellule

Résolu/Fermé
Tireur50 Messages postés 12 Date d'inscription vendredi 14 avril 2023 Statut Membre Dernière intervention 8 mai 2023 - 14 avril 2023 à 12:30
Tireur50 Messages postés 12 Date d'inscription vendredi 14 avril 2023 Statut Membre Dernière intervention 8 mai 2023 - 14 avril 2023 à 15:59

Bonjour,

Fraichement arrivé sur CCM et grand débutant dans Excel, je cherche à supprimer le contenu d'une cellule dès que je renseigne la cellule voisine.

Ex: en colonne A (Estimation) en colonne B (Réel)

Merci par avance,

Bonne journée


Windows / Edge 112.0.1722.39

A voir également:

4 réponses

yg_be Messages postés 22707 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 19 avril 2024 1 471
14 avril 2023 à 13:18

bonjour,

peut-être en mettant ce code dans la feuille:

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 Then
    If Target.Column = 2 Then
        Target.Offset(, -1) = ""
    End If
End If
End Sub
1
Tireur50 Messages postés 12 Date d'inscription vendredi 14 avril 2023 Statut Membre Dernière intervention 8 mai 2023
14 avril 2023 à 14:56

Grand Merci,

le code fonctionne.

Très bonne après-midi

0
Tireur50 Messages postés 12 Date d'inscription vendredi 14 avril 2023 Statut Membre Dernière intervention 8 mai 2023
14 avril 2023 à 15:41

Désolé de vous solliciter de nouveau,

la formule marche très bien dans mon nouveau tableau, mais ne fonctionne pas dans un tableau existant ou les données

 sont en colonne H (Estimé) et en colonne I (Réel).

Je ne suis pas encore assez féru dans Excel pour résoudre seul ce problème !

Merci

0
yg_be Messages postés 22707 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 19 avril 2024 1 471
14 avril 2023 à 15:47

Le "2" en ligne 5, c'est le numéro de la colonne "estimée".

Le code est exécuté quand le contenu de la feuille change.  Il vérifie qu'une seule cellule est changée, que le changement est dans la colonne 2, et vide la cellule à gauche.

0
Tireur50 Messages postés 12 Date d'inscription vendredi 14 avril 2023 Statut Membre Dernière intervention 8 mai 2023
14 avril 2023 à 15:59

Merci pour les explications , c'est très sympa

0