Vba sheet + date
mariek888
Messages postés
8
Statut
Membre
-
Yoskopolite Messages postés 92 Statut Membre -
Yoskopolite Messages postés 92 Statut Membre -
Bonjour,
J'ai un souci concernant la selction du sheet
Dans mon code je souhaiterai faire une création de sheet automatique selon la date et faire un message d'erreur lorsque celui ci est déjà crée .
Mais mon code ne marche pas :
Sheets.Add
ActiveSheet.Name = Format(Date, "mm yyyy")
Sheets("DPE").Select
If ActiveSheet.Name = Format(Date, "mm yyyy") Then
MsgBox "Historique déjà effectué ", vbExclamation
End If
Merci pour l'aide que vous pourrez m'apporter
J'ai un souci concernant la selction du sheet
Dans mon code je souhaiterai faire une création de sheet automatique selon la date et faire un message d'erreur lorsque celui ci est déjà crée .
Mais mon code ne marche pas :
Sheets.Add
ActiveSheet.Name = Format(Date, "mm yyyy")
Sheets("DPE").Select
If ActiveSheet.Name = Format(Date, "mm yyyy") Then
MsgBox "Historique déjà effectué ", vbExclamation
End If
Merci pour l'aide que vous pourrez m'apporter