Sélection d'une cellule nommée par VBA

[Bryan]

Bonjour à tous,

Je voudrais savoir s'il est possible de sélectionner une cellule nommée par VBA avec une condition. J'ai créé un loop qui part de la cellule A1 et qui descend jusqu'à la ligne 200. Je veux vérifier à chaque cellule le nom de celle-ci et effacer si elle correspond au critère de nom.

Un exemple:

Disons que ma cellule A4 s'appelle ALLO. Je veux partir de la cellule A1 et descendre jusqu'a`ce que je trouve la cellule ALLO. Mon code est:

n=1

Do until n=200

If cells(n,1).Name = "ALLO" then (c'est cette ligne que je veux pouvoir
n=n+1 accomplir et je ne suis pas capable)
cells(n,1).select
entirerow.delete
else:n=n+1
end if

loop


Je veux pouvoir identifier la ligne avec la cellule ALLO et effacer les lignes sous celles-ci jusqu'à une autre ligne qui comporte un nom dans la cellule
A(valeur). Je ne peux sélectionner une région fixe, car la région varie de grosseur. Pas facile à expliquer. J'ai besoin d'aide... 🙁

Merci d'avance

Bryan

 

[sab]

bonjour Bryan,

pourquoi ne pas y aller directement,

Application.Goto Range("hello")
ActiveCell.EntireRow.Delete

sinon il faut passer par la colection names,

Set nms = ActiveWorkbook.Names
Set wks = Worksheets(1)
For r = 1 To nms.Count
wks.Cells(r, 2).Value = nms(r).Name
wks.Cells(r, 3).Value = nms(r).RefersToRange.Address
Next


isabelle

 

[CHti160]

Salut"Bryan"
re le"FORUM"
une petite piece jointe pour le fun !!!!!Lol :0)
A+++
Jean Marie