OVH Cloud OVH Cloud

For each feuille

16 réponses
Avatar
Jacquouille
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range("laplage") .....
Pouvez-vous me dire comment je dois lui faire comprendre ceci (en VBA, ouef
corse)
pour chaque feuille du fichier Machin.xls, pour chaque c dans plage("A1:C3")
blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner toutes les
feuilles, puis de poser la condition "pourchaquec ....", ensuite, voyant que
cela ne fonctionnait pas, j'ai étudié la solution proposée.
En fait, l'enregistreur fait un tableau avec toutes les feuilles, mais ne
les sélectionne pas. L'aide me dit (et Jean Sébastien Walkenbach aussi) que
l'on ne sait pas travailler en VBA sur la ou les même(s) cel dans TOUTES les
feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de dernière feuille, puis
de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous ai compris".
Pour faire bref, comment sélectionner toutes les feuilles en VBA, sans les
nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.
j.thiernesseNOSPAM@skynet.be

10 réponses

1 2
Avatar
jps
merdum, j'ai bouffé l'objet : c'était pourtant pas de la salade...encore
que...
jps

"Jacquouille" a écrit dans le message de
news:
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range("laplage") .....
Pouvez-vous me dire comment je dois lui faire comprendre ceci (en VBA,
ouef

corse)
pour chaque feuille du fichier Machin.xls, pour chaque c dans
plage("A1:C3")

blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner toutes les
feuilles, puis de poser la condition "pourchaquec ....", ensuite, voyant
que

cela ne fonctionnait pas, j'ai étudié la solution proposée.
En fait, l'enregistreur fait un tableau avec toutes les feuilles, mais ne
les sélectionne pas. L'aide me dit (et Jean Sébastien Walkenbach aussi)
que

l'on ne sait pas travailler en VBA sur la ou les même(s) cel dans TOUTES
les

feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de dernière feuille,
puis

de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous ai compris".
Pour faire bref, comment sélectionner toutes les feuilles en VBA, sans les
nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.





Avatar
RaMA
bonjour Jacquouille

Sub farfeuille()
For Each sh In Worksheets
'qq exemples
sh.Activate
qq = sh.Name
Next
End Sub

Salutations
RaMa

--
.
"Jacquouille" a écrit dans le message de
news:
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range("laplage") .....
Pouvez-vous me dire comment je dois lui faire comprendre ceci (en VBA,
ouef
corse)
pour chaque feuille du fichier Machin.xls, pour chaque c dans
plage("A1:C3")
blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner toutes les
feuilles, puis de poser la condition "pourchaquec ....", ensuite, voyant
que
cela ne fonctionnait pas, j'ai étudié la solution proposée.
En fait, l'enregistreur fait un tableau avec toutes les feuilles, mais ne
les sélectionne pas. L'aide me dit (et Jean Sébastien Walkenbach aussi)
que
l'on ne sait pas travailler en VBA sur la ou les même(s) cel dans TOUTES
les
feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de dernière feuille,
puis
de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous ai compris".
Pour faire bref, comment sélectionner toutes les feuilles en VBA, sans les
nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.





Avatar
Joël GARBE
Bonojoursoir,

un truc de genre :

Sub BoucleEnBoucle()
Dim oSheet As Worksheet
Dim oCell As Range
For Each oSheet In Worksheets
For Each oCell In oSheet.Range("A1:C3")
MsgBox oSheet.Name & " : " & oCell.Address
Next
Next
End Sub

conviendrait-il ?

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Jacquouille" a écrit dans le message de
news:
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range("laplage") .....
Pouvez-vous me dire comment je dois lui faire comprendre ceci (en VBA,
ouef
corse)
pour chaque feuille du fichier Machin.xls, pour chaque c dans
plage("A1:C3")
blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner toutes les
feuilles, puis de poser la condition "pourchaquec ....", ensuite, voyant
que
cela ne fonctionnait pas, j'ai étudié la solution proposée.
En fait, l'enregistreur fait un tableau avec toutes les feuilles, mais ne
les sélectionne pas. L'aide me dit (et Jean Sébastien Walkenbach aussi)
que
l'on ne sait pas travailler en VBA sur la ou les même(s) cel dans TOUTES
les
feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de dernière feuille,
puis
de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous ai compris".
Pour faire bref, comment sélectionner toutes les feuilles en VBA, sans les
nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.





Avatar
LeSteph
BonDay Toutlebody

