Etendre la selection

[Tail]

bonsoir
j'ai un cellule b12 qui est selectionnée et j'aimerai etendre la selection de A12 à v12 pour tout effacer.
comment faire
merci

 

[kjin]

Re : Etendre la selection

Bonsoir,
Si j'ai bien compris :

Sub efface_sel()
i = ActiveCell.Row
Range("A" & i, "V" & i).ClearContents
End Sub

A+
kjin

 

[Tail]

Re : Etendre la selection

merci de la réponse
j'essai ça des que possible
merci

 

[JHA]

Re : Etendre la selection

Bonjour Tail,

Pas sur d'avoir tout compris mais pour étendre la sélection sans VBA, après sélection de B12 appuis sur la touche Ctrl et avec la souris clique sur A12 sans relacher la touche Ctrl et le bouton gauche de la souris descend jusque la dernière cellule puis appuis sur suppr.

La touche Ctrl te permet de faire des sélection non contigues.

JHA

 

[Tail]

Re : Etendre la selection

super merci
ça marche , c'est exactement ce que je voulais
merci

 

[Tail]

Re : Etendre la selection

j'ai choisi la réponse de KJIN en vba c'est plus pratique pour moi
merci à tous