Effacer une cellule avec VBA Excel

Fermé

Dave - 30 déc. 2010 à 01:26
Dave - 3 janv. 2011 à 18:09

Bonjour,

Je voudrais quand sélectionnant Ex: la cellule A2 que le contenu de la cellule B2 s'efface! Comment fait-on cela sur VBA Excel???

Merci!

A voir également:

Effacer une cellule avec VBA Excel
Aller à la ligne dans une cellule excel - Guide
Excel cellule couleur si condition texte - Guide
Liste déroulante excel - Guide
Verrouiller cellule excel - Guide
Formule excel pour additionner plusieurs cellules - Guide

2 réponses

Réponse 1 / 2

Mytå Messages postés 2973 Date d'inscription mardi 20 janvier 2009 Statut Contributeur Dernière intervention 20 décembre 2016 950
30 déc. 2010 à 03:18

Salut le forum

Code à mettre dans le module de ta feuille

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Not Application.Intersect(Target, Range("A2")) Is Nothing Then
    Range("B2").ClearContents
  End If
End Sub

Mytå

Dave
31 déc. 2010 à 18:35

Merci Beaucoup!!!

Mytå Messages postés 2973 Date d'inscription mardi 20 janvier 2009 Statut Contributeur Dernière intervention 20 décembre 2016 950
31 déc. 2010 à 18:43

Re le forum

Bonne Année et au plaisir de t'aider de nouveau en 2011

Mytå

Dave
3 janv. 2011 à 14:46

On est rendu en 2011 et j'ai encore un petit probleme la cellule effacer est une sélection de liste donc en faisant cette macro cela efface ma liste aucomplet je vraiment seulement que la macro efface le contenu de la cellule merci!!!

ccm81 Messages postés 10905 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 27 décembre 2024 2 428
Modifié par ccm81 le 3/01/2011 à 16:47

bonjour,
une petite modif au code de Mytâ fera l'affaire

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
  If Not Application.Intersect(Target, Range("A2")) Is Nothing Then 
    Range("B2").Value = ""  
End If 
End Sub

bonne suite

Dave
3 janv. 2011 à 17:09

Merci mais cela ne fonctionne plus la cellule B2 ne s'efface plus quand je sélection A2??

Merci encore

Réponse 2 / 2

ccm81 Messages postés 10905 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 27 décembre 2024 2 428
3 janv. 2011 à 17:25

re
je ne vois pas pourquoi B2 ne s'efface pas
la procedure s'exécute telle?
un lien vers l'exemple de Myta modifié

http://www.cijoint.fr/cjlink.php?file=cj201101/ciju0AED56.xls

bonne suite

Dave
3 janv. 2011 à 17:38

J'ai trouver mon probleme
A vrai dire ma première cellule est une fusion de AB donc moi je mettais AB dans la macro mais il fallait seulement que je mette A
Donc cela fonctionne Merci beaucoup!!!!!!

ccm81 Messages postés 10905 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 27 décembre 2024 2 428
3 janv. 2011 à 17:40

re

eviter les cellules (autres que les titres) fusionnées avec excel et les proscrire pour VBA

bon courage

Dave
3 janv. 2011 à 17:51

Merci du conseil je pensais que c'était pareil même si la cellule est fusionné mais bon merci beaucoup je le saurais pour le prochain coup :)
Pour l'instant ça fonctionne

Dave
3 janv. 2011 à 18:09

Je viens de me trouver un autre probleme à résoudre!!!

J'ai une cellule Ex D4 qui fait la somme de D1 à D3 et jai D6 qui est une liste qu'il faut que je choisisse après un nombre X donc je voudrais que lorsque D4 change que la cellule D6 s'efface comme la cellule B de tout a l'heure

J'ai essayer de faire la même macro que tout à l'heure mais cela ne fonctinne pas!

Merci !!! Beaucoup encore une fois!

Discussions similaires

Excel formule : savoir si une cellule contient partie texte