Explication commentaire Code rapide

Bonjour tout le monde,

est ce que quelqu'un pourrait m'expliquer ce bout de code

BOUCLE:

Range("Z8").Select

NB_LIG = ActiveCell.Value

Rows("500:500").Select

Selection.Copy

Rows("11:400").Select

ActiveSheet.Paste

Rows("10:10").Select

Selection.Copy

Rows("11:" & NB_LIG).Select

ActiveSheet.Paste

Selection.Copy

ActiveSheet.Paste

Selection.Copy

Selection.PasteSpecial Paste:=xlPasteValues

ActiveSheet.PageSetup.PrintArea = "$A$1:$s$" & NB_LIG

Range("D22").Select

Application.CutCopyMode = False

Return

Merci par avance

Bonjour

Fais comme moi qui avoue être quasi-nul en VBA

Ajoute avant ton Code cette ligne

Sub Test()

remplace le return par End Sub

Mets tout ça dans un Module

Inscrit un nombre en Z8

Inscrits quelques données ligne 10 et ligne 500

Après quoi, tu fais Alt+F11 pour afficher le Code

Tu positionnes le curseur de la souris avant le début du Code

Et à chaque pression sur la touche F8, tu regardes ce qui se passe.

C'est surement mieux que de l'expliquer et plus visuel.

Cordialement

Merci je vais faire ça! ça peut être intéressant!!