Bonjour , imaginez un simple tableau de chiffres . J'ai crée une macro qui me supprime la ligne courante du tableau , jusque là tout va bien .
Mais , je souhaite faire remonter les valeurs en dessous de la ligne supprimée , pour pas qu'il n'y ait de ligne vide dans mon tableau , et après quelques essais je n'y arrive pas , donc voici mon code :
Vous voyez j'ai essayé de transférer les valeurs de la plage du dessous à une plage de meme taille mais une ligne au dessus et ça ne me donne pas ce que je souhaite.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9 Sub enlever() Dim j As Integer, i As Integer, x As Integer x = derniereLigne i = Selection.Row For j = 1 To 5 Cells(i, j).ClearContents Next j Range(Cells(i + 1, 1), Cells(x, 5)).Value = Range(Cells(i, 1), Cells(x - 1, 5)).Value End Sub
Quelqu'un aurait il une solution?
merci
Partager