Selectionner range pour premiere valeur nulle

Bonjour,

Dans un tableau, je cherche a sélectionner une range allant de la cellule A1 a la dernière cellule non égale à zero de la colonne P.

J'ai essaye plusieurs solutions mais le fait qu'il y ai une formule dans les cellules de la colonne P me pose des problèmes.

Merci d'avance

Bonjour,

un essai:

Sub selectRange()
Dim ligFin As Integer

ligFin = Range("P1:P1000").Find(What:=0, LookIn:=xlValues, LookAt:=xlWhole).Row - 1
Range("A1:P" & ligFin).Select
End Sub

A noter que LookIn est égal à xlValues, on regarde la valeur retournée par la formule, et non la formule. C'est aussi possible de faire ça avec la fonction de recherche directement dans la colonne P sur la feuille.

Bonjour,

Ca marche très bien, merci.

Pour la fonction de recherche, en fait, cette commande va être utilisée dans une macro ou on fait des calculs en cumulant des montants basé sur la valeur d'une cellule.

Meci et bonne journée