Copier A2:A7 et coller à la suite colonne A

Fermé

jean300 Messages postés 374 Date d'inscription jeudi 11 août 2016 Statut Membre Dernière intervention 13 janvier 2020 - 13 mars 2018 à 09:33
jean300 Messages postés 374 Date d'inscription jeudi 11 août 2016 Statut Membre Dernière intervention 13 janvier 2020 - 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

A voir également:

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

3 réponses

Réponse 1 / 3

thev Messages postés 1851 Date d'inscription lundi 7 avril 2008 Statut Membre Dernière intervention 15 avril 2024 681
13 mars 2018 à 10:14

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 jeudi 27 mars 2014 Statut Membre Dernière intervention 13 janvier 2024 33
13 mars 2018 à 10:22

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 jeudi 11 août 2016 Statut Membre Dernière intervention 13 janvier 2020 14
13 mars 2018 à 12:02

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

Discussions similaires

Dessiner avec son clavier et avec des lettres

Imprimer 4 feuilles A4 pour donner un effet A2

recopier une formule sans décalage

Comment faire le signe de croix (chrétiens) ?

dessin au clavier cannabis

Discussions similaires

Newsletters