Changer de date automatiquement avec un TCD

kit24be -  
Heliotte Messages postés 1491 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Est-il possible que la date change automatiquement à la date du jour sans devoir aller chercher la date dans le filtre du tcd ?

merci d' avance


A voir également:

7 réponses

Heliotte Messages postés 1491 Date d'inscription   Statut Membre Dernière intervention   92
 
Bonjour kit24be,

La date se trouvant dans une cellule ?
Oui :: formule =Aujourdhui() si vous avez une version française
0
kit24be Messages postés 46 Date d'inscription   Statut Membre Dernière intervention   1
 
Merci, j ai une macro qui actualise les tcd et je voudrais un code qui change la date dans la macro.
=Aujourdhui() changera la date d' une cellule???.
merci
0
Heliotte Messages postés 1491 Date d'inscription   Statut Membre Dernière intervention   92
 
Merci, j ai une macro qui actualise les tcd et je voudrais un code qui change la date dans la macro

Difficile de vous dire où placer ce code .. sans code !
0
kit24be Messages postés 46 Date d'inscription   Statut Membre Dernière intervention   1
 
Désolé de répondre aussi tardivement , voici le code

Sub rapport()
'
' rapport Macro
'
Dim la_date As Date

Sheets("RAPPORT").Select
Range("D10").Select
ActiveSheet.PivotTables("PivotTable2").PivotCache.Refresh
Range("G8").Select
ActiveSheet.PivotTables("PivotTable8").PivotCache.Refresh
Range("J8").Select
ActiveSheet.PivotTables("PivotTable11").PivotCache.Refresh

End Sub


un grand merci
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Heliotte Messages postés 1491 Date d'inscription   Statut Membre Dernière intervention   92
 
Bonjour kit24be,

Dim la_date As Date .. ça c'est pour la déclaration = ok

Il faut garder la déclaration .. comme vous ne me dites pas où placer l'assignation, je vous montre comment l'assigner.
la_date = Now .. c'est la date complète avec les heures, etc.

Il faudra probablement la formater pour l'afficher correctement, par exemple:
la_date = Format(Now, "dd/mm/yyyy")
0
kit24be Messages postés 46 Date d'inscription   Statut Membre Dernière intervention   1
 
bonjour,

je suis un peu perdu comme je commence en vba, mes code sont un peu confus.
qu' entendez vous par assignation?
0
Heliotte Messages postés 1491 Date d'inscription   Statut Membre Dernière intervention   92
 
Bonjour kit24be,

Pour utiliser une variable, il faut commencer par la déclarer : dim NomVariable As Type (String, Integer, Boolean, etc).

Ensuite, il faut lui assigner une valeur :
- String = "Ce que contient ma variable"
- Integer = 1234
- Boolean = True ou False
- etc.
0