Supprimer coller

Bonjour à tous,

J'ai besoin d'une aide pour réaliser une macro qui consiste à supprimer des lignes dans un tableau et de les recopier dans une autre feuille du classeur.

Je voudrais supprimer (et non couper) pour que le tableau d'origine ne se retrouve pas avec des lignes vides.

Le critère de sélection est la colonne statut : je veux sortir les statuts F et ne garder que les autres statuts.

Merci beaucoup

Roudy

https://www.excel-pratique.com/~files/doc2/YYfCzexemple_supprimer_coller.xls

Bonjour,

Fichier à joindre pour régler la macro

Quelques lignes suffisent

Amicalement

Claude.

édit; ton lien ne marche pas

https://www.excel-pratique.com/~files/doc2/YYfCzexemple_supprimer_coller.xls

voici le lien. quand je copie-colle le lien dans mon navigateur, ca fonctionne...... c'est embêtant si cela ne marche pas pour toi.... comment incruster le fichier à l'intérieur du message?

[/url]

re,

Je l'ai récupéré autrement

Sub Déplace()
''Macros par Claude Dubois pour "roudy" E-P le 30 Oct 09
Dim Lg As Integer, i As Byte, Y As Byte, Cl As Byte
    Application.ScreenUpdating = False
    Lg = Range("A65536").End(xlUp).Row
        For i = 2 To Lg
            If Cells(i, 6) = Range("h1") Then
                Rows(i).EntireRow.Copy
                    With Sheets(2)
                        .Range("A65536").End(xlUp)(2). _
                        PasteSpecial Paste:=xlPasteValues
                    End With
                Application.CutCopyMode = False
                Cells(i, 1).ClearContents
            End If
        Next i
    On Error Resume Next
    Range("a2:a" & Lg).SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub

Fichier:

https://www.excel-pratique.com/~files/doc2/roudy.xls

Amicalement

Claude.

roooo lalalalala

trop fort!!

merci beaucoup, c'est exactement cela!!!