[VBA] Recalcul de tout un classeur... sauf certaines feuillles

Le
HD
Bonjour,

Lorsque le mode de calcul n'est pas sur Automatique, en VBA, l'on utilise
Application.Calculate pour recalculer toutes les données d'Excel
Activesheet.Calculate pour recalculer seulement la feuille active mais
est il possible de recalculer tout un classeur sauf certaines feuillles ?

Merci d'avance pour votre aide
--
@+
HD
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
garnote
Le #17337111
Salut HD,

Quelue chose du genre, peut-être ?

Sub Calcul()
For Each nom In Array("Feuil1", "Feuil3", "Feuil5")
Sheets(nom).Calculate
Next nom
End Sub


Serge


"HD"
Bonjour,

Lorsque le mode de calcul n'est pas sur Automatique, en VBA, l'on utilise Application.Calculate pour recalculer toutes les
données d'Excel... Activesheet.Calculate pour recalculer seulement la feuille active... mais est il possible de recalculer
tout un classeur sauf certaines feuillles ?

Merci d'avance pour votre aide
--
@+
HD



FFO
Le #17337301
Salut à toi

Tu peux utiliser ceci :

For i = 1 To Sheets.Count
If Sheets(i).Name Sheets(i).Calculate
End If
Next

Le calcule s'effectue sur toutes les feuilles sauf sur les feuilles Toto,
Tata, Etc...

A toi d'adapter ce code en fonction de tes feuilles à exclure

Cela devrait convenir

Dis moi !!!!
Publicité
Poster une réponse
Anonyme