ELSONCe
XLDnaute Junior
Un grand BONJOUR à tout le forum,
Un détail... je cherche à faire apparaître un message le 15 de chaque mois pour rappeler aux utilisateurs de transférer leurs données.
J'ai trouvé un code que j'ai adapté, qui normalement se loge dans le worksheet désiré, mais qui ne fonctionne pas ou plutôt que j'exploite mal. J'ai donc essayé dans un module puis demandé de l'appeler à l'ouverture du fichier dans workbook open et pas mieux...
Sub Dates()
With Sheets("REFABRICATION SAV")
If Target.Address = "$B$4" Then
If Target.Value = NumberFormat = "09/mm/yy" Then MsgBox "Copier-Coller de SUIVI SAV vers SAUVEGADE", vbOKOnly, "Merci !"
End If
End With
End Sub
Espérant avoir été assez clair dans ma demande, je vous remercie par avance O grands excelliens pour solutionner ma problématique!!
Bonne journée !!
Cordialement
Un détail... je cherche à faire apparaître un message le 15 de chaque mois pour rappeler aux utilisateurs de transférer leurs données.
J'ai trouvé un code que j'ai adapté, qui normalement se loge dans le worksheet désiré, mais qui ne fonctionne pas ou plutôt que j'exploite mal. J'ai donc essayé dans un module puis demandé de l'appeler à l'ouverture du fichier dans workbook open et pas mieux...
Sub Dates()
With Sheets("REFABRICATION SAV")
If Target.Address = "$B$4" Then
If Target.Value = NumberFormat = "09/mm/yy" Then MsgBox "Copier-Coller de SUIVI SAV vers SAUVEGADE", vbOKOnly, "Merci !"
End If
End With
End Sub
Espérant avoir été assez clair dans ma demande, je vous remercie par avance O grands excelliens pour solutionner ma problématique!!
Bonne journée !!
Cordialement