V
VEVE
Guest
Re Bonjour
Ce matin suite à l'aide de Pascal.J'ai fais la macros suivante.
For x = 2 To Sheets("Feuil1").Range("A65536").End(xlUp).Row
If Sheets("Feuil1").Range("A" & x) = "*" Then
ligne = ligne + 1
Sheets("Feuil1").Select
Range(Cells(x, 1), Cells(x, Colonne)).Select
Selection.Copy
Sheets("Feuil2").Select
Range("A" & ligne).Select
ActiveSheet.Paste
End If
Le problème est que je n'arrive pas à trier les cellules qui commence par "**"
Merci
Bonne soirée
Salutations
Ce matin suite à l'aide de Pascal.J'ai fais la macros suivante.
For x = 2 To Sheets("Feuil1").Range("A65536").End(xlUp).Row
If Sheets("Feuil1").Range("A" & x) = "*" Then
ligne = ligne + 1
Sheets("Feuil1").Select
Range(Cells(x, 1), Cells(x, Colonne)).Select
Selection.Copy
Sheets("Feuil2").Select
Range("A" & ligne).Select
ActiveSheet.Paste
End If
Le problème est que je n'arrive pas à trier les cellules qui commence par "**"
Merci
Bonne soirée
Salutations