vba sheet + date Fermé

Question

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


Configuration: Windows XP / Internet Explorer 7.0

Yoskopolite · Answer

Si tu effectues un "Sheets("DPE").Select", alors c'est la feuille nommée "DPE" qui est sélectionnée. Le test suivant n'est donc jamais rempli, puisque tu tentes de vérifier si la feuille sélectionnée ("DPE") porte un nom du genre"07 2010".

Vba sheet + date

1 réponse

Discussions similaires