Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel [VBA] Recalcul de tout un classeur... sauf certaines feuillles

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

2 réponses
Avatar
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
Signaler un problème avec ce contenu

2 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
garnote
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" a écrit dans le message de news: gbg90k$280i$
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



Avatar
FFO
Salut à toi

Tu peux utiliser ceci :

For i = 1 To Sheets.Count
If Sheets(i).Name <> "Toto" And Sheets(i).Name <> "Tata" And etc.... Then
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 !!!!