EXCEL/VBA copier/coller

Résolu/Fermé

lili2173 Messages postés 5 Date d'inscription jeudi 13 mars 2008 Statut Membre Dernière intervention 14 mars 2008 - 13 mars 2008 à 16:13
lili2173 Messages postés 5 Date d'inscription jeudi 13 mars 2008 Statut Membre Dernière intervention 14 mars 2008 - 14 mars 2008 à 10:03

Bonjour,

Je désire réalsier une macro pour copier les données d'une feuille (Feuil3) sur une autre feuille (BASE) à partir de la première ligne vide, j'ai essayé avec cette macro mais je bloque étant débutante, la cellule sélectionnée n'est pas celle de la première ligne vide mais celle de la dernière ligne remplie. De plus je n'arrive pas à coller ce que j'ai sélectionné.

Voici ce que j'ai fait:

Sheets("Feuil3").Select
Cells.Select
Application.CutCopyMode = False
Selection.Copy
Sheets("BASE").Select
Range("A1").Select
Selection.End(xlDown).Select
derniereligne = ActiveCell.Row + 1
derniereligne.Select
ActiveSheet.Paste

Merci d'avance pour votre aide.

A voir également:

EXCEL/VBA copier/coller
Liste déroulante excel - Guide
Copier coller pdf - Guide
Formule excel - Guide
Copier une vidéo youtube - Guide
Si et excel - Guide

2 réponses

Réponse 1 / 2

gbinforme Messages postés 14946 Date d'inscription lundi 18 octobre 2004 Statut Contributeur Dernière intervention 24 juin 2020 4 684
13 mars 2008 à 21:08

bonjour

Tu peux essayer comme ceci :

Public Sub copie()
With Sheets("BASE")
    Sheets("Feuil3").UsedRange.Copy _
    Destination:=.Cells(.Cells(65536, 1).End(xlUp).Row + 1, 1)
    Application.CutCopyMode = False
End With
End Sub

Réponse 2 / 2

lili2173 Messages postés 5 Date d'inscription jeudi 13 mars 2008 Statut Membre Dernière intervention 14 mars 2008
14 mars 2008 à 10:03

Bonjour,

merci pour l'aide ça fonctionne.

Discussions similaires

Dessiner avec son clavier et avec des lettres

Comment faire le symbole coeur vide/coeur blanc

Discussions similaires

Newsletters