Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel [VBA]Comment tester une multisélection ?

[VBA]Comment tester une multisélection ?

2 réponses
Avatar
J-J
Bonjour à toutes et à tous,

Dans une sub Worksheet_Change, comment tester :

private sub Worksheet_Change (ByVal Target As Range)

if(j'ai plusieurs cellule sélectionnées) then
exit sub
end if

end sub

Afin d'éviter une erreur dans la suite du code.

Merci d'avance

Jean-Jacques
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
j
if target.cells.count>1 then...



"J-J" <yenapasacauseduspam> a écrit dans le message de news:

Bonjour à toutes et à tous,

Dans une sub Worksheet_Change, comment tester :

private sub Worksheet_Change (ByVal Target As Range)

if(j'ai plusieurs cellule sélectionnées) then
exit sub
end if

end sub

Afin d'éviter une erreur dans la suite du code.

Merci d'avance

Jean-Jacques




Avatar
J-J
Yep,

merci encore Jac.
:-))))

jean-jacques

"" a écrit dans le message de news:
4046d897$0$2458$
if target.cells.count>1 then...



"J-J" <yenapasacauseduspam> a écrit dans le message de news:

Bonjour à toutes et à tous,

Dans une sub Worksheet_Change, comment tester :

private sub Worksheet_Change (ByVal Target As Range)

if(j'ai plusieurs cellule sélectionnées) then
exit sub
end if

end sub

Afin d'éviter une erreur dans la suite du code.

Merci d'avance

Jean-Jacques