Copier les onglet vers une feuille générale

altinea · 31 Juillet 2013

Bonjour le forum
pourriez vous m'aider, afin de pouvoir copier les lignes des onglets afin de les regrouper sur la feuille générale, que les lignes puissent se coller les unes derrières les autres sans lignes vides, soit une macro permettant de faire cela et de prendre en compte les modifications chaque fois qu'un onglet a été modifié merci pour votre aide;

Yaloo · 31 Juillet 2013

Re : Copier les onglet vers une feuille générale

Bonjour Altinea,

Avec une macro comme ci-dessous à placer dans le module de la feuille FTP.

VB:

Option Explicit
Private Sub Worksheet_Activate()
Dim Ws As Worksheet
[A6:AQ242].ClearContents
  For Each Ws In Worksheets
    If Ws.Name <> "FTP" Then
      Sheets(Ws.Name).Range("A4:AQ" & Sheets(Ws.Name).[A4].End(xlDown).Row).Copy Range("A" & [A242].End(xlUp)(2).Row)
    End If
  Next
End Sub

A te relire

Martial

PS : avec le fichier actuel il y a quelques soucis car dans la feuille 7, il n'y a pas de Civilité

altinea · 31 Juillet 2013

Re : Copier les onglet vers une feuille générale

Bonsoir le fil,le forum et Yaloo,
je viens de mettre en place ça fonctionne merci beaucoup pour ton aide, je vais mettre en place sur le fiche définitif demain.
Merci encore

Copier les onglet vers une feuille générale

altinea

XLDnaute Accro

Pièces jointes

Yaloo

XLDnaute Barbatruc

altinea

XLDnaute Accro

Discussions similaires

Copier les onglet vers une feuille générale

altinea

XLDnaute Accro

Pièces jointes

Yaloo

XLDnaute Barbatruc

altinea

XLDnaute Accro

Discussions similaires

Privacy & Transparency

Privacy & Transparency