Salut Pat5 et le forum
la macro ci-dessous semble répondre à ta préoccupation:
Sub appeler_col_fixe()
' il faut avoir sélectionné au préalable la zone mobile AA2:AA567; G3:G5 etc.
Dim ligH, ligB, nbre As Long
Dim mobile, fixe
Sheets(1).Activate
'caractéristique de la zone sélectionnée
'ligne du début
ligH = Selection.Row
'nombre d'éléments sélectionné
nbre = Selection.Count
'ligne du bas
ligB = nbre + ligH - 1
'contenu
mobile = Selection.Value
'sélection de la colonne B
fixe = Range(Cells(ligH, 2), Cells(ligB, 2)).Value
' ensuite, on va à l'endroit où on veut coller, par exemple feuille 2 en A1 pour fixe _
et B1 pour mobile
Sheets(2).Activate
Range(Cells(1, 1), Cells(nbre, 1)) = fixe
Range(Cells(1, 2), Cells(nbre, 2)) = mobile
End Sub
A+
Michel