VBA recherche cellule dans colonne et calcul
Résolu/Fermé
A voir également:
- Vba recherche cellule contenant valeur
- Recherche automatique des chaînes ne fonctionne pas - Guide
- Excel compter cellule couleur sans vba - Guide
- Excel cellule couleur si condition texte - Guide
- Aller à la ligne dans une cellule excel - Guide
- Verrouiller cellule excel - Guide
3 réponses
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 310
21 oct. 2010 à 17:14
21 oct. 2010 à 17:14
Bonjour
ta variable 'i" sert à quoi? et pourquoi 40 ?
dans l'atente
ta variable 'i" sert à quoi? et pourquoi 40 ?
dans l'atente
Bonjour michel_m,
Dans la colonne en question il y aura au maximum 40 cellules vide donc le i sert à lui faire repeter 40 fois la recherche pour qu'il les trouve toutes mais qu'il ne parcour pas toutes les cellules de la colonne jusqu'a la 63000 et des poussières.. Enfin c'était l'intention!
Dans la colonne en question il y aura au maximum 40 cellules vide donc le i sert à lui faire repeter 40 fois la recherche pour qu'il les trouve toutes mais qu'il ne parcour pas toutes les cellules de la colonne jusqu'a la 63000 et des poussières.. Enfin c'était l'intention!
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 310
21 oct. 2010 à 17:53
21 oct. 2010 à 17:53
re,
essaies
essaies
Sub affecter_cellvide() Dim lig As Integer, cptr As Byte lig = 6 For cptr = 1 To 40 lig = Columns(4).Find("", Cells(lig, 4), xlValues).Row Cells(lig, 4) = Cells(lig - 1, 2) Next End Sub