Interdire une macro sur un Plage

Bonjour !

J'aurais besoin que l'on éclaire ma lanterne aujourd'hui ...
Mon problème est assez simple :

Dans l'excel que j'ai partagé je peux :
- Ajouter un tableau
- Ajouter/Supprimer la ligne du dernier tableau
- Ajouter/Supprimer la Colonne du dernier tableau

Mais je voudrais également interdire a la macro suppression de tableau de supprimer le premier tableau présent sur l'excel (actuellement tableau 100).
Actuellement ça marche mais j'utilise le nom du tableau et je voudrais éviter ça. Car la page actuel est un "template" donc elle sera copié mais le tableau n'aura plus le même nom par la suite.
Auriez-vous une idée ?

Bien à vous,
Flavien

2test2.xlsx (15.72 Ko)

Bonjour FlavienP

Un fichier en ".xlsx" comment voulez vous que l'on puisse voir vos macros

Merci de joindre le bon fichier SVP

A+

Bonjour FlavienP et le fil

Sub GetTableNameDontDelete()

    ' on peut vérifier le nom du tableau via une cellulle ou une range
    ' A condition que celui ci se trouve toujours à l'emplacement de la cellule ou range donnée
    'ici j'ai mis Cells(1, 1) (bien sur faut déclarer la bonne feuille aussi
    TableName = Sheets(1).Cells(1, 1).ListObject.Name
    MsgBox TableName

    'principe sans rentrer dans le détail, on check le nom du tableau supprimer
    ' si celui-ci est différent de TableName alors on peut supprimer le tableau
    ' Cela empèche d'effacer le mauvais tableau
    If NomDuTableau <> TableName Then
        ' Code pour supprimer le tableau
    End If

    ' Le 1er tableau créer sur la feuille et toujours le 1
    Sheets(1).ListObjects(1).Range.Select

    'on peut aussi vérifier le nom du tableau comme ceci
    MsgBox Sheets(1).ListObjects(1).Name

End Sub

Bonne soirée

Désolé pour mon ficher sans macro ....
Voici le bon format

0test2.xlsm (15.69 Ko)

Merci beaucoup RyuAutodidacte !
ça fonctionne parfaitement !

Rechercher des sujets similaires à "interdire macro plage"