Problème boucle VBA

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Problème boucle VBA

kesdo93220

Bonjour,

je tente de réaliser une macro qui me permet de copier l'ensemble des lignes ayant en colonne 2 la référence #N/A d'une feuille de classeur sur une autre.

J'arrive à copier une ligne mais la boucle ne passe pas. :pfff:

Si quelqu'un à une solution.

Merci beaucoup.
:jap:

Kesdo

Code :

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

Publicité

billgatesanonym

Qu'il y a-t-il dans i au début ? Peut-être que le VBA n'aimerait pas que la CurrentRegion change avec le Copy.

Essayer en remplaçant :

For i = Cells(1, 1).CurrentRegion.Rows.Count To 1 Step -1

par :

nb_lines = Cells(1, 1).CurrentRegion.Rows.Count
For i = nb_lines To 1 Step -1

Message édité par billgatesanonym le 05-08-2011 à 14:49:53

kesdo93220

Bon Billgates,

Tout d'abord merci.

Mais à priori c'est pas le currentRegion qui bloque.

C'est surement au niveau de ma définition de LastRow1....

kesdo93220

Bonjour, je me permet de remonter le topic quelqu'un aurait il une solution? :x

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Problème boucle VBA

Sujets relatifs
Objet Submit qui me pose probleme	[MySQL ]Problème sur ON DUPLICATE KEY UPDATE
Problème pour utiliser Vlookup en VBA	Problème de l'utilisation de Scanner ( dans java )
problème sur tableau C++	Perfo VBA
Problème compatibilité IE9 et IE7	VBA - Problème avec ImageComboBox
[VBA] problème dans une boucle	Problème boucle de recherche sous VBA sur Excel
Plus de sujets relatifs à : Problème boucle VBA

Page générée en 0.053 secondes