copie cellulles fixe à la 1ere ligne vide

[achraf26]

Bonjour,
je voudrais faire une copie de la cellule C2 à H2 à la 1ere ligne vide Cx (à partir de ligne 4)
Merci beaucoup

 

[DoubleZero]

Re : copie cellulles fixe à la 1ere ligne vide

Bonjour, achraf26, le Forum,

Espérant avoir compris le réel besoin... Comme ceci ?

Option Explicit
Sub Valeurs_dupliquer_ici_ou_là()
    If [c4] = "" Then
        Range("c2:h2").Copy Destination:=Range("c4")
    Else
        Range("c2:h2").Copy Destination:=Range("c" & Rows.Count).End(xlUp)(2)
    End If
End Sub

A bientôt 🙂

 

[achraf26]

Re : copie cellulles fixe à la 1ere ligne vide

Bonsoir,
super Fonctionne bien, Merci 00

 

[achraf26]

Re : copie cellulles fixe à la 1ere ligne vide

rebonsoir
j'arrive pas à mette le code en 1er Range (E1) copy destination (d2) paste.value
je voudrais copier dabord la valeur de E1 à D2 et aprés je passe à coller C2:H2 en derniere ligne

Option Explicit
Sub Valeurs_dupliquer_ici_ou_là()
If [c4] = "" Then
Range("c2:h2").Copy Destination:=Range("c4")
Else
Range("c2:h2").Copy Destination:=Range("c" & Rows.Count).End(xlUp)(2)
End If
End Sub

 

[job75]

Re : copie cellulles fixe à la 1ere ligne vide

Bonsoir à tous,

j'arrive pas à mette le code en 1er Range (E1) copy destination (d2) paste.value

Si c'est ça c'est vraiment navrant :

[D2] = [E1]

A+

 

[achraf26]

Re : copie cellulles fixe à la 1ere ligne vide

un grand merci à toi vous Job et 00.
Sujet résolu