Se connecter / S'enregistrer
Votre question

Copier coller des lignes sur d'autres feuilles lorsque dans une une colonne de la 1ière feuille des conditions sont remplie

Tags :
  • Programmation
Dernière réponse : dans Programmation
7 Janvier 2017 17:53:03

Bonjour,
Je suis vraiment nul en VBA. Je veux copier toutes les lignes ayant des conditions différentes dans la colonnes T dans différentes feuilles. Je m'explique :
J'ai une feuille : Cummulatif
Dans cette feuille j'ai plusieurs colonnes dont la colonne T me sert pour mes conditions. Si dans la colonne T cela contient "80w" je veux copier ces lignes dans une feuille nommé 80w et si contient 44w je veux copier les lignes dans la feuilles nommé 44w.
J'ai réussi à faire pour une condition mais quand je veux faire la 2ième cela ne fonctionne pas. Voici ce que j'ai de fait :
  1. Sub Macro1()
  2.  
  3.  
  4. Set AG = Worksheets("Cummulatif")
  5. Set A80w = Worksheets("80w")
  6.  
  7. iA80w = 2
  8.  
  9. For iAG = 3 To 10000
  10. If AG.Cells(iAG, 20).Text = "80w" Then
  11. AG.Range(iAG & ":" & iAG).Copy A80w.Cells(iA80w, 1)
  12.  
  13. iA80w = iA80w + 1
  14. End If
  15.  
  16. Next
  17.  
  18. End Sub


Merci de m'aider
CC

Autres pages sur : copier coller lignes feuilles colonne 1iere feuille conditions remplie

a b L Programmation
9 Janvier 2017 12:59:09

Salut, peux-tu poster le code avec la 2eme condition, que l'on voie ou tu t'es trompé ?

N.B. merci de mettre ton code entre balises: [code="vb"] ... ton code ... [/code]
m
0
l