une cellule sur deux

O

OnErrorResumeNext

Guest

• 4 Février 2005

• #2

bonjour Tiphanie,

en B1, tu copies cette formule :

=SI(MOD(LIGNE();2)=0;A1;"")
que tu recopies vers le bas.

Si tu veux que ce soit les lignes impaires qui soient recopiées :

=SI(MOD(LIGNE();2)=1;A1;"")

amicalement

 

Vote positif 0 Vote négatif

R

Rai

Guest

• 4 Février 2005

• #3

Bonjour Tiphanie,

Tu le veux en VBA ? Ou en Formule ?

Allez, j'te fais les 2 pour le prix d'un ;oP

Par formule
En B1 tu écris :
=INDIRECT("A"&LIGNE()*2-1)
et tu recopies vers le bas

En VBA
Sub unsurdeux()
For i% = 0 To 97 Step 2
Cells(i / 2 + 1, 2) = Cells(i + 1, 1)
Next i
End Sub


Ca te convient ??

Bonne fin de journée

Rai

 

Vote positif 0 Vote négatif

M

Monique

Guest

• 4 Février 2005

• #4

Bonjour,

Quatre autres
1ère puis 3ème puis 5ème valeurs de la colonne A :
si tu démarres en ligne 1 :
=DECALER($A$1;(LIGNE()-1)*2;0)
si tu démarres en ligne 3 :
=DECALER($A$1;(LIGNE()-3)*2;0)

2ème puis 4ème puis 5ème valeurs :
si tu démarres en ligne 1 :
=DECALER($A$1;LIGNE()*2-1;0)
si tu démarres en ligne 3 :
=DECALER($A$1;(LIGNE()-2)*2-1;0)

 

Vote positif 0 Vote négatif

O

OnErrorResumeNext

Guest

• 4 Février 2005

• #5

bonjour Rai,

bien joué ! ,
j'ai laissé honteusement une ligne vide entre chaque valeur, quel gâchis !

bon après-midi

amicalement

 

Vote positif 0 Vote négatif