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

Macro pour choisir la date dans une Pivotable

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
F

fabibi001

XLDnaute Occasionnel
Bonsoir le forum,
Bonsoir les exceliens,

J'ai créé un fichier dans lequel se trouvent 2 onglets.

L'un contient les données et l'autres la Pivotable.

Je souhaiterais ajouter une macro qui choisissent le dernier enregistrement de ma pivotable, en clair la dernière date.

J'ai commencé à enregistrer ma macro mais je ne sais pas quoi mettre dans le champs "date" de la macro pour qu'il prenne la dernière valeur du champs DENREG.

Actuellement ma macro resssemble à ça :

Sub Macro1()
'
' Macro1 Macro
' Macro recorded 24/01/2010
'

'
Sheets("Day").Select
Range("B12").Select
ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
ActiveSheet.PivotTables("PivotTable1").PivotFields("DENREG").CurrentPage = _
Range("A42")

End Sub

Je vous joins le fichier en question.

Merci d'avance pour votre aide
 

Pièces jointes

Trier par date Trier par votes
Re : Macro pour choisir la date dans une Pivotable

Bonjour à tous,

Peux-tu essayer avec :

Code: 
Sub Macro1()
'
' Macro1 Macro
' Macro recorded 24/01/2010
'

'
    Sheets("Day").Select
    Range("B12").Select
    ActiveSheet.PivotTables("PivotTable1").PivotCache.Refresh
    ActiveSheet.PivotTables("PivotTable1").PivotFields("DENREG").CurrentPage = Format(Range("A42").Value, "dd/mm/yyyy")
        
End Sub

A+ à tous
 
Vote positif 0 Vote négatif
Re : Macro pour choisir la date dans une Pivotable

Bonjour à tous,

fabibi001 à dit:
Je souhaiterais ajouter une macro qui choisissent le dernier enregistrement de ma pivotable, en clair la dernière date.
Cliquez pour agrandir...

Si tu souhaites la dernière date, je te conseille en A42 :
Code: 
=RECHERCHE(9^9;Liste!D:D)

Tu auras la dernière cellule numérique de la colonne D.
A la différence de MAX qui te donnera la date la plus "grande"

A+ à tous
 
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

P
  • Question Question
XL 2010 Recopie de la date du jour jusqu'à la dernière ligne non vide
Réponses
5
Affichages
169
philmaure
P
U
  • Question Question
Autres incorporer une macro dans une autre macro
Réponses
5
Affichages
786
Phil69970
F
  • Question Question
XL 2010 Appeler une macro dans une autre
Réponses
5
Affichages
719
Dranreb
  • Question Question
XL 2016 Aide pour maj auto de la date + selection multiple dans une liste déroulante
Réponses
5
Affichages
842
fanch55
V
  • Résolu(e)
XL 2016 Facturier : Retour à la ligne sur la facture
2
Réponses
19
Affichages
2 K
Vermithor
V
B
  • Résolu(e)
XL 2016 Ajouter la formule de date "=AUJOURDHUI()" dans une macro copie et sauvegarde d'écran
Réponses
5
Affichages
616
berru76
B
D
  • Question Question
XL 2010 Création et mise à jour d'un TCD tableau croisé dynamique avec macro VBA
Réponses
1
Affichages
3 K
chris
P
  • Question Question
Microsoft 365 VBA: Filtrer un TCD avec une date dans une cellule
Réponses
0
Affichages
1 K
PCharlier
P
C
  • Résolu(e)
XL 2016 Remplir automatiquement un tableau d'après des conditions et des valeurs
Réponses
11
Affichages
2 K
ERIC S
P
  • Question Question
XL 2016 rechercher si une date est comprise entre 2 dates de 2 onglets positionnées dans la même cellule
Réponses
2
Affichages
904
pene
P
K
  • Question Question
XL 2019 Impossible de lire la propriété pivotitems de la classe pivotfield
Réponses
0
Affichages
1 K
kira97493
K
G
  • Résolu(e)
XL 2013 VBA - macro pour ouvrir un fichier en fonction de la valeur d'une cellule
Réponses
4
Affichages
965
Gaalhad33
G
K
  • Question Question
XL 2016 From Excel to Outlook - Déclenchement sur la date et arrêt de la macro
Réponses
3
Affichages
1 K
AtTheOne
N
  • Question Question
XL 2010 ajout automatique d'un jours (semaine) à une date
Réponses
5
Affichages
1 K
sylvanu
S
  • Question Question
XL 2010 Intégrer une conversion date xx en 20 xx dans macro vba excel
Réponses
9
Affichages
1 K
Deadpool_CC
A
  • Question Question
XL 2013 Macro pour copier des colonne d'une feuille A dans un classeur sur une feuille B dans un autre classeur .
Réponses
7
Affichages
1 K
Hasco
A
  • Question Question
Microsoft 365 Copier le contenu d'une feuille dans une autre par une macro
Réponses
2
Affichages
1 K
AlexAGEMS
A
  • Résolu(e)
XL 2016 Changer de feuille dans une macro
2
Réponses
28
Affichages
4 K
Staple1600
S
  • Résolu(e)
Microsoft 365 Bug de macro pour effacer une ligne
Réponses
4
Affichages
1 K
ShrekL
S
J
  • Question Question
Copie valeurs
Réponses
4
Affichages
1 K
JLR67
J
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…