La question suivante qui se pose automatiquement est de savoir quel est le nom de la feuille active sur laquelle vous vous trouvez actuellement. La réponse à cette question est présentée dans la macro suivante:

Function FeuilleNom() As String
FeuilleNom = Application.Caller.Parent.Name
End Function

Commentaires:
■ Vous pouvez utiliser l’instruction Application.Caller.Parent.Name pour déterminer la feuille actuelle.
■ Si vous souhaitez déterminer la position de la feuille dans le classeur, vous devez rechercher l’index de la feuille. Vous pouvez le faire avec la fonction suivante.

Function FeuilleIndex(FeuilleCal As Range)
Application.Volatile
FeuilleIndex = FeuilleCal.Worksheet.Index
End Function

Commentaires:
■Vous pouvez utiliser la propriété Index de la table pour déterminer la position de la table dans le classeur.
■Si vous déplacez la feuille dans le classeur en cliquant avec le bouton gauche de la souris sur l’onglet, puis en la déplaçant vers une autre position, l’index de table de la table est automatiquement ajusté. Ceci est assuré par l’instruction Application.Volatile.