I think perhaps le pb its le camembert of Vba Excel 5
Et pas pourri ..
Pour i à la place de For i
et Si au lieu de if
et à la place de For each ....
(m'en souviens pas non plus)
Peut être
Pour chaque F dans Classeur.Feuilles...
...
Suivant F

:-( c'est affreux de pas se souvenir...

lSteph

"Joël GARBE" a écrit dans le message de news:
416184b2$0$25465$
Bonojoursoir,

un truc de genre :

Sub BoucleEnBoucle()
Dim oSheet As Worksheet
Dim oCell As Range
For Each oSheet In Worksheets
For Each oCell In oSheet.Range("A1:C3")
MsgBox oSheet.Name & " : " & oCell.Address
Next
Next
End Sub

conviendrait-il ?

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Jacquouille" a écrit dans le message de
news:
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range("laplage") .....
Pouvez-vous me dire comment je dois lui faire comprendre ceci (en VBA,
ouef
corse)
pour chaque feuille du fichier Machin.xls, pour chaque c dans
plage("A1:C3")
blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner toutes les
feuilles, puis de poser la condition "pourchaquec ....", ensuite, voyant
que
cela ne fonctionnait pas, j'ai étudié la solution proposée.
En fait, l'enregistreur fait un tableau avec toutes les feuilles, mais ne
les sélectionne pas. L'aide me dit (et Jean Sébastien Walkenbach aussi)
que
l'on ne sait pas travailler en VBA sur la ou les même(s) cel dans TOUTES
les
feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de dernière feuille,
puis
de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous ai compris".
Pour faire bref, comment sélectionner toutes les feuilles en VBA, sans
les
nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.









Avatar
Clément Marcotte
Au début, j'avais lu sub farfelue ;-)
"RaMA" a écrit dans le message de
news:
bonjour Jacquouille

Sub farfeuille()
For Each sh In Worksheets
'qq exemples
sh.Activate
qq = sh.Name
Next
End Sub

Salutations
RaMa

--
.
"Jacquouille" a écrit dans le
message de

news:
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range("laplage")
.....


Pouvez-vous me dire comment je dois lui faire comprendre ceci (en
VBA,


ouef
corse)
pour chaque feuille du fichier Machin.xls, pour chaque c dans
plage("A1:C3")
blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner toutes
les


feuilles, puis de poser la condition "pourchaquec ....", ensuite,
voyant


que
cela ne fonctionnait pas, j'ai étudié la solution proposée.
En fait, l'enregistreur fait un tableau avec toutes les feuilles,
mais ne


les sélectionne pas. L'aide me dit (et Jean Sébastien Walkenbach
aussi)


que
l'on ne sait pas travailler en VBA sur la ou les même(s) cel dans
TOUTES


les
feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de dernière
feuille,


puis
de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous ai
compris".


Pour faire bref, comment sélectionner toutes les feuilles en VBA,
sans les


nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.









Avatar
Sitting Hoax \(BM\)
Bonsoir,

sub Jacquouille ()
For i = 1 To Worksheets.Count
For Each c In Sheets(i).Range("A1:C3")
'blabla
Next c
Next i
End Sub

Amicalement
Sitting Hoax
"Jacquouille" a écrit dans le message de
news:
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range("laplage") .....
Pouvez-vous me dire comment je dois lui faire comprendre ceci (en VBA,
ouef

corse)
pour chaque feuille du fichier Machin.xls, pour chaque c dans
plage("A1:C3")

blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner toutes les
feuilles, puis de poser la condition "pourchaquec ....", ensuite, voyant
que

cela ne fonctionnait pas, j'ai étudié la solution proposée.
En fait, l'enregistreur fait un tableau avec toutes les feuilles, mais ne
les sélectionne pas. L'aide me dit (et Jean Sébastien Walkenbach aussi)
que

l'on ne sait pas travailler en VBA sur la ou les même(s) cel dans TOUTES
les

feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de dernière feuille,
puis

de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous ai compris".
Pour faire bref, comment sélectionner toutes les feuilles en VBA, sans les
nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.





Avatar
sabatier
'tain, vous savez pas encore que notre célébrissime jacquouille est sur
excel 5 in FRENCH!!!!!
jacquouille, ton message passe mal : t'aurais pas fait la même école de
comm' que raffarin par hasard?
jps

"Sitting Hoax (BM)" a écrit dans le
message de news:
Bonsoir,

sub Jacquouille ()
For i = 1 To Worksheets.Count
For Each c In Sheets(i).Range("A1:C3")
'blabla
Next c
Next i
End Sub

Amicalement
Sitting Hoax
"Jacquouille" a écrit dans le message de
news:
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range("laplage") .....
Pouvez-vous me dire comment je dois lui faire comprendre ceci (en VBA,
ouef

corse)
pour chaque feuille du fichier Machin.xls, pour chaque c dans
plage("A1:C3")

blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner toutes les
feuilles, puis de poser la condition "pourchaquec ....", ensuite, voyant
que

cela ne fonctionnait pas, j'ai étudié la solution proposée.
En fait, l'enregistreur fait un tableau avec toutes les feuilles, mais
ne


les sélectionne pas. L'aide me dit (et Jean Sébastien Walkenbach aussi)
que

l'on ne sait pas travailler en VBA sur la ou les même(s) cel dans TOUTES
les

feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de dernière feuille,
puis

de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous ai compris".
Pour faire bref, comment sélectionner toutes les feuilles en VBA, sans
les


nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.









Avatar
Jacquouille
L'abusus du Missae vinum ?

--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.

"Clément Marcotte" a écrit dans le message
de news:
Au début, j'avais lu sub farfelue ;-)
"RaMA" a écrit dans le message de
news:
bonjour Jacquouille

Sub farfeuille()
For Each sh In Worksheets
'qq exemples
sh.Activate
qq = sh.Name
Next
End Sub

Salutations
RaMa

--
.
"Jacquouille" a écrit dans le
message de

news:
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range("laplage")
.....


Pouvez-vous me dire comment je dois lui faire comprendre ceci (en
VBA,


ouef
corse)
pour chaque feuille du fichier Machin.xls, pour chaque c dans
plage("A1:C3")
blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner toutes
les


feuilles, puis de poser la condition "pourchaquec ....", ensuite,
voyant


que
cela ne fonctionnait pas, j'ai étudié la solution proposée.
En fait, l'enregistreur fait un tableau avec toutes les feuilles,
mais ne


les sélectionne pas. L'aide me dit (et Jean Sébastien Walkenbach
aussi)


