Bonjour ,
j'ai un problème sur mon code, la boucle qui permet de copier mes lignes qui contiennent #N/A sur une autre feuille du classeur ne fonctionne pas.
J'ai seulement la première ligne contenant #N/A qui est copié sur l'autre feuille.
HELP
Merci d'avance![]()
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17 Sub compcpte() Worksheets("global Compte").Activate Dim LastRow1 As Long LastRow1 = Sheets("Compte non présent dans import").Range("A" & Rows.Count).End(xlUp).Row + 1 For i = Cells(1, 1).CurrentRegion.Rows.Count To 1 Step -1 If WorksheetFunction.IsNA(Cells(i, 2)) = True Then Range(Cells(i, 1), Cells(i, 10)).Copy Sheets("Compte non présent dans import").Cells(LastRow1, 1) Next i End Sub
Partager