Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
BastienD
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter 26 fois
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter
26 fois
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter 26 fois
docm
Bonjour.
Peut-être avec a fonction WorksheetFunction.CountA. Sub Compteur() For Each s In Worksheets Total = Total + WorksheetFunction.CountA(s.Columns(1)) Next End Sub
docm
"BastienD" a écrit dans le message news:
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter
26 fois
Bonjour.
Peut-être avec a fonction WorksheetFunction.CountA.
Sub Compteur()
For Each s In Worksheets
Total = Total + WorksheetFunction.CountA(s.Columns(1))
Next
End Sub
docm
"BastienD" <BastienD@discussions.microsoft.com> a écrit dans le message
news: 2F73BD1E-AC38-40F8-83DF-8B79D3D6CA80@microsoft.com...
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le
nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je
souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les
compter
Peut-être avec a fonction WorksheetFunction.CountA. Sub Compteur() For Each s In Worksheets Total = Total + WorksheetFunction.CountA(s.Columns(1)) Next End Sub
docm
"BastienD" a écrit dans le message news:
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter
26 fois
Jacky
Bonjour, Si les feuilles sont nommées A,B.....Z et le nombre de cellules aléatoirement remplies Ceci peut-être: '-------- Sub jj() For i = 65 To 67 Sheets(Chr$(i)).Activate x = x + Application.CountA(Range("a1:" & Cells.SpecialCells(xlLastCell).Address)) Next MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x End Sub '-------------- Salutations JJ
"BastienD" a écrit dans le message de news:
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter
26 fois
Bonjour,
Si les feuilles sont nommées A,B.....Z et le nombre de cellules
aléatoirement remplies
Ceci peut-être:
'--------
Sub jj()
For i = 65 To 67
Sheets(Chr$(i)).Activate
x = x + Application.CountA(Range("a1:" &
Cells.SpecialCells(xlLastCell).Address))
Next
MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x
End Sub
'--------------
Salutations
JJ
"BastienD" <BastienD@discussions.microsoft.com> a écrit dans le message de
news:2F73BD1E-AC38-40F8-83DF-8B79D3D6CA80@microsoft.com...
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le
nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je
souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les
compter
Bonjour, Si les feuilles sont nommées A,B.....Z et le nombre de cellules aléatoirement remplies Ceci peut-être: '-------- Sub jj() For i = 65 To 67 Sheets(Chr$(i)).Activate x = x + Application.CountA(Range("a1:" & Cells.SpecialCells(xlLastCell).Address)) Next MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x End Sub '-------------- Salutations JJ
"BastienD" a écrit dans le message de news:
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter
26 fois
Jacky
Oupss For i = 65 To 90 JJ
"Jacky" a écrit dans le message de news:
Bonjour, Si les feuilles sont nommées A,B.....Z et le nombre de cellules aléatoirement remplies Ceci peut-être: '-------- Sub jj() For i = 65 To 67 Sheets(Chr$(i)).Activate x = x + Application.CountA(Range("a1:" & Cells.SpecialCells(xlLastCell).Address)) Next MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x End Sub '-------------- Salutations JJ
"BastienD" a écrit dans le message de news:
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter
26 fois
Oupss
For i = 65 To 90
JJ
"Jacky" <nospam@bidon.fr> a écrit dans le message de
news:ODXlBoduFHA.1168@TK2MSFTNGP10.phx.gbl...
Bonjour,
Si les feuilles sont nommées A,B.....Z et le nombre de cellules
aléatoirement remplies
Ceci peut-être:
'--------
Sub jj()
For i = 65 To 67
Sheets(Chr$(i)).Activate
x = x + Application.CountA(Range("a1:" &
Cells.SpecialCells(xlLastCell).Address))
Next
MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x
End Sub
'--------------
Salutations
JJ
"BastienD" <BastienD@discussions.microsoft.com> a écrit dans le message de
news:2F73BD1E-AC38-40F8-83DF-8B79D3D6CA80@microsoft.com...
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le
nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je
souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les
compter
Bonjour, Si les feuilles sont nommées A,B.....Z et le nombre de cellules aléatoirement remplies Ceci peut-être: '-------- Sub jj() For i = 65 To 67 Sheets(Chr$(i)).Activate x = x + Application.CountA(Range("a1:" & Cells.SpecialCells(xlLastCell).Address)) Next MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x End Sub '-------------- Salutations JJ
"BastienD" a écrit dans le message de news:
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter
26 fois
BastienD
Euh... Merci pour cette réponse, mais excusez-moi d'être aussi nul... Comment est-ce que je fais pour intégrer cette fonction ?
Merci...
"Jacky" wrote:
Oupss For i = 65 To 90 JJ
"Jacky" a écrit dans le message de news:
Bonjour, Si les feuilles sont nommées A,B.....Z et le nombre de cellules aléatoirement remplies Ceci peut-être: '-------- Sub jj() For i = 65 To 67 Sheets(Chr$(i)).Activate x = x + Application.CountA(Range("a1:" & Cells.SpecialCells(xlLastCell).Address)) Next MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x End Sub '-------------- Salutations JJ
"BastienD" a écrit dans le message de news:
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter
26 fois
Euh... Merci pour cette réponse, mais excusez-moi d'être aussi nul...
Comment est-ce que je fais pour intégrer cette fonction ?
Merci...
"Jacky" wrote:
Oupss
For i = 65 To 90
JJ
"Jacky" <nospam@bidon.fr> a écrit dans le message de
news:ODXlBoduFHA.1168@TK2MSFTNGP10.phx.gbl...
Bonjour,
Si les feuilles sont nommées A,B.....Z et le nombre de cellules
aléatoirement remplies
Ceci peut-être:
'--------
Sub jj()
For i = 65 To 67
Sheets(Chr$(i)).Activate
x = x + Application.CountA(Range("a1:" &
Cells.SpecialCells(xlLastCell).Address))
Next
MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x
End Sub
'--------------
Salutations
JJ
"BastienD" <BastienD@discussions.microsoft.com> a écrit dans le message de
news:2F73BD1E-AC38-40F8-83DF-8B79D3D6CA80@microsoft.com...
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le
nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je
souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les
compter
Euh... Merci pour cette réponse, mais excusez-moi d'être aussi nul... Comment est-ce que je fais pour intégrer cette fonction ?
Merci...
"Jacky" wrote:
Oupss For i = 65 To 90 JJ
"Jacky" a écrit dans le message de news:
Bonjour, Si les feuilles sont nommées A,B.....Z et le nombre de cellules aléatoirement remplies Ceci peut-être: '-------- Sub jj() For i = 65 To 67 Sheets(Chr$(i)).Activate x = x + Application.CountA(Range("a1:" & Cells.SpecialCells(xlLastCell).Address)) Next MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x End Sub '-------------- Salutations JJ
"BastienD" a écrit dans le message de news:
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les compter
26 fois
Jacky
Exemple brouillon ici http://cjoint.com/?jpmIK5zBLL
Bon courage JJ
"BastienD" a écrit dans le message de news:
Euh... Merci pour cette réponse, mais excusez-moi d'être aussi nul... Comment est-ce que je fais pour intégrer cette fonction ?
Merci...
"Jacky" wrote:
Oupss For i = 65 To 90 JJ
"Jacky" a écrit dans le message de news:
Bonjour, Si les feuilles sont nommées A,B.....Z et le nombre de cellules aléatoirement remplies Ceci peut-être: '-------- Sub jj() For i = 65 To 67 Sheets(Chr$(i)).Activate x = x + Application.CountA(Range("a1:" & Cells.SpecialCells(xlLastCell).Address)) Next MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x End Sub '-------------- Salutations JJ
"BastienD" a écrit dans le message de
news:
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le
nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les
compter
26 fois
Exemple brouillon ici
http://cjoint.com/?jpmIK5zBLL
Bon courage
JJ
"BastienD" <BastienD@discussions.microsoft.com> a écrit dans le message de
news:00583C6C-DA95-4DE1-9A63-27F262CB93C0@microsoft.com...
Euh... Merci pour cette réponse, mais excusez-moi d'être aussi nul...
Comment est-ce que je fais pour intégrer cette fonction ?
Merci...
"Jacky" wrote:
Oupss
For i = 65 To 90
JJ
"Jacky" <nospam@bidon.fr> a écrit dans le message de
news:ODXlBoduFHA.1168@TK2MSFTNGP10.phx.gbl...
Bonjour,
Si les feuilles sont nommées A,B.....Z et le nombre de cellules
aléatoirement remplies
Ceci peut-être:
'--------
Sub jj()
For i = 65 To 67
Sheets(Chr$(i)).Activate
x = x + Application.CountA(Range("a1:" &
Cells.SpecialCells(xlLastCell).Address))
Next
MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x
End Sub
'--------------
Salutations
JJ
"BastienD" <BastienD@discussions.microsoft.com> a écrit dans le
message de
Exemple brouillon ici http://cjoint.com/?jpmIK5zBLL
Bon courage JJ
"BastienD" a écrit dans le message de news:
Euh... Merci pour cette réponse, mais excusez-moi d'être aussi nul... Comment est-ce que je fais pour intégrer cette fonction ?
Merci...
"Jacky" wrote:
Oupss For i = 65 To 90 JJ
"Jacky" a écrit dans le message de news:
Bonjour, Si les feuilles sont nommées A,B.....Z et le nombre de cellules aléatoirement remplies Ceci peut-être: '-------- Sub jj() For i = 65 To 67 Sheets(Chr$(i)).Activate x = x + Application.CountA(Range("a1:" & Cells.SpecialCells(xlLastCell).Address)) Next MsgBox "Nombre de cellules utilisées dans les feuilles A...Z : " & x End Sub '-------------- Salutations JJ
"BastienD" a écrit dans le message de
news:
"BastienD" wrote:
BOnjour, Je voudrais simplement savoir comment on fait poru compter le
nombre
de lignes (ou colonnes) utilisées dans un onglet.
En fait, j'utilise 26 onglets (les lettres de l'alphabet) et je souhaiterais
connaître combien d'éléments j'ai pour chaque lettre sans avoir à les