Copier A2:A7 et coller à la suite colonne A

jean300 Messages postés 374 Date d'inscription Statut Membre Dernière intervention -
jean300 Messages postés 374 Date d'inscription Statut Membre Dernière intervention - 13 mars 2018 à 12:02

Bonjour,
Je cherche code pour copier la plage A2:A7 et la coller première cellule vide de la colonne A (même colonne) avec le format et les formules
Je vous remercie d'éclairer ma lanterne

Afficher la suite

A voir également:

Copier A2:A7 et coller à la suite colonne A
Comment copier une vidéo youtube - Guide
Super copier - Télécharger - Gestion de fichiers
Historique copier coller - Guide
Copier disque dur - Guide
Copier coller pdf - Guide

3 réponses

Réponse 1 / 3

thev Messages postés 1987 Date d'inscription Statut Membre Dernière intervention 715

Bonjour,

Exemple de code :

     
Dim cell As Range
    With ActiveSheet
        Set cell = .Columns("A").Find("", after:=.Range("A7"))
        .Range("A2:A7").Copy cell
    End With

Réponse 2 / 3

julia Namor Messages postés 524 Date d'inscription Statut Membre Dernière intervention 33

Bonjour
un petit code vite fait

Sub coller()
With Sheets("feuil1")
DL = .Range("A" & Rows.Count).End(xlUp).Row
.Range("A2:A7").Copy
.Range("A" & DL + 1).Select
ActiveSheet.Paste
End With
End Sub

cordialement

Réponse 3 / 3

jean300 Messages postés 374 Date d'inscription Statut Membre Dernière intervention 14

Bonjour thev, Julia
Je vous remercie beaucoup
Bonne journée à vous

Discussions similaires

dessin avec symbole clavier

Imprimer 4 feuilles A4 pour donner un effet A2

Arobase (@)

comment faire une arobase

Arobase

Votre réponse

Discussions similaires