Transférer une plage de données dans un autre onglet à la suite des données

13formulaire-copie.zip (131.34 Ko)

Bonjour j'ai un problème avec ma macro vba,

j'ai une plage de données dans l'onglet "essaie" qui est renseigné par mon formulaire de saisie, ensuite une fois toutes mes données rentré grâce a mon formulaire j'appuis sur le bouton "valider "et toute ma plage de donnée de l'onglet "essaie" est transféré dans l'onglet "tableau" à la suite des autres données sélectionnées, jusqu'à maintenant je n'arrive qu'à sélectionner les données d'une seul ligne et généralement il y a plus de lignes à saisir.

Merci de bien vouloir m'aider si vous savez comment faire

Bonjour Razmi17, le forum,

A tester:

Sub copier_coller_cellule()

 Dim fichier As Workbook
 Dim onglet As Worksheet
 Dim derniere_ligne As Long, i As Long, derlig As Long,k%

   Set fichier = ActiveWorkbook
   Set onglet1 = fichier.Worksheets(1)
   Set onglet2 = fichier.Worksheets(2)

Application.ScreenUpdating = False

derniere_ligne = onglet2.Cells(Rows.Count, 1).End(xlUp).Row + 1
        derlig = onglet1.Cells(Rows.Count, 1).End(xlUp).Row

    i = 6
    Do While i <= derlig
     With onglet2
      For k = 1 To 26
       .Cells(derniere_ligne, k) = onglet1.Cells(i, k)
      Next k
       derniere_ligne = derniere_ligne + 1
     End With
    i = i + 1
    Loop

End Sub

Cordialement,

Un grand merci,

je suis super content ca marche parfaitement merci encore ;)

Rechercher des sujets similaires à "transferer plage donnees onglet suite"