Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Enregistrement automatique des donnees

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
S

stephanie.b.31

XLDnaute Nouveau
Bonjour,

vous pouvez voir dans mon fichier excel joint que sur la page "debut", il y a deux tableaux. Un tableau de donnees initiales et un tableau recapitulatif dont les resultats sont lies au tableau de donnees initiales.

Ensuite il y a une page "archives" ou on peut voir le meme tableu que le tableau recapitulatif. Le but est que mes donnees du tableau recapitulatif de la page "debut" s'enregistrent dans le tableau vide de la page "archives".
J'aimerais que cela se fasse ligne par ligne: que des que j'enregistre les nouvelles donnees qui s'enregistrent se mettent sur la ligne du dessous.

J'ai vu que l'on pouvait faire un bouton archiver, mais je n'y arrive pas!

Merci d'avance de votre aide!
 

Pièces jointes

Trier par date Trier par votes
Re : Enregistrement automatique des donnees

Bonjour à tous,

Un essai avec (clique sur le bouton GO) :

VB: 
Option Explicit


Sub Archivage()
    Dim DerL&
    DerL = Sheets("archives").Range("A65000").End(xlUp).Row
    Sheets("debut").Range("C18:F18").Copy Sheets("archives").Range("A" & DerL + 1)
    Columns("A:D").EntireColumn.AutoFit
    Application.CutCopyMode = False
    Sheets("debut").Activate
End Sub

A + à tous
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Enregistrement automatique des donnees

Bonjour à tous,

Exact...

Remplace par ce code (je ne copie que les valeurs sans les formules) :

VB: 
Option Explicit


Sub Archivage()
    Dim DerL&
    DerL = Sheets("archives").Range("A65000").End(xlUp).Row
    Sheets("debut").Range("C18:F18").Copy
       Sheets("archives").Select
    Range("A" & DerL + 1).Select
    Selection.PasteSpecial Paste:=xlPasteValues
    Range("A5").Select
    Columns("A:D").EntireColumn.AutoFit
    Application.CutCopyMode = False
    Sheets("debut").Activate
End Sub

A + à tous
 

Pièces jointes

Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

B
  • Résolu(e)
Microsoft 365 modifier des lignes
Réponses
5
Affichages
127
Hecatonchire
H
A
  • Résolu(e)
XL 2019 Macro Excel recherche par occurrence Macro déjà créer juste modifications
2
Réponses
25
Affichages
608
Aeroberto0099bis
A
M
  • Question Question
XL 2016 Créer formule calcul auto
Réponses
5
Affichages
388
micheldu52
  • Question Question
XL 2016 Transfer de donnees avec clé d'entrée a la date
Réponses
3
Affichages
311
job75
P
  • Question Question
XL 2021 creer une export tableau dynamique via VBA et avec des criteres pre defini
Réponses
1
Affichages
383
pasquetp
P
J
  • Question Question
Microsoft 365 Naviguer dans un tableau pour copier des données dans un modèle et copier l'un derrière l'autre
Réponses
11
Affichages
408
AtTheOne
M
  • Résolu(e)
XL 2016 Formule de ligne précédente non mise à jour après une insertion automatique de lignes dans l'objet tableau.
Réponses
4
Affichages
225
TooFatBoy
H
  • Résolu(e)
Microsoft 365 Archivage automatique sous condition (Macro)
Réponses
2
Affichages
621
HugoLaChips
H
D
  • Résolu(e)
Microsoft 365 Macro pour rafraîchir les liaisons
Réponses
11
Affichages
566
AtTheOne
O
  • Question Question
XL 2016 Identification et mise en forme des jours fériés dans un calendrier
Réponses
7
Affichages
477
TooFatBoy
T
  • Résolu(e)
XL 2019 Problème tableau structuré et code vba
2
Réponses
28
Affichages
1 K
Cousinhub
D
  • Question Question
XL 2021 3 problèmes : Bouton VBA (fusion et suppression) & doublons
Réponses
4
Affichages
665
Dubuyz1
D
N
  • Résolu(e)
XL pour MAC Erreur à l'enregistrement de plusieurs fichiers Excel
Réponses
5
Affichages
378
Noymie
N
D
  • Question Question
Microsoft 365 Mise à jour des références / liens depuis un sharepoint
Réponses
3
Affichages
372
Dégé59
D
C
  • Question Question
Microsoft 365 chercher des chiffres dans un tableau avec plusieurs criteres
Réponses
2
Affichages
613
sylvanu
P
  • Question Question
Microsoft 365 Problème de destination à l'exécution d'une macro
Réponses
2
Affichages
678
Pimpon974
P
B
  • Question Question
Microsoft 365 Archivage et enregistrement d'un fichier multi-feuilles
Réponses
1
Affichages
488
Blf57
B
C
  • Résolu(e)
XL 2019 Problème d'ajout automatique de lignes à un tableau : la première s'ajoute au tableau mais pas les suivantes !
Réponses
9
Affichages
683
Clemee61
C
S
  • Résolu(e)
Microsoft 365 Mon code ne reconnait pas la dernière ligne de mon tableau
Réponses
4
Affichages
632
Soumie
S
C
  • Question Question
XL 2016 Lier la 1re colonne du tableau 1 avec la 1re colonne du tableau 2
Réponses
7
Affichages
791
Cousinhub
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…