OVH Cloud OVH Cloud

Données dans userform

1 réponse
Avatar
Christian Raoux
Bonjour

Je cherche à envoyer dans un label le resultat d'une cellule d'une
feuille

le Laber de l'userform doit être remis a jour à chaque changement de la
cellule qui est une formule :
=NB.SI(D5:AH13;"M")+NB.SI(D5:AH13;"MF")+NB.SI(D5:AH13;"MD")

Private Sub CbDate_Change()
If CdDate = 1 Then
'**Infirmier**
LbTxInfMatin.Caption = Range("AI45")
LbTxInfAM.Caption = Range("Aj45")
LbTxInfJour.Caption = Range("AL45")
LbTxInfNuit.Caption = Range("AM45")
'**As**
LbTxAsMatin.Caption = Range("AI50")
LbTxAsAM.Caption = Range("Aj50")
LbTxAsJour.Caption = Range("AL50")
LbTxAsNuit.Caption = Range("AM50")
'**ASH**
LbTxAshMatin.Caption = Range("AI55")
LbTxAshAM.Caption = Range("AJ55")
LbTxAshJour.Caption = ("Al55")
LbTxAshNuit.Caption = Range("AM55")
End If

....
...
End Sub

Cette fonction fonctionne bien à l'ouverture de l'userform
mais pas de réactualisation si les cellules changent

merci d'avance

christian

1 réponse

Avatar
Christian Raoux
"Arthur Rainbow" écrivait
news::

Bonsoir
La Form est-elle visible quand la cellule change ?
Si comme je le crois, la réponse est "non", il doit suffire de la
décharger "Unload Userform" et de la réafficher " Userform.Show"
J'espère avoir bon !!
@+





Oui l'userform est visible est le reste tout le temps de la saisie sur la
feuille car je m'en sert de recapitulatif pour un planning avec de
nombreuses entrées qui dépasse l'écran

merci
A+
christian