Affichage dynamique dans un label

U

unrender

Guest

• 18 Juin 2011

• #2

Re : Affichage dynamique dans un label

Bonjour,

Normal vu que tu mets la procédure dans l'événement click...
Pourquoi ne pas la mettre dans la feuille, dans l'événement 'Change' ?

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 18 Juin 2011

• #3

Re : Affichage dynamique dans un label

Bonjour,

unrender à dit:

Pourquoi ne pas la mettre dans la feuille, dans l'événement 'Change' ?

Cliquez pour agrandir...

Vous voulez dire, je pense, l'évènement SelectionChange :

Code:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Un bémol cependant.

Sélectionnez par exemple la plage A1:A5, puis appuyez sur <Entrée>.

La macro ne se déclenchera pas, bien que la cellule active soit modifiée.

Rien à faire contre ça...

A+

 

Vote positif 0 Vote négatif

U

unrender

Guest

• 18 Juin 2011

• #4

Re : Affichage dynamique dans un label

Bonjour,

Je parlais bien de l'évènement Change 🙂

Code:

Private Sub Worksheet_Change(ByVal Target As Range)

Ensuite, pour ne pas que la procédure se lance à chaque fois qu'une modification est faite sur la totalité de la feuille, il faut filtrer...

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 18 Juin 2011

• #5

Re : Affichage dynamique dans un label

Re,

chrismydo a dit :

chrismydo à dit:

le contenu du label n'est pas dynamique c a d qu'il ne change pas automatiquement quand je change de ligne active.

Cliquez pour agrandir...

Il n'a pas dit quand je modifie une cellule.

A+

 

Vote positif 0 Vote négatif

U

unrender

Guest

• 18 Juin 2011

• #6

Re : Affichage dynamique dans un label

job75 à dit:

Re,

chrismydo a dit :



Il n'a pas dit quand je modifie une cellule.

A+

Cliquez pour agrandir...

Héhé, bien vu, j'ai zappé cette partie 🙂

 

Vote positif 0 Vote négatif

U

unrender

Guest

• 18 Juin 2011

• #7

Re : Affichage dynamique dans un label

C'est pas 'joli", mais en stockant le numéro de ligne qui était active juste avant de 'bouger' dans une cellule de la feuille, ça devrait aller :

Code:

If Target.Row <> [a1] Then
    Me.Label1 = Cells(ActiveCell.Row, 10).Value
End If
[a1] = Target.Row

 

Vote positif 0 Vote négatif

C

chrismydo

Guest

• 18 Juin 2011

• #8

Re : Affichage dynamique dans un label

Re
Merci pour vos indications, en les suivant j'ai mis ce code qui fonctionne a merveille:
Private Sub Worksheet_SelectionChange (byVal Target As Range)
Me.Label1 = Cells(ActivateCell.Row, 10)
End Sub
A+

 

Vote positif 0 Vote négatif