exécution conditionnelle d'une macro

ced · 17 Juillet 2003

Salut à tous,

je suis en train de programmer des feuilles de calculs excel afin d'améliorer l'archivage de mes données. Les macros ont bien été conçues seulement maintenant je souhaite que certaines macros ne s'exécutent que si la valeur d'une certaine cellule ('par ex E5') est < ou = à 5.

Il faudrait donc que j'intégre dans ma macro le code de ce test qui indique que si la condition est réalisée alors le prgm peut continuer à s'exécuter, sinon on s'arrête là et une message box s'affiche pour indiquer à l'utilisateur que la recup n'est pas possible.

Pourriez vous m'aider SVP pour finaliser au plus vite mon projet ...
(quel code dois je taper ?)

Merci pour toutes vos collaborations

A+

CED

@Christophe@ · 17 Juillet 2003

Bonjour Ced

Ben tous simplement comme cela:

Sub TaMacro()
If Range("E5").value > 5 then

ton code

else
Msgbox "Annulation"
exit sub
end sub

Et voila,

@Christophe@

ced · 17 Juillet 2003

Merci beaucoup cela fonctionne à merveille
Il est vraiment temps que je me familiarise avec VBA mais ce n'est pas chose facile !

Heureusement que les pros d'excel sont sur ce forum

;-)

Bonne soirée

Micc · 18 Juillet 2003

Salut Ced et Christophe

Si tu veux faire cela automatiquement au démarrage de ton programme tu fais ce qui dit Christophe dans la partie ThisWorkbook comme ceci :

Private Sub Workbook_Open()

Sheets("Onglet qui contient le test E5").Select
If Range("E5").value > 5 then

Call Macro qui contient ton code

else
Msgbox "Annulation"
exit sub

End Sub

@+

exécution conditionnelle d'une macro

ced

Guest

@Christophe@

Guest

ced

Guest

Micc

Guest