Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Si c'est cela cette fonction te dira si une feuille existe:
Code:
Function FeuilleExiste(NomFeuille As String) As Boolean
Dim shTmp As Worksheet
On Error Resume Next
Set shTmp = Sheets(NomFeuille)
FeuilleExiste = Err = 0
On Error GoTo 0
End Function
Si tu cherche un évènement qui se déclanche lorsqu'on créer une feuille, il n'existe pas. Mais suivant la procédure de création, il y a peut-être moyen d'y remédier.
oui c'est sa je veux savoir si la feuille qui s'appelle 'graphique au "date du jour"' existe et si elle existe il y aura un msgox "la graphique à aujourd'hui a déjà été créer"
en sachant que la date du jours se trouve dans la cellule R7.
je ne vois pas comment adapter le code que tu viens de m'envoyer!??
Garde l'excellente fonction de Hasco et crée une Sub :
Code:
Sub TestExisteFeuille()
If FeuilleExiste("Graphique au " & activesheet.range("R7").value) Then
MsgBox "Le graphique du jour a déjà été créé"
End If
End Sub
Sub CréerGraphiqueDuJour()
Dim NomFeuille As String
'Les slahs et antislahs sont interdits dans les noms de feuille
'ici remplacés par underscore '_'
NomFeuille = "Graphique au " & Format(Date, "dd_mm_yyyy")
If FeuilleExiste(NomFeuille) Then
MsgBox "Le graphique du jour est déjà créé!", vbExclamation, "Création feuille Graphique"
Else
'Création feuille
End If
End Sub
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD