Récupération de données de plusieurs feuille Excel

MaSt972 -  
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,
Je travaille actuellement sur une macro, qui pourrait me permettre de récupérer toutes les données d'une colonne (B) de plusieurs feuilles (feuille 1, feuille 2...).J'ai commencé avec une macro, mais elle me récupère uniquement les 1ers données (Cellule B3) de chaque feuille et pas le reste (Cellule B4, Cellule B5...). Comment faire pour que ma macro récupère ses autres données?
Voici la macro sur laquelle je travaille:
Sub TTS()
Dim nbVal As Long
Dim f As Long
Sheets("FRecap").Range("TREcap").ClearContents
nbVal = Sheets.Count - 1
For f = 1 To nbVal
Sheets("FRecap").Range("TREcap").Cells(f, 1).Value = Sheets(f).Range("B3:B30").Value
Next f
End Sub

Merci d'avance.
Configuration: Windows / Chrome 84.0.4147.105
A voir également:

2 réponses

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Les donnees colonnes sont a mettre en ligne ou meme colonne?
0
MaSt972
 
Bjr, en colonne.

Cdlt
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713 > MaSt972
 
Bonjour,
Ok, je regarde la chose

Pas vraiment utile la plage nommee, vu l'utilisation que vous en faites


suite:
Une facon de faire, a adapter:
Sub TTS()
    Dim nbVal As Long
    Dim f As Long
    
    nbVal = Sheets.Count - 1
    With Sheets("FRecap")
        .Range("A:A").ClearContents
        For f = 1 To nbVal
            If Sheets(f).Name <> "FRecap" Then          'nom feuille <> FRecap
                PCvid = Range("A" & Rows.Count).End(xlUp).Row + 1       'Premiere cellule vide colonne A
                .Range("A" & PCvid).Resize(28) = Sheets(f).Range("B3:B30").Value        'trsf donnees B
            End If
        Next f
    End With
End Sub
0
MaSt972
 
Merci pour ce retour, j'ai lancé la macro, mais j'ai un message d'erreur "objet requis".
0
MaSt972
 
("TRecap") est un tableau où sont collées les données et ("FRecap") est la feuille ou est crée le tableau.
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713 > MaSt972
 
Re,

A quelle ligne l'erreur, je ne me sers pas de votre "tableau" mais de la colonne?

("TRecap") est un tableau
Oui, mais si c'est reelement un tableau ( en deux couleurs bleue), l'ajout de donnees doit etre fait differemment
Pouvez mettre votre fichier a dispo

Pour transmettre un fichier,
Veillez a ce qu'il n'y ait PAS DE DONNEES CONFIDENTIELLES
il faut passer par un site de pièce jointe tel que cjoint.com

Allez sur ce site : https://www.cjoint.com/
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...

ou
'mon partage
https://mon-partage.fr/
0