Ouvir une liste de validation ou pas si....

Paf

XLDnaute Barbatruc

• 5 Novembre 2016

• #2

Bonjour,

Vous pouvez rajouter un test sur le nombre de cellules > 0; si le test est vrai on quitte la sub sinon on active l'USF :

Code:

If WorksheetFunction.CountIf([F27:NF27], ">0") > 0 then 'il y a au moins 1 cellule > 0

A+

 

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 5 Novembre 2016

• #3

Re, le forum, Paf

Merci pour ta solution, Paf, mais je souhaiterais ouvrir ou pas l'USF...
en fonction de chaque cellules et non sur le résultat de la ligne 27

expl ;
-je clique sur F13, si cellule F27 sup à 0 alors on n'ouvre pas l'USF
-je clique sur G13, si cellule G27 vide alors on ouvre l'USF
-je clique sur H13, si cellule H27 sup à 0 alors on n'ouvre pas l'USF
ect ect

Merci pour votre aide.
Bien amicalement,
Christian

 

Vote positif 0 Vote négatif

B

Bebere

XLDnaute Barbatruc

• 6 Novembre 2016

• #4

bonjour Christian Paf

Christian0258 à dit:

Target.Offset(0, -1)

Cliquez pour agrandir...

if Target.Offset(14,0) =0 then
'UserForm3.Left = Target.Left + 150
'UserForm3.Top = Target.Top + 70 - Cells(ActiveWindow.ScrollRow, 1).Top
'UserForm3.Show
end if

 

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 6 Novembre 2016

• #5

Re, le forum, Paf, Bebere

Merci,Bebere, c'est tout à fait ça... impec
Je garde aussi la solution de Paf...

Bien à vous,
Christian

 

Vote positif 0 Vote négatif

C

Christian0258

XLDnaute Accro

• 6 Novembre 2016

• #6

Re, le forum,
Je reviens vers vous, car j'ai changé ma façon d'aborder mon problème concernant
l'ouverture ou non de la liste de validation...voir le fichier joint

Je vous remercie, à nouveau, pour le temps que vous voudrez bien vouloir m'accorder
Bien amicalement,
Christian

 

Pièces jointes

• Liste validation spéciale V01.zip

  135.5 KB · Affichages: 46

Vote positif 0 Vote négatif