Effacer certaines plages de la ligne courante

[Zorbec Le Gras]

Bonjour à tous,

Je cherche une macro destinée à effacer certaines plages (toujours les mêmes) de la ligne courante.

Plus concrètement :
J'ai un tableau qui comprend 50 lignes, avec des noms dans la colonne B.
Comment faire pour que, lorsqu'on sélectionne une cellule de la colonne B, par exemple B10, la macro efface les plages suivantes sur la même ligne que celle de la cellule active (donc ligne 10 si B10 active) : G10:M10; O10:V10; W10:Z10

Merci d'avance à ceux qui voudront bien me communiquer le code VBA correspondant.

Bonne fin de journée

Zorbec

 

[Pierrot93]

Re : Effacer certaines plages de la ligne courante

Bonjour,

essaye ceci, à adapter :

Range("G" & ActiveCell.Row & ":M" & ActiveCell.Row & ",O" & ActiveCell.Row & ":V" & ActiveCell.Row).ClearContents

bon après midi
@+

 

[gilbert_RGI]

Re : Effacer certaines plages de la ligne courante

Bonjour

essayer ceci dans la feuille

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Target.Column <> 2 Then Exit Sub
    lig = ActiveCell.Row
    Range("G" & lig & ":M" & lig & ",O" & lig & ":V" & lig & ",W" & lig & ":Z" & lig).Select
    Selection.ClearContents
End Sub

EDIT : Bonjour Pierrot

 

[Zorbec Le Gras]

Re : Effacer certaines plages de la ligne courante

Un grand merci à vous deux,Pierrot, et Gilbert !

Comme j'affecte cette macro à un bouton j'ai opté pour la proposition de Pierrot.

Bonne soirée et bonne fin de week-end.

Zorbec