VBA Excel Rechercher le contenu d'une cellule

Résolu
zivodul8 Messages postés 248 Statut Membre -  
zivodul8 Messages postés 248 Statut Membre -
Bonjour,

Je souhaite connaitre les coordonnées de la première cellule d'une colonne contenant uniquement "0". J'ai donc essayé avec cette fonction :

empla = Worksheets("Données p").Range("A54:A500").Find(what:=0)

Mais le problème, et il y en a deux, c'est que cette fonction me renvoi le contenu de la cellule, et qu'elle prend en compte toutes les cellules contenant un 0 (exemple : "UCLI 7205 MAR")

Merci de votre aide !

1 réponse

  1. zivodul8 Messages postés 248 Statut Membre 22
     
    Finalement j'ai trouvé comme un grand, un peu comme un système D :

    Sub Macro1()
    
    Dim Dligne As Integer
    Dim i As Integer
    Dim j As Integer
    
    j = 55
    
    Sheets("Données p").Select
    
    Do While Dligne = 0
        For i = 54 To j
            If Range("A" & i).Value = "0" Then
                Dligne = i
            End If
        Next i
        j = j + 1
    Loop
        
    Dligne = Dligne - 1
    
    End Sub
    1