Boucle sur cellule nomées

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 9 Mai 2010

• #2

Re : Boucle sur cellule nomées

Bonsoir,

For Each n In ActiveWorkbook.Names
If Left(n.Name, 3) = "cas" Then
MsgBox n.Name
End If
Next n

JB

 

Vote positif 0 Vote négatif

néné06

XLDnaute Accro

• 9 Mai 2010

• #3

Re : Boucle sur cellule nomées

bonsoir typo

Avec ce style de boucle à étudier si cela te convient????????
Dim CEL
Range("A1").Select
Range(ActiveCell.Offset(1, 1), ActiveCell(X, Y)).Select ' rem selection de la plage
For Each CEL In Selection
If left$(CEL.Value,3)= "cas" Then
'Rem traite le probleme
endif
Next
Cordialement
néné06

 

Vote positif 0 Vote négatif

T

typo

Guest

• 9 Mai 2010

• #4

Re : Boucle sur cellule nomées

Bonjour jb
c'est exactement ce que je cherchais
je te remercie

@+

 

Vote positif 0 Vote négatif

néné06

XLDnaute Accro

• 9 Mai 2010

• #5

Re : Boucle sur cellule nomées

Bonsoir BOISGONTIER

Nous nous somme croisés sur le fil.

Toujours le plus rapide!!!!!!!!!!!!!!!!

A+

 

Vote positif 0 Vote négatif