Bonjour,
Quand on parcourt une plage de cellules avec For Each Next, la
progression se fait ligne par ligne apparemment.
Dans for each C in range("A1:B2"), C prend successivement les valeurs
A1, B1, puis A2, B2.
C'est possible de parcourir la plage colonne par colonne ?
-Application.Transpose transpose un champ en 'tableau mémoire' et ne permet que l'accès à la valeur en lecture (cas fréquent -avec un seul Application.Transpose (le rapport de vitesse de lecture est 15) -Il faut 2 application.Transpose parce qu'une boucle For Each sur un 'tableau mémoire' parcours dans le sens colonne/Ligne. OK c'est compris.
Merci ;o)
-- Brunos
-Application.Transpose transpose un champ en 'tableau mémoire' et ne
permet que l'accès à la valeur en lecture (cas fréquent -avec un seul
Application.Transpose (le rapport de vitesse de lecture est 15)
-Il faut 2 application.Transpose parce qu'une boucle For Each sur un
'tableau mémoire' parcours dans le sens colonne/Ligne.
OK c'est compris.
-Application.Transpose transpose un champ en 'tableau mémoire' et ne permet que l'accès à la valeur en lecture (cas fréquent -avec un seul Application.Transpose (le rapport de vitesse de lecture est 15) -Il faut 2 application.Transpose parce qu'une boucle For Each sur un 'tableau mémoire' parcours dans le sens colonne/Ligne. OK c'est compris.
Merci ;o)
-- Brunos
Jacky
Re... Merci de l'info. Je vais travailler la dessus.
-- Salutations JJ
"JB" a écrit dans le message de news:
Bonsoir,
Explication: Application.Transpose transforme le champ en tableau mémoire.
JB
On 6 fév, 18:42, "Jacky" wrote:
Bonsoir JB
Cette boucle est 5 fois plus rapide que:
Impressionnent. Chez moi: 0.03 seconde et 0.2
-- Salutations JJ
"JB" a écrit dans le message de news:
t = Timer For Each c In Application.Transpose(Application.Transpose([A1:Z2000])) tot = tot + c Next MsgBox Timer - t
Cette boucle est 5 fois plus rapide que:
t = Timer For Each c In [A1:Z2000] tot = tot + c Next MsgBox Timer - t
JB
On 6 fév, 13:39, JB wrote:
Bonjour,
For Each c In Application.Transpose(Application.Transpose([A1:B2])) MsgBox c Next
JB
On 6 fév, 11:56, "Brunos" wrote:
Bonjour, Quand on parcourt une plage de cellules avec For Each Next, la progression se fait ligne par ligne apparemment. Dans for each C in range("A1:B2"), C prend successivement les valeurs A1, B1, puis A2, B2. C'est possible de parcourir la plage colonne par colonne ?
Merci -- Brunos- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Re...
Merci de l'info.
Je vais travailler la dessus.
--
Salutations
JJ
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
abc5901c-01c2-4c45-84e2-420beb784611@k2g2000hse.googlegroups.com...
Bonsoir,
Explication: Application.Transpose transforme le champ en tableau
mémoire.
JB
On 6 fév, 18:42, "Jacky" <Dup...@marcel.fr> wrote:
Bonsoir JB
Cette boucle est 5 fois plus rapide que:
Impressionnent.
Chez moi:
0.03 seconde
et
0.2
--
Salutations
JJ
"JB" <boisgont...@hotmail.com> a écrit dans le message de news:
57e02449-c43a-4314-bc3e-1421cc091...@d70g2000hsb.googlegroups.com...
t = Timer
For Each c In
Application.Transpose(Application.Transpose([A1:Z2000]))
tot = tot + c
Next
MsgBox Timer - t
Cette boucle est 5 fois plus rapide que:
t = Timer
For Each c In [A1:Z2000]
tot = tot + c
Next
MsgBox Timer - t
JB
On 6 fév, 13:39, JB <boisgont...@hotmail.com> wrote:
Bonjour,
For Each c In Application.Transpose(Application.Transpose([A1:B2]))
MsgBox c
Next
JB
On 6 fév, 11:56, "Brunos" <pasdem...@moi.mezig> wrote:
Bonjour,
Quand on parcourt une plage de cellules avec For Each Next, la
progression se fait ligne par ligne apparemment.
Dans for each C in range("A1:B2"), C prend successivement les valeurs
A1, B1, puis A2, B2.
C'est possible de parcourir la plage colonne par colonne ?
Merci
--
Brunos- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -- Masquer le texte des
messages précédents -
Re... Merci de l'info. Je vais travailler la dessus.
-- Salutations JJ
"JB" a écrit dans le message de news:
Bonsoir,
Explication: Application.Transpose transforme le champ en tableau mémoire.
JB
On 6 fév, 18:42, "Jacky" wrote:
Bonsoir JB
Cette boucle est 5 fois plus rapide que:
Impressionnent. Chez moi: 0.03 seconde et 0.2
-- Salutations JJ
"JB" a écrit dans le message de news:
t = Timer For Each c In Application.Transpose(Application.Transpose([A1:Z2000])) tot = tot + c Next MsgBox Timer - t
Cette boucle est 5 fois plus rapide que:
t = Timer For Each c In [A1:Z2000] tot = tot + c Next MsgBox Timer - t
JB
On 6 fév, 13:39, JB wrote:
Bonjour,
For Each c In Application.Transpose(Application.Transpose([A1:B2])) MsgBox c Next
JB
On 6 fév, 11:56, "Brunos" wrote:
Bonjour, Quand on parcourt une plage de cellules avec For Each Next, la progression se fait ligne par ligne apparemment. Dans for each C in range("A1:B2"), C prend successivement les valeurs A1, B1, puis A2, B2. C'est possible de parcourir la plage colonne par colonne ?
Merci -- Brunos- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -- Masquer le texte des messages précédents -
