Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel Filtre ou tri aléatoire

Filtre ou tri aléatoire

14 réponses
Avatar
Souris
Bonjour j'ai un tableau de A5: N4107. Je dois choisir à tous les 15 lignes
les données présentes pour former un autre tableau sur une autre feuille.
Est-ce possible? Je ne suis pas très habile en VBA mais si vous m'aider je
peux sûrement y arriver!

Merci mille fois!
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2
Avatar
AV
Essaye si ce qui so=iut te convient
Les données sont en "Feuil1" et l'extraction se fait en "Feuil2"

Sub zzzz()
x = 1
For i = 5 To 4107 Step 15
Range("Feuil2!A" & x & ":N" & x).Value = Range("Feuil1!A" & i & ":N" &
i).Value
x = x + 1
Next
End Sub

AV
Avatar
Souris
Je suis désolée mais il me marque une erreur 400... qu'est-ce que ça veut
dire?

"AV" a écrit dans le message de
news:uA7$
Essaye si ce qui so=iut te convient
Les données sont en "Feuil1" et l'extraction se fait en "Feuil2"

Sub zzzz()
x = 1
For i = 5 To 4107 Step 15
Range("Feuil2!A" & x & ":N" & x).Value = Range("Feuil1!A" & i & ":N"
&

i).Value
x = x + 1
Next
End Sub

AV




Avatar
sabatier
donc ce qui so=uit ne te convient pas, souris...
allez AV, remets-toi au boulot, je te prie, et fais en sorte de livrer
un truc tout co=uit...
jps

Souris a écrit:
Je suis désolée mais il me marque une erreur 400... qu'est-ce que ça veut
dire?

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

Essaye si ce qui so=iut te convient
Les données sont en "Feuil1" et l'extraction se fait en "Feuil2"

Sub zzzz()
x = 1
For i = 5 To 4107 Step 15
Range("Feuil2!A" & x & ":N" & x).Value = Range("Feuil1!A" & i & ":N"


&

i).Value
x = x + 1
Next
End Sub

AV









Avatar
AV
Je suis désolée mais il me marque une erreur 400... qu'est-ce que ça veut
dire?


L'instruction allant de : "Range("Feuil2!A.....à ---> ":N" &i).Value
est sur une seule ligne !

AV

Avatar
Souris
c'est ce que j,ai fais... j'avais figuré

"AV" a écrit dans le message de
news:
Je suis désolée mais il me marque une erreur 400... qu'est-ce que ça
veut


dire?


L'instruction allant de : "Range("Feuil2!A.....à ---> ":N" &i).Value
est sur une seule ligne !

AV





Avatar
Souris
J,ai même refais le même scénario dans un nouveau document et il me donne
toujours cette erreur...

"Souris" a écrit dans le message de
news:%
c'est ce que j,ai fais... j'avais figuré

"AV" a écrit dans le message de
news:
Je suis désolée mais il me marque une erreur 400... qu'est-ce que ça
veut


dire?


L'instruction allant de : "Range("Feuil2!A.....à ---> ":N" &i).Value
est sur une seule ligne !

AV









Avatar
garnote
Bonsoir Souris,

Je viens d'essayer l'AVsolution et tout est parfait !

Serge


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

J,ai même refais le même scénario dans un nouveau document et il me donne
toujours cette erreur...

"Souris" a écrit dans le message de
news:%
c'est ce que j,ai fais... j'avais figuré

"AV" a écrit dans le message de
news:
Je suis désolée mais il me marque une erreur 400... qu'est-ce que ça
veut


dire?


L'instruction allant de : "Range("Feuil2!A.....à ---> ":N" &i).Value
est sur une seule ligne !

AV













Avatar
Souris
Merci de me dire comment faire à ce moment.... parce que je n'y arrive
vraiment pas...

je clique droit sur ma feui1 et choisi visualiser le code... ensuite je
copie colle la formule de AV...
qu'est-ce que j,ai manqué?

"garnote" a écrit dans le message de
news:P74tc.17619$
Bonsoir Souris,

Je viens d'essayer l'AVsolution et tout est parfait !

Serge


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

J,ai même refais le même scénario dans un nouveau document et il me
donne


toujours cette erreur...

"Souris" a écrit dans le message de
news:%
c'est ce que j,ai fais... j'avais figuré

"AV" a écrit dans le message de
news:
Je suis désolée mais il me marque une erreur 400... qu'est-ce que
ça





veut
dire?


L'instruction allant de : "Range("Feuil2!A.....à ---> ":N" &i).Value
est sur une seule ligne !

AV

















Avatar
garnote
Je crois que tu viens de trouver ton erreur !
Il ne faut pas coller la macro de AV après
un clic droit sur l'onglet.
Il faut plutôt taper Alt+F11 et coller la macro sur la
feuille vierge qui devrait apparaître.

Serge

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

Merci de me dire comment faire à ce moment.... parce que je n'y arrive
vraiment pas...

je clique droit sur ma feui1 et choisi visualiser le code... ensuite je
copie colle la formule de AV...
qu'est-ce que j,ai manqué?

"garnote" a écrit dans le message de
news:P74tc.17619$
Bonsoir Souris,

Je viens d'essayer l'AVsolution et tout est parfait !

Serge


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

J,ai même refais le même scénario dans un nouveau document et il me
donne


toujours cette erreur...

"Souris" a écrit dans le message de
news:%
c'est ce que j,ai fais... j'avais figuré

"AV" a écrit dans le message de
news:
Je suis désolée mais il me marque une erreur 400... qu'est-ce
que






ça
veut
dire?


L'instruction allant de : "Range("Feuil2!A.....à ---> ":N"
&i).Value





est sur une seule ligne !

AV





















Avatar
garnote
Et si après Alt+F11, il n'y a pas de feuille vierge,
tu cliques sur Insertion / Module et là, tu colles.

Serge
1 2