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
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
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
10907
Date d'inscription
lundi 18 octobre 2010
Statut
Membre
Dernière intervention
24 janvier 2025
2 430
20 mai 2015 à 15:12
20 mai 2015 à 15:12
Bonjour
pour compter le nombre de cellules non vides colonne B
n = Application.WorksheetFunction.CountA(Columns("B"))
Cdlmnt
pour compter le nombre de cellules non vides colonne B
n = Application.WorksheetFunction.CountA(Columns("B"))
Cdlmnt
18 août 2015 à 14:57