> Tous les forums > Forum Windows XP
 Calculer nombre de ligne dans Excel [Résolu]
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
medium21
  Posté le 27/10/2003 @ 21:53 
Aller en bas de la page 
Petit astucien

Comment, par formule ou VBA, calculer le nombre de ligne d'une colonne (non vide), ne sachant pas au départ si elle en comporte 1 ou n (n pouvant aller jusqu'à 200 environ). Mis à part de déterminer au départ une plage "fictive" de 300 par ex. merci.
Publicité
droug
 Posté le 28/10/2003 à 01:19 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
UP Intéressé par la réponse ; Possible ou non???
ximi
 Posté le 28/10/2003 à 04:30 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
Medium 21 bonsoir, Voici la réponse: Sub NbLignes() ' ' NbLignes Macro ' Macro enregistrée le 28/10/2003 ' 'Pour le test tu mets des valeurs numériques dans les cellules A1;A2;A3;.... 'Les données sont dans la colonne A (modifiable à ta convenance) 'La 1er ligne occupée de la colonne A est en 1 (modifiable à ta convenance) Range("A1").End(xlDown).Select 'Sélection de la dernière ligne non vide de la colonne A 'Toutes les boites de dialogue sont pour info MsgBox ActiveCell.Value 'Affichage Valeur contenue dans la dernière cellule de A MsgBox ActiveCell.Address() 'Affichage de l'adresse de la dernière ligne MsgBox ActiveCell.Row 'N° de la dernière ligne MsgBox "Le nombre de ligne est " & ActiveCell.Row 'si tu commences en ligne 2 dans la colonne A il faudra mettre -1 à la formule MsgBox "Le nombre de ligne est " & ActiveCell.Row - 1 'si tu commences en ligne 3 dans la colonne A il faudra mettre -2 à la formule etc... End Sub !!! ATTENTION tu dois créer ta macro dans Excel. Copier/Coller de ce texte ne marche pas. Byyyyyyyyeeeeeee et bonne nuit
ximi
 Posté le 28/10/2003 à 08:35 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien
Medium 21 bonjour, Quant je dis
!!! ATTENTION tu dois créer ta macro dans Excel. Copier/Coller de ce texte ne marche pas.
Cela signifie qu'il faut créer sous Excel la macro Dans le menu: /Outils/macro/nouvelle macro ==< nom de ta macro Sub NbLignes() !!! Ici tu peux faire un copier/coller !!! End sub
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !

 > Tous les forums > Forum Windows XP