Execution code VBA à la demande

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

torquemada

XLDnaute Nouveau
Bonjour à tous,
J'ai deux fonctions dans un module qui sont lancées par l' évènement feuille suivant

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Calculate

End Sub

Le PB est que je n'ai pas toujours besoin des fonctions lancées par le code ci-dessus.

Dans excel 2000 à l'ouverture du classeur ,(bien qu'il n'y est pas de macro enregistrée), la présence de ce code déclenchait la fenêtre" ce classeur contient des macros voulez vous" activer" "désactiver"" ce qui permettait d' exécuter ou non le code.
Bien que j'ai mis dans Xel 2010 la sécurité maxi sur les macros , cela n'a aucun effet sur le code VBA.
Y a-t-il un moyen d'avoir le même effet ,à l'ouverture dans xcel2010

En vous remerciant de m'avoir consacré de votre temps

Ps je mets le code des deux fonctions déclenchées par le recalcul de la feuille (cela sert à pointer des chèques en faisant passer l'écriture de gras à non gras et on récupère le solde dans une cellule avec =sommeNonGras(B4:M23)-sommeNonGras(B25:M197))

Function SommeGras(champ As Range)
Application.Volatile
Dim i, t
t = 0
For Each i In champ
If i.Font.Bold = True Then
t = t + i.Value
End If
Next i
SommeGras = t
End Function

Function sommeNonGras(champ As Range)
Application.Volatile
Dim i, t
t = 0
For Each i In champ
If i.Font.Bold = False Then
t = t + i.Value
End If
Next i
sommeNonGras = t
End Function
 
Re : Execution code VBA à la demande

Bonjour à tous,

Le niveau maxi désactive toutes les macros sans notification.
Il faut mettre le niveau intermédiaire, je pense:

Capture 1.jpg

A+ à tous
 

Pièces jointes

  • Capture 1.jpg
    Capture 1.jpg
    32.2 KB · Affichages: 58
  • Capture 1.jpg
    Capture 1.jpg
    32.2 KB · Affichages: 58
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
2
Affichages
203
  • Question Question
Microsoft 365 Code VBA
Réponses
7
Affichages
819
Retour