Nombre de ligne dans une colonne VBA

Résolu/Fermé

Vba
Colonne

dubol - 25 oct. 2011 à 10:20
dubol - 25 oct. 2011 à 11:16

Bonjour,

Dans une macro, je voudrais savoir la dernière cellule non vide :
pour cela j'utilise

nb_ligne = Range("A65536").End(xlUp).Row

Malheureusement je ne peux pas l'utiliser comme ça. J'ai besoin d'utiliser une variable (c), correspondant au numéro de la colonne, pour cette recherche.

J'ai pensé à ceci mais il ne veut pas compiler et je ne vois pas pourquoi:

nb_ligne = Range(Cells(1, c), Cells(65536, c)).End(xlUp).Row

Merci

A voir également:

Vba compter le nombre de ligne d'une colonne
Déplacer une colonne excel - Guide
Partage de photos en ligne - Guide
Formule somme excel colonne - Guide
Site de vente en ligne particulier - Guide
Trier colonne excel - Guide

2 réponses

Réponse 1 / 2

chossette9 Messages postés 4239 Date d'inscription lundi 20 avril 2009 Statut Contributeur Dernière intervention 12 septembre 2014 1 308
25 oct. 2011 à 10:25

Bonjour,

voir cette astuce.

Cordialement.

Réponse 2 / 2

dubol
25 oct. 2011 à 10:31

Parfait ! Merci

J'aimerai aussi savoir pourquoi il ne voulait pas compiler avec ma méthode?
Sachant que je suis sur Excel 2010 avec 65536 lignes sur ma feuille

chossette9 Messages postés 4239 Date d'inscription lundi 20 avril 2009 Statut Contributeur Dernière intervention 12 septembre 2014 1 308
25 oct. 2011 à 10:32

As-tu bien défini ta variable c, et a-t-elle une valeur d'affectée ?

dubol
25 oct. 2011 à 10:37

oui, en fait il compile mais il me donne toujours la valeur "1" même si plein de cellule de la colonne sont utilisées

chossette9 Messages postés 4239 Date d'inscription lundi 20 avril 2009 Statut Contributeur Dernière intervention 12 septembre 2014 1 308
25 oct. 2011 à 10:54

C'est surement parce que tu sélectionne virtuellement les lignes de 1 à 65536 avec ton Range. Du coup, le End(xlUp) te fait remonter à la dernière ligne remplie avec la 1, c'est à dire la 1.

En mettant simplement Cells(65536,c) au lieu du Range, ça devrait fonctionner.

dubol
25 oct. 2011 à 11:16

Effectivement, ça fonctionne avec cette méthode

nb_ligne = Cells(65536, c).End(xlUp).Row

Merci chossette

Discussions similaires

Calcul nombre de ligne vba

EXCEL : Supprimer des lignes vides à la fin

Compter occurences d'un caractère (excel)

Macro, excel, rechercher une valeur

incrémentat° de la transposition des colonnes en ligne avec VBA

macro excel: transposition colonne en ligne