Copier a la suite de

Bonjour à tous,

J'ai cherché dans plusieurs forums et testé de nombreux code mais rien ne marche. Je pense que je les utilise mal

Alors voici mon "problème", je souhaiterais copier-coller les cellules "A1:F84" de ma feuille "Saisie" vers la feuille "BDD" à la suite du tableau situé dans "BDD" la première fois le copier-coller fonctionne bien cependant lorsque je souhaite coller une deuxieme fois il m'écrase mes données. Je sais d'où viens le problème "il copie sur la cellule active" cependant je ne sais pas comment le résoudre

Voici mon code :

Sub copie() ' ' copie Macro ' ' Range("Tableau1[[#All],[Equipe]:[Heure de rentrée ]]").Select Selection.Copy Sheets("BDD").Select Range("A85").Select ActiveSheet.Paste End Sub

Merci d'avance pour votre aide

Bonjour

Essaie ça :

Sub copie()

    Range("Tableau1[[#All],[Equipe]:[Heure de rentrée ]]").Copy _
        Sheets("BDD").Range("A" & Sheets("BDD").Range("A" & Rows.Count).End(xlUp)(2).Row)
End Sub

Bye !

Bonjour,

Bonjour gmb,

Ne peux-tu pas joindre un petit fichier ?

Cdlt.

bonjour

la solution simple et fiable : ne rien faire !

il suffit de saisir directement dans le tableau BDD

certes ça ne ressemble pas à un progiciel, mais Excel n'est pas du tout conçu pour faire comme les progiciels. Quand on essaye, on complique et on perd énormément en fiabilité.

Rechercher des sujets similaires à "copier suite"