Copier un tableau juste sous un autre tableau vba

Résolu
noe2008 Messages postés 191 Statut Membre -  
noe2008 Messages postés 191 Statut Membre -
Bonjour les amis,
je cherche une macro pour :
copier le tableau (1) B5:Zn avec n derniere ligne non vide du tableau (1) de la feuille "BD2"
vers :
la feuille "BD" dans le tableau (2) Bm :Zp avec m premier ligne vide du tableau (2) et p sera la derniere ligne
une petite remarque la plus part des cellules du tableau (1) sont des formules donc le collage doit être en valeur vers le tableau 2
Merci d'avance

Configuration: Windows / Chrome 86.0.4240.111

2 réponses

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    Une facon de faire:

    Sub Copie()
        With Worksheets("BD2")
            Derlig = .Range("B" & Rows.Count).End(xlUp).Row
            Set plage = .Range("B5:Z" & Derlig)
            L = Derlig - 5
        End With
        With Worksheets("BD")
            PCV = Range("B" & Rows.Count).End(xlUp).Row + 1
            .Range("B" & PCV & ":Z" & PCV + L) = plage.Value
        End With
        Set plage = Nothing
    End Sub
    1
  2. noe2008 Messages postés 191 Statut Membre 4
     
    J'ai essayé votre macro f894009 mais rien n'est copié je crois que j'ai raté un détail je vous envois le lien de mon classeur et merci infiniment de votre aide
    https://www.cjoint.com/c/JJzh7fiWTCB
    0
    1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Bonjour,

      Une pour moi: ai oublie des points devant range de PCV=range pour BD.Si wous etiez sur BD pas de probleme mais sur BD alors premier cellule vide colonne B de BD
      Une pour vous car il y avait un espace colonne B de BD2 de ligne 12 a 49
      Un espace au moins cellule 149 colonne B de BD voir d'autres avant

      https://mon-partage.fr/f/vAEfBfzP/

      BA pas BB derniere colonne...
      0
      1. noe2008 Messages postés 191 Statut Membre 4 > f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention  
         
        Merci ça fonctionne maintenant
        0