Deplacer plusieurs cellules non contigues sur excel

asma7 Messages postés 13 Statut Membre -  
 Maurice -
Bonjour,

je veux bien déplacer plusieurs cellules non contigues sur excel
le tableau A est le tableau de départ le tableau b est le resultat souhaité

A voir également:

2 réponses

Réponse 1 / 2
imrane555 Messages postés 257 Date d'inscription   Statut Membre Dernière intervention   89
 
appuie sur ctrl et selectionne non ?
0
asma7 Messages postés 13 Statut Membre
 
il y a plus que 450 lignes euh si je le ferais manuellement ca me prendrais une éternité
0
imrane555 Messages postés 257 Date d'inscription   Statut Membre Dernière intervention   89
 
https://forums.commentcamarche.net/forum/affich-30591923-deplacer-plusieurs-cellules-non-contigues-sur-excel
Comme ça non?
en plus c'est toi qui l'a posté mdr
0
asma7 Messages postés 13 Statut Membre
 
non
c est celle fois ci je veux deplacer 3 colonnes
0
Réponse 2 / 2
Maurice
 
Bonjpur
Voila une macro pour ton model 
Sub TestCopy()
   For L = 7 To 10
      Range("C" & L & ":E" & L).Copy
         If L Mod 2 <> 0 Then 'si L impair
            Range("C" & L + 8).PasteSpecial Paste:=xlPasteAll
          Else 'si L pair
            Range("F" & L + 8).PasteSpecial Paste:=xlPasteAll
      End If
   Next
Application.CutCopyMode = False
End Sub


A+
Maurice
0