OVH Cloud OVH Cloud

comment selectionner 1 cellule sur 2 sur excel

19 réponses
Avatar
lora003
1 1
2 3
3 5
4
5
6

9 réponses

1 2
Avatar
AV
Infernal !!!
8 mn pour zz1, 30 s pour zz2.


Ben faut changer ta bécane
"zz2" devrait tourner autour de 5-6 sec
;-)

AV

Avatar
Patrick Penet
euuhhh ?

ACER 1700
P4 tournant à 3.04 GHZ
1024 MB de mémoire vive
HDD 120 GB, XL2003
etc.

Je l'échange gratos contre le tien à cause
de la matière grise incluse, pas des
performances (le mien est meilleur, non ?) .

;-))))
P.

PS: ceci dit comme j'ai horreur de poireauter
devant mon écran quand une sub mouline, zz2
a peut-être duré 10 s, bon disons 9. C'est zz1
qui m'a énervé.

Mais ça c'est du bon code.




"AV" a écrit dans le message de news: %
Infernal !!!
8 mn pour zz1, 30 s pour zz2.


Ben faut changer ta bécane
"zz2" devrait tourner autour de 5-6 sec
;-)

AV




Avatar
AV
ACER 1700
P4 tournant à 3.04 GHZ
1024 MB de mémoire vive


Pour moi c'est kikif :
Marque : l'assembleur du coin de la rue
P4 3.2Ghz
1024 Kb (MB --> tu t'es pas trompé d'unité ? )

Tests très significatifs démontrant que le "progrès" n'est pas toujours où on le
croit...:
Conditions des tests :
* Exécution de la macro "zz2" sur un classeur vierge.
* Aucun autre classeur ouvert.
* 10 exécutions consécutives (for i =1 to 10 ---> on garde le meilleur temps).

XL 95 --> 0.60 s
XL 97 --> 0.90 s
XL 2000 --> 1.13 s
XL 2003 --> 2.03 s

Moralité : c'est bien dans les vieux pots qu'on fait la meilleure soupe !

AV

Avatar
JB
Bonjour,

Temps: 0,6sec:

http://cjoint.com/?mdloYlXaPs

Sub essai()
Columns("C:C").Insert Shift:=xlToRight
Range("C1:C10000").Select
Selection.FormulaArray =
"=IF(MOD(ROW(INDIRECT(""1:10000"")),2)=1,Champ,"""")"
Selection.SpecialCells(xlCellTypeFormulas, 1).Copy [D1]
Columns("C:C").Delete Shift:=xlToLeft
End Sub

JB

Manuellement ?

... en cliquant sur les cellules tout en maintenant
la touche Ctrl enfoncée.

P.


"" @discussions.microsoft.com> a é crit dans le message de news:

1 1
2 3
3 5
4
5
6




Avatar
Patrick Penet
1024 Kb (MB --> tu t'es pas trompé d'unité ? )
ooops !


XL95, avec VBA en français ?

En tout cas, j'utiliserai SpecialCells ce que je ne
faisait pas.

Cdlt.
P.

Avatar
AV
XL95, avec VBA en français ?


Français ou anglais, ça n'a pas d'incidence sur le temps d'exécution
Sauf que la méthode "SpecialCells" s'accompagne de la constante "xlVisible" et
non, pour les versions ultérieures, de "xlCellTypeVisible"
Mais bon...ça ne peut intéresser que les archéologues !
;-)

AV

Avatar
FxM
Bonsoir,

1024 Kb (MB --> tu t'es pas trompé d'unité ? )


Le strict mini pour Windows XP étant 256 Mo, c'est donc MB qui me paraît
bon.

@+
FxM

PS : Ducoin est une bonne marque :o)

Avatar
jps
il y a éperluette, comme aurait dit AV, que je dis que je perds 3 fois plus
de temps pour une même tache faite avant avec XL 97 et maintenant avec XL
2002...
à moi les vieux pots...et potes
jps

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

ACER 1700
P4 tournant à 3.04 GHZ
1024 MB de mémoire vive


Pour moi c'est kikif :
Marque : l'assembleur du coin de la rue
P4 3.2Ghz
1024 Kb (MB --> tu t'es pas trompé d'unité ? )

Tests très significatifs démontrant que le "progrès" n'est pas toujours où
on le croit...:
Conditions des tests :
* Exécution de la macro "zz2" sur un classeur vierge.
* Aucun autre classeur ouvert.
* 10 exécutions consécutives (for i =1 to 10 ---> on garde le meilleur
temps).

XL 95 --> 0.60 s
XL 97 --> 0.90 s
XL 2000 --> 1.13 s
XL 2003 --> 2.03 s

Moralité : c'est bien dans les vieux pots qu'on fait la meilleure soupe !

AV








Avatar
AV
Bofff...moi et le hard....
Pour ce qui est du domaine du PC, je sous-traite, je mondialise !
Pour "l'autre domaine", je "traite localement"

AV
1 2