Avis macro ou formule

Bonjour je suis a la recherche d'aide sur un petit sujet

j'ai effectuer une macro pour copier des cellule d'une feuille 1 à la feuille 2 le souci est que sur la feuille 1 les cellule sélectionne resterons les même mais je voudrai qu'a la feuille 2 il s'ajoute en dessous des résultat précèdent il y a peut être un moyen avec une fonction recherche?

merci d'avance à la communauté

7essai-pcs.xlsm (17.43 Ko)

Salut Nico,

Bienvenue sur le Forum & dans le monde merveilleux de la VBA ;D!

Ci-dessous un code qui te permet de faire ce que tu demande :

Sub CopyAndPaste()
Rows("1:2").Copy
Sheets("Feuil2").Rows(Range("B" & Rows.Count).End(xlUp).Row + 1).Insert Shift:=xlDown
Application.CutCopyMode = False
End Sub

Si tu veux des explications, je reste dispo pour répondre à tes questions!

merci de l'info bonne journée

Bonjour,

Une autre proposition.

Cdlt.

6essai-pcs.xlsm (22.01 Ko)
Public Sub Copy_data()
Dim n As Long, r As Range
    With Worksheets("Feuil2")
        n = .Cells(Rows.Count, 2).End(xlUp).Row
        Set r = IIf(n = 1, .Cells(1), .Cells(n + 1, 1))
    End With
    Cells(1).CurrentRegion.Copy Destination:=r
End Sub

merci de vos réponse une petit info supplémentaire je voudrai trier ma colonne pièces comment faire apparaître les 2 ligne de résultat même quand je fusionne la case il me met que la première ligne

je voulait même en b1 mettre =aujourd'hui() mais si je fait sa sur la feuille 2 sa se met à jour aussi alors que je voudrai sa affiche je jour est la date a laquelle cela a été valide

y a pas une histoire de bloque une cellule comme en formule $$?

pas d'avis?

Rechercher des sujets similaires à "avis macro formule"