est ce possible??

[Christophe]

Salut e tous(tes),

Est ce que c'est algo est réealisable en VBA?
Son but est de prcourir les feuille d'un classeur avec une boucle
While...Wend par ex.

Le classeur a des feuilles de A à Z par exemple

Var=Sheets"A"
While var<> Sheets"Z" do
instructions
on passe a la feuille suivante (?? sheets++??)
Wend

Is it possible?? Merci a tous excelien expert(es)...

 

[Pascal76]

Salut Christophe

Si tu veux parcourir toutes les feuilles tu peux faire

For each ws in worksheets

Instruction

Next


Pascal

 

[Christophe]

Merci pascal je ne connaissais pas l'instruction.

 

[Christophe]

Voila ce que je veux faire et ça ne marche pas désolé.

For Each ws In Worksheets
Cells(3, 8) = "Edité le" & Date
Next

Est il possible de na pas coller Cells(3, 8) = "Edité le" & Date sur la premiere
page du classeur elle s'appelle Balance.

Merci beaucoup.

 

[Pascal76]

Re

essaies

For Each ws In Worksheets
if ws.name = "Balance" then
else
Range("H3") = "Edité le" & Date
Next

Pascal

 

[Christophe]

Il y aurait apperemnt une erreur dans le For car il ma sort une erreur de compilation Next sans for pourtant voila le copier coller de mon code

For Each ws In Worksheet
If ws.Name = "Balance" Then
Else
Range("H3") = Date
Next

Merci Pascal pour ton aide.

 

[Pascal76]

excuse j'ai oubliè

End If

avant Next

For Each ws In Worksheets
if ws.name = "Balance" then
else
Range("H3") = "Edité le" & Date
End If
Next

Pascal

 

[Christophe]

J'ai essayé avec wks a la place de ws mais ça me le colle toujours sur une seule feuille et puis c'est tout ça m'enerve car le code que tu m'a donné parait logique et juste et ça ne marche pas Merci en tout cas et excuse pour le end if je ne l'avait pas vu non plus !!

 

[Christophe]

For Each wks In Worksheets
If wks.Name = "Balance" Then
Else
wks.Range("H3") = Date
End If
Next wks

Voila au final le code qui marche merci pascal a plus.

 

[Pascal76]

et oui

j'avais oublié le ws.range("H3") au lieu de Range("H3")

En plus j'ais fait la même erreur chez moi l'autre jour

Bah alors le gars y pense à rien

Pascal