Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonsoir,
Un petit exemple tout simple avec en colonne C le nombre d'enfants du même nom.
Pour voir les prénoms d'une famille il suffit dans la flèche de la cellule noms
de ne cocher que le nom choisi, mais bien sûr il peut y avoir des cousins !
Bonsoir,
Si tu mets Application.Calculation = xlCalculationAutomatic
après ton msgbox tu devrais avoir le temps de la macro
car tes 32 secondes sont sans doute dues au re-calcul.
Bonjour à tous
Avec ce que j'ai compris ce code devrait fonctionner :
Private Sub COPIE_BAR_Click()
Dim cel As Range
Cells(ActiveCell.Row, "B").Resize(1, 2).Copy
For Each cel In Range("J74:J78")
If IsEmpty(cel) Or cel.Value = 0 Then
cel.PasteSpecial...