Bonjour
je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème
onglet
mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom
"original"
sachant que celui peut être à des endroits différents
merci de votre aide.
AnB
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
Francois L
AnB a écrit :
Bonsoir,
Sub zaza() Dim Nbf As Integer Nbf = Worksheets.Count Do Until Worksheets(Nbf).Name = "original" Nbf = Nbf - 1 Loop MsgBox Worksheets.Count - Nbf & " feuilles" End Sub
-- François L
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
AnB a écrit :
Bonsoir,
Sub zaza()
Dim Nbf As Integer
Nbf = Worksheets.Count
Do Until Worksheets(Nbf).Name = "original"
Nbf = Nbf - 1
Loop
MsgBox Worksheets.Count - Nbf & " feuilles"
End Sub
--
François L
Bonjour
je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème
onglet
mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom
"original"
sachant que celui peut être à des endroits différents
merci de votre aide.
AnB
Sub zaza() Dim Nbf As Integer Nbf = Worksheets.Count Do Until Worksheets(Nbf).Name = "original" Nbf = Nbf - 1 Loop MsgBox Worksheets.Count - Nbf & " feuilles" End Sub
-- François L
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
JB
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" wrote:
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pou r nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB
http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" <nospam...@noos.fr> wrote:
Bonjour
je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème
onglet
mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pou r nom
"original"
sachant que celui peut être à des endroits différents
merci de votre aide.
AnB
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pou r nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
AnB
Mon idée est vraiment compter après l'onglet "original" car j'ai des onglets avant que je ne veux pas compter aussi à moins de mettre les différents onglets que je ne veux pas
"Francois L" a écrit dans le message de news:
AnB a écrit :
Bonsoir,
Sub zaza() Dim Nbf As Integer Nbf = Worksheets.Count Do Until Worksheets(Nbf).Name = "original" Nbf = Nbf - 1 Loop MsgBox Worksheets.Count - Nbf & " feuilles" End Sub
-- François L
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
Mon idée est vraiment compter après l'onglet "original" car j'ai des onglets
avant que je ne veux pas compter aussi
à moins de mettre les différents onglets que je ne veux pas
"Francois L" <gardiendephare@etbalises.fr.invalid> a écrit dans le message
de news: uqEAQmoxJHA.5768@TK2MSFTNGP02.phx.gbl...
AnB a écrit :
Bonsoir,
Sub zaza()
Dim Nbf As Integer
Nbf = Worksheets.Count
Do Until Worksheets(Nbf).Name = "original"
Nbf = Nbf - 1
Loop
MsgBox Worksheets.Count - Nbf & " feuilles"
End Sub
--
François L
Bonjour
je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème
onglet
mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour
nom "original"
sachant que celui peut être à des endroits différents
merci de votre aide.
AnB
Mon idée est vraiment compter après l'onglet "original" car j'ai des onglets avant que je ne veux pas compter aussi à moins de mettre les différents onglets que je ne veux pas
"Francois L" a écrit dans le message de news:
AnB a écrit :
Bonsoir,
Sub zaza() Dim Nbf As Integer Nbf = Worksheets.Count Do Until Worksheets(Nbf).Name = "original" Nbf = Nbf - 1 Loop MsgBox Worksheets.Count - Nbf & " feuilles" End Sub
-- François L
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
Francois L
AnB a écrit :
Re,
La solution de JB est plus concise mais les deux donnent le résultat attendu... Tu n'as visiblement pas testé la solution !
-- François L
Mon idée est vraiment compter après l'onglet "original" car j'ai des onglets avant que je ne veux pas compter aussi à moins de mettre les différents onglets que je ne veux pas
"Francois L" a écrit dans le message de news:
AnB a écrit :
Bonsoir,
Sub zaza() Dim Nbf As Integer Nbf = Worksheets.Count Do Until Worksheets(Nbf).Name = "original" Nbf = Nbf - 1 Loop MsgBox Worksheets.Count - Nbf & " feuilles" End Sub
-- François L
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
AnB a écrit :
Re,
La solution de JB est plus concise mais les deux donnent le résultat
attendu... Tu n'as visiblement pas testé la solution !
--
François L
Mon idée est vraiment compter après l'onglet "original" car j'ai des onglets
avant que je ne veux pas compter aussi
à moins de mettre les différents onglets que je ne veux pas
"Francois L" <gardiendephare@etbalises.fr.invalid> a écrit dans le message
de news: uqEAQmoxJHA.5768@TK2MSFTNGP02.phx.gbl...
AnB a écrit :
Bonsoir,
Sub zaza()
Dim Nbf As Integer
Nbf = Worksheets.Count
Do Until Worksheets(Nbf).Name = "original"
Nbf = Nbf - 1
Loop
MsgBox Worksheets.Count - Nbf & " feuilles"
End Sub
--
François L
Bonjour
je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème
onglet
mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour
nom "original"
sachant que celui peut être à des endroits différents
merci de votre aide.
AnB
La solution de JB est plus concise mais les deux donnent le résultat attendu... Tu n'as visiblement pas testé la solution !
-- François L
Mon idée est vraiment compter après l'onglet "original" car j'ai des onglets avant que je ne veux pas compter aussi à moins de mettre les différents onglets que je ne veux pas
"Francois L" a écrit dans le message de news:
AnB a écrit :
Bonsoir,
Sub zaza() Dim Nbf As Integer Nbf = Worksheets.Count Do Until Worksheets(Nbf).Name = "original" Nbf = Nbf - 1 Loop MsgBox Worksheets.Count - Nbf & " feuilles" End Sub
-- François L
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
AnB
Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
"JB" a écrit dans le message de news:
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" wrote:
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
cf36c1e5-d748-4d21-8e35-bc9b22e7f2d5@c18g2000prh.googlegroups.com...
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB
http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" <nospam...@noos.fr> wrote:
Bonjour
je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème
onglet
mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom
"original"
sachant que celui peut être à des endroits différents
merci de votre aide.
AnB
Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
"JB" a écrit dans le message de news:
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" wrote:
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
AnB
j'ai testé:
x = Sheets.Count => ceci marcje j'ai 6 feuille x = Sheets.Count - Sheets("original").Index => me donne une erreur " l'indice n'appartient pas à la sélection"
"AnB" a écrit dans le message de news:
Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
"JB" a écrit dans le message de news:
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" wrote:
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
j'ai testé:
x = Sheets.Count => ceci marcje j'ai 6 feuille
x = Sheets.Count - Sheets("original").Index => me donne une erreur "
l'indice n'appartient pas à la sélection"
"AnB" <nospamanb@noos.fr> a écrit dans le message de news:
Ot8mjyoxJHA.1372@TK2MSFTNGP05.phx.gbl...
Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
cf36c1e5-d748-4d21-8e35-bc9b22e7f2d5@c18g2000prh.googlegroups.com...
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB
http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" <nospam...@noos.fr> wrote:
Bonjour
je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème
onglet
mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour
nom
"original"
sachant que celui peut être à des endroits différents
merci de votre aide.
AnB
x = Sheets.Count => ceci marcje j'ai 6 feuille x = Sheets.Count - Sheets("original").Index => me donne une erreur " l'indice n'appartient pas à la sélection"
"AnB" a écrit dans le message de news:
Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
"JB" a écrit dans le message de news:
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" wrote:
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
JB
http://cjoint.com/?eCi0LPjXH4
JB On 26 avr, 18:40, "AnB" wrote:
j'ai testé:
x = Sheets.Count => ceci marcje j'ai 6 feuille x = Sheets.Count - Sheets("original").Index => me donne une erreur " l'indice n'appartient pas à la sélection"
"AnB" a écrit dans le message de news:
> Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
> For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
> "JB" a écrit dans le message de news: > > Bonjour,
> x = Sheets.Count - Sheets("original").Index
> JB >http://boisgontierjacques.free.fr
> On 26 avr, 17:55, "AnB" wrote: >> Bonjour >> je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème >> onglet >> mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour >> nom >> "original" >> sachant que celui peut être à des endroits différents >> merci de votre aide. >> AnB- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
http://cjoint.com/?eCi0LPjXH4
JB
On 26 avr, 18:40, "AnB" <nospam...@noos.fr> wrote:
j'ai testé:
x = Sheets.Count => ceci marcje j'ai 6 feuille
x = Sheets.Count - Sheets("original").Index => me donne une erreur "
l'indice n'appartient pas à la sélection"
"AnB" <nospam...@noos.fr> a écrit dans le message de news:
Ot8mjyoxJHA.1...@TK2MSFTNGP05.phx.gbl...
> Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
> For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
> "JB" <boisgont...@hotmail.com> a écrit dans le message de news:
> cf36c1e5-d748-4d21-8e35-bc9b22e7f...@c18g2000prh.googlegroups.com...
> Bonjour,
> x = Sheets.Count - Sheets("original").Index
> JB
>http://boisgontierjacques.free.fr
> On 26 avr, 17:55, "AnB" <nospam...@noos.fr> wrote:
>> Bonjour
>> je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème
>> onglet
>> mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour
>> nom
>> "original"
>> sachant que celui peut être à des endroits différents
>> merci de votre aide.
>> AnB- Masquer le texte des messages précédents -
x = Sheets.Count => ceci marcje j'ai 6 feuille x = Sheets.Count - Sheets("original").Index => me donne une erreur " l'indice n'appartient pas à la sélection"
"AnB" a écrit dans le message de news:
> Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
> For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
> "JB" a écrit dans le message de news: > > Bonjour,
> x = Sheets.Count - Sheets("original").Index
> JB >http://boisgontierjacques.free.fr
> On 26 avr, 17:55, "AnB" wrote: >> Bonjour >> je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème >> onglet >> mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour >> nom >> "original" >> sachant que celui peut être à des endroits différents >> merci de votre aide. >> AnB- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
AnB
Merci à vous deux
le nom de mon onglet avait un "e"
"AnB" a écrit dans le message de news:
j'ai testé:
x = Sheets.Count => ceci marcje j'ai 6 feuille x = Sheets.Count - Sheets("original").Index => me donne une erreur " l'indice n'appartient pas à la sélection"
"AnB" a écrit dans le message de news:
Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
"JB" a écrit dans le message de news:
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" wrote:
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
Merci à vous deux
le nom de mon onglet avait un "e"
"AnB" <nospamanb@noos.fr> a écrit dans le message de news:
uqhFJ3oxJHA.1196@TK2MSFTNGP03.phx.gbl...
j'ai testé:
x = Sheets.Count => ceci marcje j'ai 6 feuille
x = Sheets.Count - Sheets("original").Index => me donne une erreur "
l'indice n'appartient pas à la sélection"
"AnB" <nospamanb@noos.fr> a écrit dans le message de news:
Ot8mjyoxJHA.1372@TK2MSFTNGP05.phx.gbl...
Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
cf36c1e5-d748-4d21-8e35-bc9b22e7f2d5@c18g2000prh.googlegroups.com...
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB
http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" <nospam...@noos.fr> wrote:
Bonjour
je sais compter les onglets d'un classeur en VBA à partir du 2ème ou
4ème
onglet
mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour
nom
"original"
sachant que celui peut être à des endroits différents
merci de votre aide.
AnB
x = Sheets.Count => ceci marcje j'ai 6 feuille x = Sheets.Count - Sheets("original").Index => me donne une erreur " l'indice n'appartient pas à la sélection"
"AnB" a écrit dans le message de news:
Est ce que je peux faire ceci cat la valeur de i = 0 ?, merci
For i& = Sheets.Count To Sheets.Count - Sheets("ORIGINAL").Index
"JB" a écrit dans le message de news:
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" wrote:
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
AnB
à cause du "E"qui manquait à l'onglet ! Parfois les messages du VBA sont déroutant
Merci encore
"JB" a écrit dans le message de news:
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" wrote:
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
à cause du "E"qui manquait à l'onglet ! Parfois les messages du VBA sont
déroutant
Merci encore
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
cf36c1e5-d748-4d21-8e35-bc9b22e7f2d5@c18g2000prh.googlegroups.com...
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB
http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" <nospam...@noos.fr> wrote:
Bonjour
je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème
onglet
mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom
"original"
sachant que celui peut être à des endroits différents
merci de votre aide.
AnB
à cause du "E"qui manquait à l'onglet ! Parfois les messages du VBA sont déroutant
Merci encore
"JB" a écrit dans le message de news:
Bonjour,
x = Sheets.Count - Sheets("original").Index
JB http://boisgontierjacques.free.fr
On 26 avr, 17:55, "AnB" wrote:
Bonjour je sais compter les onglets d'un classeur en VBA à partir du 2ème ou 4ème onglet mais je n'arrive pas à compter ceux qui sont après l'onglet qui a pour nom "original" sachant que celui peut être à des endroits différents merci de votre aide. AnB
