Bonjour,
après avoir fait un peu l'inverse ici : https://forum.excel-pratique.com/viewtopic.php?f=2&t=125305
c'est-à-dire insérer des cellules pour décaler la ligne vers la droite d'un nombre de cases correspondant à un nombre,
j'aimerais pouvoir cette fois-ci simplifier une macro qui :
1. regarde le nombre contenu en cellule S4
2. Supprime la cellule T4 autant de fois qu'indique le nombre en S4
3. Passe à la cellule S5 et la ligne 5 (supprimer la cellule T5 tant de fois...)
4. et ainsi de suite jusqu'à S11.
Voici la macro qui fonctionne mais qui est pataude :
For a = 1 To Range("S4")
Range("T4").Delete Shift:=xlToLeft
Next a
For b = 1 To Range("S5")
Range("T5").Delete Shift:=xlToLeft
Next b
For c = 1 To Range("S6")
Range("T6").Delete Shift:=xlToLeft
Next c
For d = 1 To Range("S7")
Range("T7").Delete Shift:=xlToLeft
Next d
For e = 1 To Range("S8")
Range("T8").Delete Shift:=xlToLeft
Next e
For f = 1 To Range("S9")
Range("T9").Delete Shift:=xlToLeft
Next f
For g = 1 To Range("S10")
Range("T10").Delete Shift:=xlToLeft
Next g
For h = 1 To Range("S11")
Range("T11").Delete Shift:=xlToLeft
Next h
End Sub
Peut-on la simplifier avec une autre boucle par exemple ?