A voir également:
- Vba compter le nombre de ligne d'une selection
- Vba compter le nombre de ligne - Meilleures réponses
- Compter le nombre de ligne vba - Meilleures réponses
- Nombre de lignes d'une selection ✓ - Forum - Bureautique
- Calcul nombre de ligne vba ✓ - Forum - VB / VBA
- Compter le nombre de lignes d'une plage de cellule filtree ✓ - Forum - VB / VBA
- VBA - compter des lignes ✓ - Forum - Bureautique
- Vba compter le nombre de ligne non vide - Forum - VB / VBA
5 réponses
Mytå
- Messages postés
- 2966
- Date d'inscription
- mardi 20 janvier 2009
- Statut
- Contributeur
- Dernière intervention
- 20 décembre 2016
Salut le forum
Pour avoir le nombre de lignes d'une plage de cellule
Et pour avoir le nombre de colonnes d'une plage de cellule
Mytå
Merci de donner suite à votre question, nous ne sommes pas des robots...
Versions installées [MsProject 2003(FR), Excel 2003-2007(FR)]
Pour avoir le nombre de lignes d'une plage de cellule
Range("A12", [A12].End(xlDown)).Rows.Count
Et pour avoir le nombre de colonnes d'une plage de cellule
Range("A12", [A12].End(xlDown)).Columns.Count
Mytå
Merci de donner suite à votre question, nous ne sommes pas des robots...
Versions installées [MsProject 2003(FR), Excel 2003-2007(FR)]
Mike-31
- Messages postés
- 17414
- Date d'inscription
- dimanche 17 février 2008
- Statut
- Contributeur
- Dernière intervention
- 28 juillet 2021
Salut,
Tu peux expliquer ce que tu veux faire, j'ai du mal à saisir ton problème.
Sélectionner une colonne pas de problème
partir de la fin de colonne pas de problème
Mais la troisième question, le code que tu présentes, sélectionne de la cellule A12 à la première cellule non vide rencontré vers le bas
que faut il faire
Tu peux expliquer ce que tu veux faire, j'ai du mal à saisir ton problème.
Sélectionner une colonne pas de problème
partir de la fin de colonne pas de problème
Mais la troisième question, le code que tu présentes, sélectionne de la cellule A12 à la première cellule non vide rencontré vers le bas
que faut il faire
Phil
Et bien iln suffit de récupérer le nombre de lignes de cette selection pour pouvoir l'utiliser par la suite dans le reste de la routine. Ce doit etre quelque chose comme "lines.count" mais ca ne marche pas.
hors sujet:
Y-a-t-il a ta connaissance une aide sur l'utilisation de Excel 2007 (vba et l'explorateur d'objets car c'est "apparement" tres compliqué
hors sujet:
Y-a-t-il a ta connaissance une aide sur l'utilisation de Excel 2007 (vba et l'explorateur d'objets car c'est "apparement" tres compliqué
Pimp92a
- Messages postés
- 416
- Date d'inscription
- vendredi 26 juin 2009
- Statut
- Membre
- Dernière intervention
- 17 octobre 2011
Il faudrait déclarer une variable qui récupère le nombre de lignes d'une plage de cellules et ensuite l'inscrire dans une cellule
Ex :
Dim var as string
var = Range("A12", [A12].End(xlDown)).Rows.Count
Sheets("Feuil1").Range("A12").Value = var
Ne pas oublier le End Sub
Ex :
Dim var as string
var = Range("A12", [A12].End(xlDown)).Rows.Count
Sheets("Feuil1").Range("A12").Value = var
Ne pas oublier le End Sub
Phil
Merci Mytå de vous êtes penché sur mon probleme. Mais malheureusement cette solution ne fonctionne pas chez moi. Je vous rapelle que je tourne sur Excel 2007
Ma question est surtout l'endroit ou je peux récupérer le résultat. Si la solution que vous me proposez fonctionnait, ou puis-je récupérer le résultat du nombre de lignes. (dans A12, ou ailleurs car il n'y a pas de signe "=" dans cette ligne de code
Merci
Ma question est surtout l'endroit ou je peux récupérer le résultat. Si la solution que vous me proposez fonctionnait, ou puis-je récupérer le résultat du nombre de lignes. (dans A12, ou ailleurs car il n'y a pas de signe "=" dans cette ligne de code
Merci
Phil
Merci Pimp92a c'est vous qui m'aportez La solution (avec Mytå)
en fait j'ai changé le script en supprimant Sheets("Feuil1")
Voici le script:
Dim var As String
var = Range("A12", [A12].End(xlDown)).Rows.Count
Range("G6").Value = var
End Sub
et ca, ca marche. Merci à vous deux pour ce coup de main
ainsi au'au site commentcamarche.com
en fait j'ai changé le script en supprimant Sheets("Feuil1")
Voici le script:
Dim var As String
var = Range("A12", [A12].End(xlDown)).Rows.Count
Range("G6").Value = var
End Sub
et ca, ca marche. Merci à vous deux pour ce coup de main
ainsi au'au site commentcamarche.com
