XL 2010 Suppression de valeur et incidence sur autre cellule

Romain31 · 30 Octobre 2020

Bonjour à tous,

Le principe :
Si je supprime la valeur en B2, la valeur en B4 doit être supprimée automatiquement

Ce code fonctionne
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("B2") = "" Then Range("B4").ClearContents
End Sub

Mais si j'ai des cellules fusionnées, cela ne fonctionne pas
B16 - B18

Merci pour votre aide

M12 · 30 Octobre 2020

Bonjour,
Comme ceci pour les cellules fusionnées

VB:

If Range("B16") = "" Then Range("B18:E18").ClearContents

JHA · 30 Octobre 2020

Bonjour à tous,

Au lieu de fusionner les colonnes, faire un alignement horizontal sur plusieurs colonnes.

JHA

Romain31 · 30 Octobre 2020

Bonjour M12 et JHA et merci pour vos réponses.
J'avais testé la plage complète pour les cellules B16 et B18 mais en indiquant seulement B18:E18 comme le propose M12, cela fonctionne.
En ce qui concerne la proposition de JHA (centré sur plusieurs colonnes) , qui fonctionne également, je l'avais testée hier soir mais elle ne fonctionnait pas. Peut-être en raison de la version d'Excel (à la maison) qui est 2010.
Très bonne journée

XL 2010 Suppression de valeur et incidence sur autre cellule

Romain31

XLDnaute Occasionnel

Pièces jointes

M12

XLDnaute Accro

JHA

XLDnaute Barbatruc

Pièces jointes

Romain31

XLDnaute Occasionnel

Discussions similaires