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

6 réponses

1 2
Avatar
leSteph
..pardon fausse manip
donc shema optionnel:

Proc Jacquouille()
Pour Chaque Feuille Dans ClasseurActif.Feuilles
Pour Chaque Cellule Dans Feuille.Plage("maplage).Cellules
'faire tant que ça bouille(le cas échéant)
'ma tambouille'
'Si ratatouille Alors
'Sortir Faire
'Sinon
'ceci
'Fin Si
'Boucle
Suivant Cellule
'.. Sortir Pour(si besoin)
Suivant Feuille
'.. Sortir Proc...
Fin Proc

-----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.



.



Avatar
Sitting Hoax \(BM\)
A part peut être le mot "Worksheets. Count",
qu'on peut changer en Sheets.Count
le mot "Sheets" passse bien il me semble.
Il m'est arrivé de programmer sur excel 5 en français,
je crois me rappeler qu'il acceptait malgré tout l'anglais.
non ?!?
Amicalement
Siestting Hoax ( c'est l'heure de la sieste)
"sabatier" a écrit dans le message
de news:%
'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
sabatier
ben je crois pas, laurent, sinon le jacquouille ne se pourrirait pas autant
la vie s'il pouvait récupérer les procs en grand breton, comme il dit....
enfin, moi je dis ça comme ça puisque je suis trop jeune pour avoir connu
excel5...
jps

"Sitting Hoax (BM)" a écrit dans le
message de news:%
A part peut être le mot "Worksheets. Count",
qu'on peut changer en Sheets.Count
le mot "Sheets" passse bien il me semble.
Il m'est arrivé de programmer sur excel 5 en français,
je crois me rappeler qu'il acceptait malgré tout l'anglais.
non ?!?
Amicalement
Siestting Hoax ( c'est l'heure de la sieste)
"sabatier" a écrit dans le
message

de news:%
'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
AV
En gaulois :

Proc Jacquouille()
Pour i = 1 à FeuillesCalcul.NombreDe
Pour Chaque c Dans Feuilles(i).Plage("A1:C3")
'blabla
Suivant c
Suivant i
Fin Proc

AV
Avatar
sabatier
et pour l'hydromel, jacquouille, tu klaxonnes mais surtout tu le partages
avec AV qui, lui, t'a compris...
jps

"AV" a écrit dans le message de
news:
En gaulois :

Proc Jacquouille()
Pour i = 1 à FeuillesCalcul.NombreDe
Pour Chaque c Dans Feuilles(i).Plage("A1:C3")
'blabla
Suivant c
Suivant i
Fin Proc

AV




Avatar
Jacquouille
Mais, qu'est-ce qu'ils sont sympa.
Y en a même un qui permet à la macro de sortir pour faire son besoin.
Par contre, mon Vénéré AV, Président m'a appris que Blabla se traduit par
Blabla en French.
Ich bin content.
Un grand merci à vous tous. Il est évident aussi que j'avais traductionné
la Sub Marseillaise.
Merci à tous.

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

"leSteph" a écrit dans le message de
news:066f01c4aac7$dbcf3460$
..pardon fausse manip
donc shema optionnel:

Proc Jacquouille()
Pour Chaque Feuille Dans ClasseurActif.Feuilles
Pour Chaque Cellule Dans Feuille.Plage("maplage).Cellules
'faire tant que ça bouille(le cas échéant)
'ma tambouille'
'Si ratatouille Alors
'Sortir Faire
'Sinon
'ceci
'Fin Si
'Boucle
Suivant Cellule
'.. Sortir Pour(si besoin)
Suivant Feuille
'.. Sortir Proc...
Fin Proc

-----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