Pas de multisélection sur les cellules H31 à H41

[isa44]

Bonjour , comment empêcher la multisélection de cellules ( en code VBA) pour seulement les cellules de H31 à H41 ?

Merci pour votre aide

 

[Papou-net]

Re : Pas de multisélection sur les cellules H31 à H41

Bonjour isa44,

Dans l'événement SelectionChange de ta feuille de calcul, une ligne de code à insérer :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Range("H31:H41"), Selection) Is Nothing Then ActiveCell.Select
End Sub

Ci-joint fichier exemple.

Bon WE.

Cordialement.

 

[isa44]

Re : Pas de multisélection sur les cellules H31 à H41

Merci cela fonctionne bien