Aller au menu - Aller au contenu

VBA

maccro excel

Pour accéder à cette section
Connectez-vous !
connexion_rpx
Page 1 
Auteur Message
2 visiteurs sur ce sujet (2 anonymes)
Page 1 
Hors ligne akry # Posté le 06/02/2012 à 10:54:02
Avatar
Salut les zéros alors voila j'essaye de faire une maccro qui me copie des données dans une autre feuille quand une des lignes a comme valeur 0

par exemple j'ai une feuille 1 avec comme données

A B C
test test2 0
test test3 1
test test4 0

je voudrai donc récupérer que les lignes qui sont à 0 et les copier sur une autre feuille j'ai déja commencé a codé voici mon code

Code : VB.NET
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Sub Copie()

Sheets("Feuil1").Select
Range("D:D").Select
If ActiveCell = "0" Then GoTo copier
Exit Sub


copier:
Sheets("Feuil1").Select
Columns("C:C").Select
Range("C1").Activate
Selection.Copy
Sheets("Feuil2").Select
Columns("C:C").Select
ActiveSheet.Paste

Sheets("Feuil1").Select
Columns("A:A").Select
Range("A1").Activate
Selection.Copy
Sheets("Feuil2").Select
Columns("A:A").Select
ActiveSheet.Paste



End Sub


De l'aide serai la bienvenue cordialement
AkRy
:diable:
Il vaut mieux suivre le bon chemin en boitant que le mauvais d'un pas ferme
:diable:
 
Publicité # Posté le 06/02/2012 à 10:54:02

Hors ligne Angelo # Posté le 06/02/2012 à 14:09:19
Avatar

Études : CFA AFTI
Salut

Tu as plusieurs soucis

Tout d'abord tu sélectionnes la mauvaise colonne : D alors que tes 0 sont en colonne C
Néanmoins même avec la bonne colonne, il ne faut pas chercher dans toutes la colonne mais regarder ligne à ligne
Pour parcourir l'ensemble des lignes, il faut chercher la dernière ligne non vide et boucler de la première à la dernière
Pour chaque ligne, tu regardes la valeurs en colonne C et si cela vaut 0, tu copies/colles (il faudra également un compteur pour sur quelle ligne coller

Voila, je te laisse chercher un peu
Merci de ne donner que le code minimal correspondant à votre problème
 

Retour au forum "Autres langages, outils et approches" ou à la liste des forums

Pour accéder à cette section
Connectez-vous !
connexion_rpx