Microsoft 365 Bloquer l'exécution d'une macro

gaelle31

XLDnaute Nouveau
Bonjour,

Je souhaiterais mettre en place une macro me permettant de copier un onglet de mon fichier dans le même fichier tout en indiquant la date du jour. J'ai réussi à créer la macro sans soucis.

Par contre, j'ai créé un bouton me permettant d'exécuter ma macro et je souhaiterais mettre en place une macro me permettant de bloquer l'exécution de ma macro copier/coller si je clique deux fois sur le bouton. En d'autres termes, je ne veux pas avoir deux onglets qui s'appellent de la même manière (deux fois la même date).

Pourriez-vous m'aider s'il-vous-plait ?

Merci d'avance.
 

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour Gaelle,
Il suffit qu'en début de votre macro vous regardiez si une feuille porte déjà ce nom, avec par exemple :
VB:
Sub Essai()
    NomFeuille = Range("A1") ' Evidemment à modifier, doit donner la cellule contenant le nom de la feuille désirée.
    For Each Feuille In Worksheets                  ' On parcourt toutes les feuilles
        If Feuille.Name = NomFeuille Then Exit Sub  ' On sort puisqu'une feuille porte déjà ce nom
    Next Feuille
    ' Si on arrive ici c'est qu'aucune feuille ne porte ce nom, donc on continue
    ' Suite du code
    ' ....
End Sub
 

Discussions similaires

T
  • Résolu(e)
Microsoft 365 pb effacement macro
Réponses
8
Affichages
427
Themax
T

Statistiques des forums

Discussions
315 091
Messages
2 116 111
Membres
112 662
dernier inscrit
lou75