VBA Excel Rechercher le contenu d'une cellule [Résolu/Fermé]

Messages postés
230
Date d'inscription
jeudi 19 novembre 2009
Statut
Membre
Dernière intervention
19 mai 2015
- - Dernière réponse : zivodul8
Messages postés
230
Date d'inscription
jeudi 19 novembre 2009
Statut
Membre
Dernière intervention
19 mai 2015
- 19 avril 2011 à 11:58
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 !

Afficher la suite 

1 réponse

Meilleure réponse
Messages postés
230
Date d'inscription
jeudi 19 novembre 2009
Statut
Membre
Dernière intervention
19 mai 2015
19
1
Merci
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

Dire « Merci » 1

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 64186 internautes nous ont dit merci ce mois-ci