bonsoir ,
je voulais utiliser ma macro sur mon fichier Excel ce dernier devant être stocké sur onedrive elle ne fonctionne pas.
Je voulais savoir s'il était possible de faire une formule qui me permettrai de faire le boulot .
Je vous envois la macro en question en sachant que son role est de couper et de coller les infos présentes dans les lignes ou le mot clôture est renseigné dans la colonne L.
Merci d'avance de votre aide
Sabseb33
Option Explicit
Sub Cloture_Relance()
test Feuil1
End Sub
Sub test(Sh As Worksheet)
Dim i As Long, L As Long
Application.ScreenUpdating = 0
For i = 5 To Sh.Range("A" & Rows.Count).End(xlUp).Row
If Sh.Cells(i, 12) = "Clôture" Then
L = Feuil4.Range("A" & Rows.Count).End(xlUp).Row + 1
Sh.Cells(i, 1).Resize(, 11).Copy Feuil4.Cells(L, 1)
Sh.Rows(i).Delete
i = i - 1
End If
Next
Application.ScreenUpdating = 1
End Sub