que
l'on ne sait pas travailler en VBA sur la ou les même(s) cel dans
TOUTES


les
feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de dernière
feuille,


puis
de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous ai
compris".


Pour faire bref, comment sélectionner toutes les feuilles en VBA,
sans les


nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.












Avatar
Joël GARBE
Bonjour,

ça commence comme çà, et puis après, on ne se sent plus p.. (quoi déjà ?)

c pas bo de vieillir ;-)

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"LeSteph" a écrit dans le message de news:
%
BonDay Toutlebody

I think perhaps le pb its le camembert of Vba Excel 5
Et pas pourri ..
Pour i à la place de For i
et Si au lieu de if
et à la place de For each ....
(m'en souviens pas non plus)
Peut être
Pour chaque F dans Classeur.Feuilles...
...
Suivant F

:-( c'est affreux de pas se souvenir...

lSteph

"Joël GARBE" a écrit dans le message de news:
416184b2$0$25465$
Bonojoursoir,

un truc de genre :

Sub BoucleEnBoucle()
Dim oSheet As Worksheet
Dim oCell As Range
For Each oSheet In Worksheets
For Each oCell In oSheet.Range("A1:C3")
MsgBox oSheet.Name & " : " & oCell.Address
Next
Next
End Sub

conviendrait-il ?

--

Bien cordialement,

Joël GARBE
www.joelgarbe.fr
"Jacquouille" a écrit dans le message de
news:
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range("laplage") .....
Pouvez-vous me dire comment je dois lui faire comprendre ceci (en VBA,
ouef
corse)
pour chaque feuille du fichier Machin.xls, pour chaque c dans
plage("A1:C3")
blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner toutes les
feuilles, puis de poser la condition "pourchaquec ....", ensuite, voyant
que
cela ne fonctionnait pas, j'ai étudié la solution proposée.
En fait, l'enregistreur fait un tableau avec toutes les feuilles, mais
ne
les sélectionne pas. L'aide me dit (et Jean Sébastien Walkenbach aussi)
que
l'on ne sait pas travailler en VBA sur la ou les même(s) cel dans TOUTES
les
feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de dernière feuille,
puis
de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous ai compris".
Pour faire bref, comment sélectionner toutes les feuilles en VBA, sans
les
nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.













Avatar
leSteph
Bonjour,
...suis en lieu anonymous où il y a encore quelques vieux
grimoires:

exemple (peux pas le tester):

Proc pourjacqouille()
Pour Chaque Feuille Dans Classeur.Feuilles


-----Message d'origine-----
Bonjour
En Excel5 FR et dans l'esprit de "For Each c in range
("laplage") .....

Pouvez-vous me dire comment je dois lui faire comprendre
ceci (en VBA, ouef

corse)
pour chaque feuille du fichier Machin.xls, pour chaque c
dans plage("A1:C3")

blabla....
J'ai essayé avec l'enregistreur de macro, de sélectionner
toutes les

feuilles, puis de poser la condition "pourchaquec ....",
ensuite, voyant que

cela ne fonctionnait pas, j'ai étudié la solution
proposée.

En fait, l'enregistreur fait un tableau avec toutes les
feuilles, mais ne

les sélectionne pas. L'aide me dit (et Jean Sébastien
Walkenbach aussi) que

l'on ne sait pas travailler en VBA sur la ou les même(s)
cel dans TOUTES les

feuilles du fichier.
Existe-til un truc du genre derL, qui serait derF( de
dernière feuille, puis

de feuil1 à derF, ......)
J'espère que comme De Gaule, vous pourrez dire : "Je vous
ai compris".

Pour faire bref, comment sélectionner toutes les feuilles
en VBA, sans les

nommer manuellement une à une?
Un grand merci.
Bonne fin de soirée
--
Bien amicalmement,
Vivement conseillé >> http://www.excelabo.net
Jacquouille.



.



1 2