VBA EXCEL MACRO NE FONCTIONNE PAS pour copier une plage de données

Résolu
DOLCE59 Messages postés 12 Statut Membre -  
Le Pingou Messages postés 12275 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Pouvez-vous me dire pourquoi ma macro ne fonctionne pas ?

Je souhaite copier une plage d'un dossier dans un autre tableau d'une autre feuille dans la premiere ligne vide.

Un grand merci d'avance

Sub DerniereLI()
'
' DERNIERELI Macro
'
    Application.ScreenUpdating = False
    
    Sheets("Synthese").Select
    Range("AS3:AY18").Select
    Selection.Copy
    Sheets("REUNION").Select
    Feuil24.Range("F3").End(xlDown).Offset(1, 0).Select
    ActiveSheet.Paste
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
       
    Application.ScreenUpdating = True
'
End Sub

7 réponses

  1. Utilisateur anonyme
     
    Bonjour

    Faites :

    Range("F3").Select

    à la place de

    Feuil24.Range("F3").End(xlDown).Offset(1, 0).Select

    et supprimer

    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
    :=False, Transpose:=False


    A+
    0
  2. Le Pingou Messages postés 12275 Date d'inscription   Statut Contributeur Dernière intervention   1 478
     
    Bonjour,
    Ma proposition pour copier dès première ligne vide:
    supprimer : "Feuil24" de la ligne :
    Feuil24.Range("F3").End(xlDown).Offset(1, 0).Select 

    correcte:
     Range("F3").End(xlDown).Offset(1, 0).Select
    0
  3. DOLCE59 Messages postés 12 Statut Membre
     
    Merci d'abord pour ta réponse.

    Cela fonctionne mais ce n'est pas cela que je veux.

    Je souhaite copier les cellules dans la première ligne vide de la page et non toujours en F3.

    Merci comme même.
    0
  4. DOLCE59 Messages postés 12 Statut Membre
     
    Bonjour le PINGOU,

    Ta formule fonctionne bien quand j'ai déjà des lignes dans mon tableau mais quand le tableau est vide. La macro ne veut rien savoir, elle plante sur la ligne range("F3"). Je ne comprend pas car ma ligne où se trouve les entêtes est en F3.
    Quel est mon problème ?
    Merci d'avant et bonne journée.
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Le Pingou Messages postés 12275 Date d'inscription   Statut Contributeur Dernière intervention   1 478
     
    Bonjour,
    Qu'elle est le message d'erreur ?
    A défaut mettre le fichier sur https://mon-partage.fr/
    et poster le lien.
    0
  7. Le Pingou Messages postés 12275 Date d'inscription   Statut Contributeur Dernière intervention   1 478
     
    Bonjour,
    J'ai modifier votre code: la plage de cellules est copiée dès la première ligne vide colonne F de votre feuille la Réunion:
    Le lien: https://mon-partage.fr/f/trrbxtTD/
    0
    1. DOLCE59 Messages postés 12 Statut Membre
       
      Un grand merci à vous. cela fonctionne très très bien.

      Merci d'avoir pris du temps pour m'aider.

      Une très bonne soirée, un bon week end et encore merci beaucoup pour votre aide.
      0
  8. Le Pingou Messages postés 12275 Date d'inscription   Statut Contributeur Dernière intervention   1 478
     
    Merci, de rien.
    Marquer comme résolu...!
    0