Bouton pour calculer une table de données

Bonjour,

J'ai une table de données qui est longue à calculer. J'ai donc exclu le calcul automatique des tables de données dans les options.
J'aimerais à présent créer un bouton me permettant de lancer le calcul de la table de données manuellement.
J'ai essayé ceci sans succès :

Private Sub CommandButton1_Click()
ActiveSheet.Range("Y8:AN18").Select
Selection.Calculate
End Sub

Un code permettant le calcul de la feuille entière ne fonctionne pas car le calcul automatique des tables de données est désactivé.

Peut-être que celui ci-dessus ne fonctionne pas pour la même raison ? Dans ce cas là, que pourrais-je utiliser à la place de Calculate ?
Ou y'a a-t-il une solution plus maligne ?

Merci d'avance !