Sujet Précédent Sujet Suivant

Deplacer plusieurs cellules non contigues sur excel

Fermé
asma7 Messages postés 8 Date d'inscription jeudi 15 août 2013 Statut Membre Dernière intervention 8 mai 2015 - 8 mai 2015 à 11:54
 Maurice - 8 mai 2015 à 13:55
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 255 Date d'inscription jeudi 29 mai 2014 Statut Membre Dernière intervention 26 octobre 2015 88
8 mai 2015 à 11:56
appuie sur ctrl et selectionne non ?
0
asma7 Messages postés 8 Date d'inscription jeudi 15 août 2013 Statut Membre Dernière intervention 8 mai 2015
8 mai 2015 à 11:59
il y a plus que 450 lignes euh si je le ferais manuellement ca me prendrais une éternité
0
imrane555 Messages postés 255 Date d'inscription jeudi 29 mai 2014 Statut Membre Dernière intervention 26 octobre 2015 88
Modifié par imrane555 le 8/05/2015 à 12:09
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 8 Date d'inscription jeudi 15 août 2013 Statut Membre Dernière intervention 8 mai 2015
8 mai 2015 à 12:09
non
c est celle fois ci je veux deplacer 3 colonnes
0
Réponse 2 / 2
Maurice
8 mai 2015 à 13:55
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