Offset et count en VBA

Résolu/Fermé
fumseck88 Messages postés 8 Date d'inscription vendredi 27 février 2015 Statut Membre Dernière intervention 18 août 2015 - 20 mai 2015 à 14:54
fumseck88 Messages postés 8 Date d'inscription vendredi 27 février 2015 Statut Membre Dernière intervention 18 août 2015 - 18 août 2015 à 14:57
Bonjour,
je cherche a allier ces deux fonctions en VBA et je bloque completement :(:

Voila ce que j'ai ecrit:
ActiveCell.Offset(Count.Columns(I), -8).Select
ActiveCell.PasteSpecial (xlPasteValues)
Application.CutCopyMode = False

je voudrais que "Count.Columns(I)" represente le nombre d'items presents dans ma colonne I mais cela ne marche pas avec cette ecriture.
Merci d'avance pour vos suggestions !!!!
Daphne

1 réponse

ccm81 Messages postés 10854 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 26 avril 2024 2 404
20 mai 2015 à 15:12
Bonjour

pour compter le nombre de cellules non vides colonne B
n = Application.WorksheetFunction.CountA(Columns("B"))

Cdlmnt
0
fumseck88 Messages postés 8 Date d'inscription vendredi 27 février 2015 Statut Membre Dernière intervention 18 août 2015
18 août 2015 à 14:57
merci !
0