Recopie selon valeur de ligne choisie

bonjour,

en vba

sur le tableau exemple du fichier joint, je cherche, par vba, le moyen de copier (appui bouton recopie) les valeurs des cellules de la ligne 244, (de la colonne m à t) en rouge (mise en forme si <>0) sur la ligne numérotée en jaune (le numéro de ligne choisi étant en l244, tout en ne recopiant pas les valeurs = à "0" des cellules dont c'est la valeur, mais de coller une cellule vide

merci

Bonjour,

Je ne suis pas sûr d'avoir bien compris ton propos, et je suis un peu étonné de trouver sur ta ligne 244 un mélange de valeurs saisies et de formules...

En tout cas, s'il s'agit de reporter cette ligne de M à T à l'emplacement indiqué en L244, voilà pour le faire :

Sub TftDonnées()
    Dim Lng, i%, n%
    With ActiveSheet
        n = .Range("L244") + 245
        Lng = .Range("M244:T244")
        For i = 1 To UBound(Lng, 2)
            If Lng(1, i) = 0 Then Lng(1, i) = Empty
        Next i
        .Range("M" & n).Resize(, UBound(Lng, 2)).Value = Lng
    End With
End Sub

Cordialement.

exactement ça, merci