(RESOLUT)besoin de modifier code ( vider les cellules sous conditions)

chaelie2015 · 30 Juin 2015

Bonjour Forum
ci dessous un code (qui bug) pour vider les colonnes si la cellule J10-L10 (fusionnée) est vide.

Code:

If Target.Address(0, 0) = "J10:L10" Then
If [J10] = "" Then [A12:V42].ClearContents : [I46:M76].ClearContents : [P46:S76].ClearContents: [I81:K111].ClearContents: [T81:U111].ClearContents: [V81:X111].ClearContents
End If

mais ça n'a pas marché ?
Salutations

Pierrot93 · 30 Juin 2015

Re : besoin de modifier code ( vider les cellules sous conditions)

Bonjour,

essaye peut être ceci :

Code:

If Target.Address = "$J$10:$L$10" Then _
    Range("A12:V42,I46:M76,P46:S76,I81:K111,T81:U111,V81:X111") = ""

bonne journée
@+

chaelie2015 · 30 Juin 2015

Re : besoin de modifier code ( vider les cellules sous conditions)

Bonjour PIERROT
ça fonctionne parfaitement,Merci PIERROT
PBLM RESOLUT
Salutations

(RESOLUT)besoin de modifier code ( vider les cellules sous conditions)

chaelie2015

XLDnaute Accro

Pierrot93

XLDnaute Barbatruc

chaelie2015

XLDnaute Accro

Discussions similaires

(RESOLUT)besoin de modifier code ( vider les cellules sous conditions)

chaelie2015

XLDnaute Accro

Pierrot93

XLDnaute Barbatruc

chaelie2015

XLDnaute Accro

Discussions similaires

Privacy & Transparency

Privacy & Transparency