Problème macro pour copier des données

Fermé
margir4233 Messages postés 67 Date d'inscription mardi 12 avril 2016 Statut Membre Dernière intervention 22 février 2023 - 17 juin 2016 à 05:23
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 - 17 juin 2016 à 16:04
Bonjour,


J'ai un ami qui m'a aidé pour ma macro pour copier des lignes d'un 1er onglet dans un 2e onglet.

Quand je fais le pas à pas (F8) je vois bien que la macro repars sur la première ligne copiée et la copie une 2e fois avant de passer à la ligne suivante.
Je ne comprend pas pourquoi et comment le corriger.

Malheureusement, mon ami ne peut pas m'aider avant quelques jours.

Des idées?

For Each Qte In Range("TableauClientCommandeSpeciale_Qte")
If Qte <> "" And Qte <> "0" Then
'On a des quantités, donc on copie la ligne dans le tableau des CommandeJour

Sheets("ClientCommande").Select
Qte.EntireRow.Select
Selection.Copy

Application.Goto Sheets("CommandeJour").Range("A" & 6 + NoLigne)
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
NoLigne = NoLigne + 1
End If
Next


Merci pour votre aide
A voir également:

1 réponse

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 525
17 juin 2016 à 06:37
Bonjour,

A priori, le problème ne se situe pas au niveau de ce "morceau" de procédure.
Pour nous permettre de t'aider, il est souhaitable que tu transmettes une copie de ton classeur qui reproduise le dysfonctionnement constaté.

A+
0
margir4233 Messages postés 67 Date d'inscription mardi 12 avril 2016 Statut Membre Dernière intervention 22 février 2023
Modifié par margir4233 le 17/06/2016 à 12:51
Bonjour Gyrus,
Tout d'abord merci beaucoup de m'aider
Ci-joint le fichier
http://www.cjoint.com/c/FFrkW6n1pqa

C'est la fonction des boutons dans l'onglet CommandeClient
Quand j'appui sur un des boutons (ca le fait pour les deux)
Ca copie en double les données dans CommandeJour

J'ai mis des données prêtes
0
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 525 > margir4233 Messages postés 67 Date d'inscription mardi 12 avril 2016 Statut Membre Dernière intervention 22 février 2023
17 juin 2016 à 14:45
Je ne suis pas sûr d'avoir compris ton problème.
Avec ton classeur, lorsque je clique sur un des 2 boutons, la commande standard et la commande spéciale sont copiées une seule fois.

A+
0
margir4233 Messages postés 67 Date d'inscription mardi 12 avril 2016 Statut Membre Dernière intervention 22 février 2023
17 juin 2016 à 15:05
J'ai trouvé le bug, c'était parce que j'ai inséré une colonne pour le type de commande et ça changé une zone nommé
Donc si je ne mettais pas de valeur dans Commentaire produit, ça copiait comme il faut
Mais pas quand il y avait un commentaire

J'ose une nouvelle question...
Il me reste un big, c'est le bouton Finaliser la commande du jour dans l'onglet CommandeJour. Ca ne va pas copier à la dernière ligne vide

Merci beaucoup de prendre le temps, c'est très apprécié
margir
0
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 525 > margir4233 Messages postés 67 Date d'inscription mardi 12 avril 2016 Statut Membre Dernière intervention 22 février 2023
17 juin 2016 à 16:04
D'abord, il faudrait que tu m'expliques pourquoi tu as des données de la ligne 205 à 222 dans la feuille "CommandeFacturation".

A+
0