Bouton qui se disable automatiquement

[Boonichou]

Bonjour à tous!

Je voudrais savoir s'il était possible qu'un bouton d'une de mes barres d'outils se désactive (soit en grisé quoi) automatiquement quand un évenement se passe. (en l'occurence l'évenement c'est que la derniere cellule non vide d'une colonne soit de la ligne 11).

Merci d'avance!

Daniel

 

[Compte Supprimé 979]

Re : Bouton qui se disable automatiquement

Salut Boonichou,

Je pense effectivement que c'est faisable, avec l'évènement :

Private Sub Worksheet_Change(ByVal Target As Range)

Ou pour toutes les feuilles

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

Dans l'évènement tu testes la dernière ligne de la colonne de la cellule modifiée

DerLig = Cells(65536,Target.Column).End(XlUp).Row
IF DerLig = 11 then
  ' Désactiver le bouton ICI
 
endif

A+