Bonjour,
J'ai une macro VBA qui réalise une tache bien précise chaque jour à une heure donnée. Cette macro est dans un fichier sur lequel j'ai la main mais sur lequel mais collègues sont en lecture seule. Chaque jour je crée une nouvelle version ce fichier v1, v2, v3... lorsque la macro se lance, chez moi tout fonctionne parfaitement mais chez mes collègues, elle ouvre aussi tous les fichiers précédents v1, v2...
Quelqu'un saurait-il comment corriger ca ?
ci dessous ma macro
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3 Private Sub Workbook_WindowActivate(ByVal Wn As Window) Application.OnTime TimeValue("17:35:00"), "report" End Sub
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Sub report() Dim cell As Range ToDay = Date 'Défini la date du jour For Each cell In Sheet21.Range("a:a") 'ballaie la plge mentionnée If cell.Value = ToDay Then cell.EntireRow.Copy cell.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False End If Next End Sub
Partager