MACRO VB SOUS EXCEL

Fermé
zanu - 6 août 2008 à 09:11
 zanu - 6 août 2008 à 11:12
Bonjour,
je voudrais réaliser une macro VB sous excel qui compte le nombre de ligne d'un tableau sous excel.
quelqu'un peut il m'aider?
merci d'avance.
A voir également:

5 réponses

Dim R As Double
Dim D As Double
For D = 1 To Cells(65536, 1).End(xlUp).Row
If Not Rows(D).Hidden Then R = R + 1
Next D

MsgBox "Nombre de lignes du tableau : " & D & " "

Essaye ceci, ça devrait marcher ;)
0
merci beaucoup,
mais dans le cas où je dois compter les lignes d'un tableau que j'ai préalablement sélectionné, comment je fais?
et c'est quoi l'en tête? sub ou function?
0
C'est-à-dire le tableau sur lequel tu travailles lorsque tu comptes les lignes?
Sinon pour choisir la feuille ou le classeur voulu sert toi des .Activate

Sub Compt_Lignes()

Dim R As Double
Dim D As Double
For D = 1 To Cells(65536, 1).End(xlUp).Row
If Not Rows(D).Hidden Then R = R + 1
Next D

End Sub
0
oui, le tableau sur lequel je travaille et que j'ai sélectionné. lorsque j'execute ta fonction, j'ai toujours pour résultat 2. pourquoi?
merci encore
0
Logiquement si il s'agit de la feuille où tu travailles, Excel la sélectionne par défaut.

Essaye Ceci :

Sub Compte()

Dim y As Integer

Range("Cel1", "Cel2").Select
Entre ta plage de données
y = Selection.Rows.Count

End Sub
0
j'ai un tableau excel k jexporte d'un logiciel et je met dans un onglet excel qui est toujours le meme a chaque fois. Mais le problème cest ke le nombre de ligne du tableau exporté varie (n'est pas fixe).
Donc jvoudrais une macro ki va dans cet onglet qui sappelle "zanu", selectionne le tableau et détermine le nombre de ligne qu'il contient.
merci pour ton aide
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
paolo_en_espagne Messages postés 41 Date d'inscription mardi 8 mai 2007 Statut Membre Dernière intervention 21 octobre 2008 12
6 août 2008 à 09:34
Bonjour
tu enregistres ta macro en te mettant en dessous de la dernière ligne ddeton tableau sur une colonne toujours remplie et tu prends comme formule =NB(sélection de toute ta colonne).
et ensuite il te reste à coder la sélection de ta colonne.

Pour enregistrer une macro
Outils->Macro->Nouvelle macro

POur aller dans VBA:
Outils->Macro->Visual Basic Editor (ou raccourci clavier Alt+F11)
-1
oui merci bokou, pour la formule je connais, mais je voudrais une vraie fonction VBA stp
0