Bonjour à toutes et à tous !!
Je reviens vers vous avec un nouveau problème.
J'ai une feuille avec de très nombreux calculs sur différents onglets. L'utilisateur à 4 boutons (listes déroulantes) à choisir et clique ensuite sur un bouton "actualiser" pour éviter le recalcul de toutes les formules à chaque clique de d’utilisateur sur un bouton, j'ai inséré en début de programme :
Private Sub Workbook_Open()
Application.Calculation = xlCalculationManual
End Sub
J'ai ensuite, sur mon bouton inséré des commandes telles que
Private Sub CommandButton1_Click()
Sheets("Filtre").Calculate pour rafraîchir ma feuille filtre
Sheets("Calcul").Calculate pour rafraîchir ma feuille calcul
Sheets("Calculs").Range("D6").Calculate pour rafraîchir une cellule
et Sheets("Calculs").Range("J6:L6").Calculate pour rafraîchir une ligne
Quand je lance pas à pas dans vba, aucun problème par contre quand j'utilise les boutons j'ai des erreurs
Erreur d'exécution '1004':
La méthode Calculate de la classe Range a échoué et il me surligne :
Sheets("Calculs").Range("D6").Calculate
Sheets("Calculs").Range("J6:L6").Calculate
La syntaxe est elle la bonne ??