Sélection Colonnes mobiles

P

Pat5

Guest
Bonsoir le forum

en VBA, je sélectionne la plage " AA5:AA30 ".
Comment faire pour sélectionner en même temps la plage " B5:B30 " et les coller dans une autre feuille ou cellule

Si j'ai sélectionné la plage " Z2:Z10 ", je voudrais pouvoir sélectionner en même temps la plage " B2:B10 " et les coller.

La colonne " B " et la colonne de référence fixe par rapport aux autres ( j'ai 29 colonnes et 8675 lignes ).

Merçi et A+

Pat5 ;o)
 
M

Michel_M

Guest
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
 

Discussions similaires

Statistiques des forums

Discussions
312 228
Messages
2 086 420
Membres
103 205
dernier inscrit
zch