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

Report Automatique de valeur d'une feuille à une autre feuille

  • Initiateur de la discussion Initiateur de la discussion cececilia
  • Date de début Date de début

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 !

C

cececilia

Guest
Bonjour à tous,

J'ai besoin d'aide concernant un fichier exel. Voila mon problème :

J'ai deux page:
- page de sasie (A1 : nom (B1 on entre le nom:valeur changeante) ; A2 prénom (B2: on entre le prénom : valeur changeante); ...)
- page base de donnée (colone B tous les noms et colone C tous les prénoms)

Je souhaite reporter les valeurs de la feuille "saisie" automatiquement sur la feuille ("base de données") dans la colone B et la colone C.

L'objectif du fichier est de pourvoir rentrer les données dans sur la feuille de saisie et lorsque je tape entrée ou je clique sur un bouton: les données de la feuille de saisie s'effacent et vont se reproter dans les colone B et C les uns en dessous des autres dans la feuille intitulée "base de données".

Je voudrais savoir si c'est possible à l'aide d'une macro et si oui, pouvez-vous me transmettre le code.

Merci d'avance
 
Re : Report Automatique de valeur d'une feuille à une autre feuille

Bonjour cececilia,

une petite macro comme cela peu faire l'affaire:

Code:
Sub CC()
    Sheets("feuil1").Range("B1:B2").Copy ' à adapter avec le nom de ta feuille
    With Sheets("Feuil2") ' à adapter avec le nom de ta feuille 2
    N1 = .Range("B65536").End(xlUp).Row + 1  
    .Range("B" & N1).PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
    Application.CutCopyMode = False
    End With
    Sheets("Feuil1").Range("B1:B2").ClearContents

End Sub

A placer dans un module, crée un bouton et lui affaecter cette macro.

Bonne journée
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…