Find

Bonjour,

J'ai fait un find qui me permet d'aller chercher une donnée précise. Mais j'aimerai que dés qu'il ma trouvé la cellule il me sélectionne la cellule d'en dessous comment faire ??

Merci

Marion

Bonjour,

Difficile à dire comme ça, mais je pense qu'il faut utiliser un offset(0, 1) dans votre macro.

Un petit fichier permettrait d'avoir plus de réponses

voilou voilou j'espère que ca vous aidera merci d'avance

re,

alors je suis arrivé a faire la première partie grâce a un offset et maintenant j'aimerai lui dire si par exemple les données de la ligne ACO sont supérieur au % Max alors Msg box ressource surutilisé mais la je bloque

Bonjour,

Sub surut_ress()
Dim Resfind As Variant
Dim Cel As Range
    Set Resfind = Cells.Find(What:="% MAX", LookIn:=xlValues, lookat:=xlWhole)
    If Not Resfind Is Nothing Then
        For Each Cel In Range(Resfind.Offset(1, 0), Resfind.End(xlDown))
            If Application.Max(Range(Cells(Cel.Row, "R"), Cells(Cel.Row, "AG"))) > Cel.Value Then
                MsgBox "Dépassement de la ressource " & Cel.Offset(0, -1)
            End If
        Next Cel
    End If
    Set Resfind = Nothing
End Sub

A+

c'est ca merci bcp !