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

Actualisation d'une donnée à la création d'une nouvelle feuille

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

sfconstant

XLDnaute Occasionnel
Bonjour à tous et Meilleurs Voeux
Je recherche une formule capable d'actualisere une donnée dans une feuille récapitulative aprés la création d'une nouvelle feuille.

Ci-joint un fichier avec trois feuilles et une donnée en c1 qui change suivant les feuilles. J'aimerais donc que s'affiche sur la feuille récapitulative, la donnée c1 de la dernière feuille créee (feuille 4 puis 5, 6...).
Merci d'avance.
sfconstant
 

Pièces jointes

Trier par date Trier par votes
Re : Actualisation d'une donnée à la création d'une nouvelle feuille

salut

essaye cette ligne de code à placer dans le module de la feuille récapitulatif

Code: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheets("Récapitulatif").Range("B1").Value = Sheets(Sheets.Count).Range("C1").Value
End Sub


Ou alors dans l'activation de la feuille

Code: 
Private Sub Worksheet_Activate()
Sheets("Récapitulatif").Range("B1").Value = Sheets(Sheets.Count).Range("C1").Value
End Sub

bonne journée
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : Actualisation d'une donnée à la création d'une nouvelle feuille

Merci beaucoup le premier code incorporé à la feuille récapitulative fonctionne trés bien.
Je voudrais maintenant incorporer automatiquement à la donnée de chaque feuille : Montant du mois de ... : (le mois étant le mon de la feuille). Est-ce possible ?
Merci beaucoup.
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : Actualisation d'une donnée à la création d'une nouvelle feuille

Re sfconstant le Forum,

A condition que j'ai bien compris

Code: 
Private Sub Worksheet_Activate()
If Sheets(Sheets.Count).Name = "Avril" Or ActiveSheet.Name = "Août" Then
    Sheets("Récapitulatif").Range("B1").Value = "Montant du mois d'" & Sheets(Sheets.Count).Name & " " & Sheets(Sheets.Count).Range("C1").Value
        Else
    Sheets("Récapitulatif").Range("B1").Value = "Montant du mois de " & Sheets(Sheets.Count).Name & " " & Sheets(Sheets.Count).Range("C1").Value
End If
End Sub


bonne journée
 

Pièces jointes

Dernière édition:
Vote positif 0 Vote négatif
Re : Actualisation d'une donnée à la création d'une nouvelle feuille

Salut sfconstant, le Forum

Peut-être comme cela

Code: 
Private Sub Worksheet_Activate()
If Sheets(Sheets.Count).Name = "Avril" Or ActiveSheet.Name = "Août" Then
Sheets("Récapitulatif").Range("B1").Value = "Montant du mois d' " & Sheets(Sheets.Count).Name _
    & " " & [B]Format(Sheets(Sheets.Count).Range("C1"), "# ###.##") [/B]& " €"
    Else
    Sheets("Récapitulatif").Range("B1").Value = "Montant du mois de " & Sheets(Sheets.Count).Name _
    & " " & [B]Format(Sheets(Sheets.Count).Range("C1"), "# ###.##")[/B] & " €"
End If
End Sub
Bonne Journée
 
Vote positif 0 Vote négatif
Re : Actualisation d'une donnée à la création d'une nouvelle feuille

Merci beaucoup Dull, ça marche trés bien.
Profites bien de ta Région car ici dans le Nord, il ne fait pas beau.
A +
Bonne soirée
sfconstant
 
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

  • Résolu(e)
Microsoft 365 rendre visible automatiquement l'onglet de la feuille active sur la barre de navigation inférieure
Réponses
11
Affichages
737
Eric 888
C
  • Question Question
Microsoft 365 macro copie de feuilles (avec formules à adapter)
Réponses
9
Affichages
279
caseras
C
S
  • Résolu(e)
XL 2016 copier des données d'une feuille à une autre selon critères et protection de la feuille 1
Réponses
6
Affichages
682
steph_29120
S
S
  • Question Question
XL 2013 enregistrer une feuille excel converti en pdf dans un répertoire selon la valeur d'une cellule
Réponses
5
Affichages
424
Phil69970
R
  • Question Question
XL 2019 Aide à la création d'un fichier de saisie et suivi des engagements budgétaires sous Excel
Réponses
2
Affichages
227
Royaulté
R
N
  • Question Question
Microsoft 365 afficher/masquer des lignes en fonction de la valeur d'une cellule qui aura été renseignée par une autre feuille (via un copier/collé automatique)
Réponses
5
Affichages
760
Nel'
N
D
  • Résolu(e)
Microsoft 365 Graphique avec plage de données glissante en partant d'une date
Réponses
5
Affichages
670
Dégé59
D
  • Résolu(e)
XL 2013 (RESOLU) Automatisation de la création de feuilles en fonction des données de la cellule U13 et une feuille type
Réponses
7
Affichages
616
chaelie2015
  • Résolu(e)
Microsoft 365 Remplissage automatique d'une feuille à l'autre
2 3 4
Réponses
58
Affichages
3 K
MALKO
M
N
  • Résolu(e)
Microsoft 365 Recherche dans un tableau structuré à partir d'une TextBox
Réponses
11
Affichages
664
NONO14
N
S
  • Résolu(e)
Microsoft 365 - Conseils pour la structuration d'une base de données -
2 3
Réponses
44
Affichages
3 K
crocrocro
C
G
  • Question Question
XL 2021 rassembler des données de plusieurs feuilles d'un classeur sur une nouvelle feuille du meme classeur selon un critère
Réponses
1
Affichages
520
Staple1600
J
  • Question Question
Microsoft 365 affiché une valeur texte dans un cellule
Réponses
1
Affichages
770
Gen Rose
C
  • Résolu(e)
XL 2019 Copier et renommer (en même temps) des feuilles à partir d'une liste de noms dans un colonne
Réponses
13
Affichages
2 K
Clemee61
C
Z
  • Question Question
XL 2021 VBA Prélèvement d'une donnée si une valeur recherchée est identique
Réponses
3
Affichages
534
ZiM
Z
  • Résolu(e)
XL 2019 Aide pour un module d'archivage de feuille en pdf dans répertoire
Réponses
5
Affichages
897
Nico2978
XLS : Evènements souris 'click' sur la grille & astuces
Réponses
3
Affichages
290
Lu76Fer
O
  • Question Question
XL 2019 Code VBA pour automatiser la programmation des rotations des ouvriers qui travaillent à temps partiel et se relaient par période de temps constante.
2 3
Réponses
35
Affichages
2 K
olivier1984
O
D
  • Question Question
XL 2016 Changer la référence d'une feuille automatiquement dans les formules
Réponses
1
Affichages
652
AtTheOne
  • Question Question
Microsoft 365 Création d'un fichier entier par rapport à des entrées via UserForm
Réponses
1
Affichages
685
job75
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…