Modification VBA

Salut

J'ai un problème dans le code vba d'archiver les données

le problème c'est qu'il archive seulement 12 ET 14 ET 16 ………………...feuille BON DE RECEPTION

je vous demande de bien vouloir de m'aider pour le modifier afin qu'il puisse archiver toutes les lignes 12 13 14 15 16 ..........

merci d'avance

6classeur-2.zip (337.03 Ko)

ance

Bonjour,

J'ai juste modifié une ligne mais je n'ai pas fait de test. Normalement, cette ligne devait être la cause de ton problème :

    For i = 12 To fbr.Range("C52").End(xlUp).Row Step 2

'devient

For i = 12 To fbr.Range("C52").End(xlUp).Row

Cdlt,

6classeur-2.zip (313.14 Ko)
1classeur-2.zip (313.14 Ko)
capture3

CA MARCHE PAS

Alors bonjour déjà,

Je n'ai pas vraiment fait attention à votre code, j'ai vu le step 2 donc ça m'a paru évident. Mais il faut que vous modifiiez :

fa.Range("A" & lgn + i / 2 - 6) = fbr.Range("H6")

'par

fa.Range("A" & lgn + i - 12) = fbr.Range("H6")

et faire de même pour toutes les lignes qui suivent.

Rechercher des sujets similaires à "modification vba"