Discussion :

[Druddy66]

Bonjour,

J’exécute une série de macro et à la fin de celle-ci j'aimerais exécuter une macro qui renseigne une zone de texte avec la date et heure de l'exécution de la macro pour avoir un suivi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
'***************************************
'Executer toutes les macros
'***************************************
Sub ToutesMacros()
  SelecFeuil1
  RecupereDataFichier
  DeletecolonnesSLA
  RenommeM1Changes
  CalculDépassementChange
  SupDerEnregD1Col
  CreateTable
  DateHeureMAJ
  
End Sub

Si vous aviez une idée pour comment réaliser cette dernière action, je l'apprécierais volontiers.

Je vous remercie par avance,

[fraflt69]

Bonjour Druddy66,

Je te suggère d'écrire la date dans une nouvelle feuille ex : LOG.
Si feuille(LOG) inexistante alors créer la feuille LOG
Récupérer la dernière ligne de la feuille LOG
Ecrire la date d'exécution sur la ligne suivante

Cordialement

[Pierre Fauconnier]

Salut.

Mes classeurs ont toujours un tableau nommé t_Paramètres, constitué des colonnes Nom et Valeur pour contenir ce genre de données.

Dès lors, deux fonctions sont intéressantes, celle qui lit un paramètre donné et celle qui écrit la valeur d'un paramètre dans le tableau

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Function getParameter(Name As String)
  Dim r As Long
 
  r = Application.Match(Name, Range("t_Paramètres[Nom]"), 0)
  getParameter = Range("t_Paramètres[Valeur]")(r)
End Function
 
Function setParameter(Name As String, Value)
  Dim r As Long
 
  r = Application.Match(Name, Range("t_Paramètres[Nom]"), 0)
  Range("t_Paramètres[Valeur]")(r) = Value
End Function

Il faut bien entendu que le tableau et les paramètres manipulés existent avant l'appel d'une de ces fonctions, mais c'est au moment de la conception que ce tableau est créé et que les paramètres sont installés.

Si tu n'as que la date de maj à gérer, tu pourrais passer pas une cellule nommée créée lors de la conception du classeur, mais tant qu'à faire, autant prendre l'habitude du tableau. Il est rare qu'un classeur Excel ne contienne qu'un seul paramètre.