Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Bonsoir Garnote,
Il y 2 façons de procéder :
A ) Tu ne définis pas la propriété SourceControl et tu inscris ceci comme code : Au fur et à mesure que tu bouges le bouton du scrollbar la valeur de la cellule A1 de la feuille 1 va se mettre à jour en prenant comme valeur, celle du scrollbar ... une valeur située et définie par les propriétés "Min" et "Max" du contrôle.
'-------------------- Private Sub ScrollBar1_Change()
Range("Feuil1!A1") = Me.ScrollBar1.Value
End Sub '-------------------- Private Sub ScrollBar1_Scroll()
ScrollBar1_Change
End Sub '--------------------
Pour définir le ControlSource : Feuil1!A1
Si au lieu d'utiliser ces 2 procédures, tu définis seulement le ControlSource, ta cellule va se mettre à jour seulement lorsque tu sélectionneras un autre contrôle. J'aime pas beaucoup cette façon de faire et de façon générale la propriété ControlSource est à oubliée!!!
;-)
Salutations!
"garnote" a écrit dans le message de news:f61Gb.1250$ Bonsoir,
J'ai une ScrollBar sur un Userform. J'écris B1 pour la propriété ControlSource et je reçois le message : Impossible de définir ...
Qu'est à dire ?
Serge
Bonsoir Garnote,
Il y 2 façons de procéder :
A ) Tu ne définis pas la propriété SourceControl et tu inscris ceci comme code :
Au fur et à mesure que tu bouges le bouton du scrollbar la valeur de la cellule A1 de la feuille 1 va se mettre à
jour en prenant comme valeur, celle du scrollbar ... une valeur située et définie par les propriétés "Min" et "Max" du
contrôle.
'--------------------
Private Sub ScrollBar1_Change()
Range("Feuil1!A1") = Me.ScrollBar1.Value
End Sub
'--------------------
Private Sub ScrollBar1_Scroll()
ScrollBar1_Change
End Sub
'--------------------
Pour définir le ControlSource : Feuil1!A1
Si au lieu d'utiliser ces 2 procédures, tu définis seulement le ControlSource, ta cellule va se mettre à jour seulement
lorsque tu sélectionneras un autre contrôle. J'aime pas beaucoup cette façon de faire et de façon générale la propriété
ControlSource est à oubliée!!!
;-)
Salutations!
"garnote" <rien@absent.net> a écrit dans le message de news:f61Gb.1250$6N3.459@charlie.risq.qc.ca...
Bonsoir,
J'ai une ScrollBar sur un Userform.
J'écris B1 pour la propriété ControlSource
et je reçois le message : Impossible de définir ...
A ) Tu ne définis pas la propriété SourceControl et tu inscris ceci comme code : Au fur et à mesure que tu bouges le bouton du scrollbar la valeur de la cellule A1 de la feuille 1 va se mettre à jour en prenant comme valeur, celle du scrollbar ... une valeur située et définie par les propriétés "Min" et "Max" du contrôle.
'-------------------- Private Sub ScrollBar1_Change()
Range("Feuil1!A1") = Me.ScrollBar1.Value
End Sub '-------------------- Private Sub ScrollBar1_Scroll()
ScrollBar1_Change
End Sub '--------------------
Pour définir le ControlSource : Feuil1!A1
Si au lieu d'utiliser ces 2 procédures, tu définis seulement le ControlSource, ta cellule va se mettre à jour seulement lorsque tu sélectionneras un autre contrôle. J'aime pas beaucoup cette façon de faire et de façon générale la propriété ControlSource est à oubliée!!!
;-)
Salutations!
"garnote" a écrit dans le message de news:f61Gb.1250$ Bonsoir,
J'ai une ScrollBar sur un Userform. J'écris B1 pour la propriété ControlSource et je reçois le message : Impossible de définir ...
Qu'est à dire ?
Serge
garnote
Merci pour ces précieux conseils. J'ai mis du liquid paper sur ControlSource.
Serge
"michdenis" a écrit dans le message de news: ew55#
Bonsoir Garnote,
Il y 2 façons de procéder :
A ) Tu ne définis pas la propriété SourceControl et tu inscris ceci comme code :
Au fur et à mesure que tu bouges le bouton du scrollbar la valeur de la cellule A1 de la feuille 1 va se mettre à
jour en prenant comme valeur, celle du scrollbar ... une valeur située et définie par les propriétés "Min" et "Max" du
contrôle.
'-------------------- Private Sub ScrollBar1_Change()
Range("Feuil1!A1") = Me.ScrollBar1.Value
End Sub '-------------------- Private Sub ScrollBar1_Scroll()
ScrollBar1_Change
End Sub '--------------------
Pour définir le ControlSource : Feuil1!A1
Si au lieu d'utiliser ces 2 procédures, tu définis seulement le ControlSource, ta cellule va se mettre à jour seulement
lorsque tu sélectionneras un autre contrôle. J'aime pas beaucoup cette façon de faire et de façon générale la propriété
ControlSource est à oubliée!!!
;-)
Salutations!
"garnote" a écrit dans le message de news:f61Gb.1250$
Bonsoir,
J'ai une ScrollBar sur un Userform. J'écris B1 pour la propriété ControlSource et je reçois le message : Impossible de définir ...
Qu'est à dire ?
Serge
Merci pour ces précieux conseils.
J'ai mis du liquid paper sur ControlSource.
Serge
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
ew55#0ayDHA.3220@tk2msftngp13.phx.gbl...
Bonsoir Garnote,
Il y 2 façons de procéder :
A ) Tu ne définis pas la propriété SourceControl et tu inscris ceci comme
code :
Au fur et à mesure que tu bouges le bouton du scrollbar la valeur
de la cellule A1 de la feuille 1 va se mettre à
jour en prenant comme valeur, celle du scrollbar ... une valeur située et
définie par les propriétés "Min" et "Max" du
contrôle.
'--------------------
Private Sub ScrollBar1_Change()
Range("Feuil1!A1") = Me.ScrollBar1.Value
End Sub
'--------------------
Private Sub ScrollBar1_Scroll()
ScrollBar1_Change
End Sub
'--------------------
Pour définir le ControlSource : Feuil1!A1
Si au lieu d'utiliser ces 2 procédures, tu définis seulement le
ControlSource, ta cellule va se mettre à jour seulement
lorsque tu sélectionneras un autre contrôle. J'aime pas beaucoup cette
façon de faire et de façon générale la propriété
ControlSource est à oubliée!!!
;-)
Salutations!
"garnote" <rien@absent.net> a écrit dans le message de
news:f61Gb.1250$6N3.459@charlie.risq.qc.ca...
Bonsoir,
J'ai une ScrollBar sur un Userform.
J'écris B1 pour la propriété ControlSource
et je reçois le message : Impossible de définir ...
