T toony.m XLDnaute Nouveau 16 Juin 2009 #1 Bonjour à tous! Ptite question macro...: J'ai un tableau à 4 colonnes (A, B, C, D). Je cherche à couper la 1ère cellule (A) de toutes les lignes impaires pour la copier vers la dernière colonne (D) de la ligne précédente. Comment faire ça avec une macro ?
Bonjour à tous! Ptite question macro...: J'ai un tableau à 4 colonnes (A, B, C, D). Je cherche à couper la 1ère cellule (A) de toutes les lignes impaires pour la copier vers la dernière colonne (D) de la ligne précédente. Comment faire ça avec une macro ?
Pierrot93 XLDnaute Barbatruc 16 Juin 2009 #2 Re : macro pour déplacer le contenu de cellules Bonjour Tony essaye peut être ainsi, s'applique à la feuille active : Code: Option Explicit Sub test() Dim i As Integer For i = 3 To Range("A65536").End(xlUp).Row Step 2 Cells(i, 1).Cut Cells(i - 1, 4) Next i End Sub bonne fin d'après midi @+ Vote positif 0 Vote négatif
Re : macro pour déplacer le contenu de cellules Bonjour Tony essaye peut être ainsi, s'applique à la feuille active : Code: Option Explicit Sub test() Dim i As Integer For i = 3 To Range("A65536").End(xlUp).Row Step 2 Cells(i, 1).Cut Cells(i - 1, 4) Next i End Sub bonne fin d'après midi @+
T toony.m XLDnaute Nouveau 16 Juin 2009 #3 Re : macro pour déplacer le contenu de cellules Superbe! Merci beaucoup! Vote positif 0 Vote négatif