Est-ce possible d'attribuer à un spinButton une valeur maximale (ou
minimale) variant en fonction d'un nombre figurant dans une cellule (a1)
d'une autre feuille.
Merci pour votre aide et excellente journée.
Charly
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
Youky
Salut Charly à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Feuil3.SpinButton1.Max = [A1] + 100 'à modifier Feuil3.SpinButton1.Min = [A1] End If End Sub
Youky
"Charly" a écrit dans le message de news:
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou minimale) variant en fonction d'un nombre figurant dans une cellule (a1) d'une autre feuille.
Merci pour votre aide et excellente journée. Charly
Salut Charly
à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Feuil3.SpinButton1.Max = [A1] + 100 'à modifier
Feuil3.SpinButton1.Min = [A1]
End If
End Sub
Youky
"Charly" <Charly@discussions.microsoft.com> a écrit dans le message de news:
F6853853-FA88-4DB0-A94E-246D1F21B1A3@microsoft.com...
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou
minimale) variant en fonction d'un nombre figurant dans une cellule (a1)
d'une autre feuille.
Merci pour votre aide et excellente journée.
Charly
Salut Charly à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Feuil3.SpinButton1.Max = [A1] + 100 'à modifier Feuil3.SpinButton1.Min = [A1] End If End Sub
Youky
"Charly" a écrit dans le message de news:
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou minimale) variant en fonction d'un nombre figurant dans une cellule (a1) d'une autre feuille.
Merci pour votre aide et excellente journée. Charly
jps
bonjour charly sans VBA tu peux aussi aller dans les propriétés de ton spinbutton et une fois définie ta LinkedCell, tu donnes une valeur Max et Min dans les rubriques éponymes jps
"Youky" a écrit dans le message de news:
Salut Charly à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Feuil3.SpinButton1.Max = [A1] + 100 'à modifier Feuil3.SpinButton1.Min = [A1] End If End Sub
Youky
"Charly" a écrit dans le message de news:
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou minimale) variant en fonction d'un nombre figurant dans une cellule (a1) d'une autre feuille.
Merci pour votre aide et excellente journée. Charly
bonjour charly
sans VBA tu peux aussi aller dans les propriétés de ton spinbutton et une
fois définie ta LinkedCell, tu donnes une valeur Max et Min dans les
rubriques éponymes
jps
"Youky" <bruno.jeune@wanadoo.fr> a écrit dans le message de news:
egzHMGGOGHA.1032@TK2MSFTNGP11.phx.gbl...
Salut Charly
à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Feuil3.SpinButton1.Max = [A1] + 100 'à modifier
Feuil3.SpinButton1.Min = [A1]
End If
End Sub
Youky
"Charly" <Charly@discussions.microsoft.com> a écrit dans le message de
news: F6853853-FA88-4DB0-A94E-246D1F21B1A3@microsoft.com...
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou
minimale) variant en fonction d'un nombre figurant dans une cellule (a1)
d'une autre feuille.
Merci pour votre aide et excellente journée.
Charly
bonjour charly sans VBA tu peux aussi aller dans les propriétés de ton spinbutton et une fois définie ta LinkedCell, tu donnes une valeur Max et Min dans les rubriques éponymes jps
"Youky" a écrit dans le message de news:
Salut Charly à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Feuil3.SpinButton1.Max = [A1] + 100 'à modifier Feuil3.SpinButton1.Min = [A1] End If End Sub
Youky
"Charly" a écrit dans le message de news:
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou minimale) variant en fonction d'un nombre figurant dans une cellule (a1) d'une autre feuille.
Merci pour votre aide et excellente journée. Charly
jps
heu pour la LinkedCell : Feuil3!A1 mais je n'ai peut-être rien compris à la question jps PS modeste est prié de laisser son scud "si c'était la première fois..." au vestiaire
"jps" a écrit dans le message de news:
bonjour charly sans VBA tu peux aussi aller dans les propriétés de ton spinbutton et une fois définie ta LinkedCell, tu donnes une valeur Max et Min dans les rubriques éponymes jps
"Youky" a écrit dans le message de news:
Salut Charly à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Feuil3.SpinButton1.Max = [A1] + 100 'à modifier Feuil3.SpinButton1.Min = [A1] End If End Sub
Youky
"Charly" a écrit dans le message de news:
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou minimale) variant en fonction d'un nombre figurant dans une cellule (a1) d'une autre feuille.
Merci pour votre aide et excellente journée. Charly
heu pour la LinkedCell : Feuil3!A1
mais je n'ai peut-être rien compris à la question
jps
PS modeste est prié de laisser son scud "si c'était la première fois..." au
vestiaire
"jps" <vaderetrosp@mas> a écrit dans le message de news:
eEATFJGOGHA.1288@TK2MSFTNGP09.phx.gbl...
bonjour charly
sans VBA tu peux aussi aller dans les propriétés de ton spinbutton et une
fois définie ta LinkedCell, tu donnes une valeur Max et Min dans les
rubriques éponymes
jps
"Youky" <bruno.jeune@wanadoo.fr> a écrit dans le message de news:
egzHMGGOGHA.1032@TK2MSFTNGP11.phx.gbl...
Salut Charly
à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Feuil3.SpinButton1.Max = [A1] + 100 'à modifier
Feuil3.SpinButton1.Min = [A1]
End If
End Sub
Youky
"Charly" <Charly@discussions.microsoft.com> a écrit dans le message de
news: F6853853-FA88-4DB0-A94E-246D1F21B1A3@microsoft.com...
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou
minimale) variant en fonction d'un nombre figurant dans une cellule (a1)
d'une autre feuille.
Merci pour votre aide et excellente journée.
Charly
heu pour la LinkedCell : Feuil3!A1 mais je n'ai peut-être rien compris à la question jps PS modeste est prié de laisser son scud "si c'était la première fois..." au vestiaire
"jps" a écrit dans le message de news:
bonjour charly sans VBA tu peux aussi aller dans les propriétés de ton spinbutton et une fois définie ta LinkedCell, tu donnes une valeur Max et Min dans les rubriques éponymes jps
"Youky" a écrit dans le message de news:
Salut Charly à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Feuil3.SpinButton1.Max = [A1] + 100 'à modifier Feuil3.SpinButton1.Min = [A1] End If End Sub
Youky
"Charly" a écrit dans le message de news:
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou minimale) variant en fonction d'un nombre figurant dans une cellule (a1) d'une autre feuille.
Merci pour votre aide et excellente journée. Charly
Charly
Merci beaucoup pour l'aide. Il y qqch qui m'échappe car la Private sub ne génère pas les nouvelles données provenant de la cellule A1, après une modification de la valeur, dans les chamos MAX et MIN du spinbutton. Un petit coup de pouce supplémentaire me rendrait grand service ! Merci (également à jps pour ses proprositions) Charly
Salut Charly à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Feuil3.SpinButton1.Max = [A1] + 100 'à modifier Feuil3.SpinButton1.Min = [A1] End If End Sub
Youky
"Charly" a écrit dans le message de news:
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou minimale) variant en fonction d'un nombre figurant dans une cellule (a1) d'une autre feuille.
Merci pour votre aide et excellente journée. Charly
Merci beaucoup pour l'aide.
Il y qqch qui m'échappe car la Private sub ne génère pas les nouvelles
données provenant de la cellule A1, après une modification de la valeur, dans
les chamos MAX et MIN du spinbutton.
Un petit coup de pouce supplémentaire me rendrait grand service !
Merci (également à jps pour ses proprositions)
Charly
Salut Charly
à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Feuil3.SpinButton1.Max = [A1] + 100 'à modifier
Feuil3.SpinButton1.Min = [A1]
End If
End Sub
Youky
"Charly" <Charly@discussions.microsoft.com> a écrit dans le message de news:
F6853853-FA88-4DB0-A94E-246D1F21B1A3@microsoft.com...
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou
minimale) variant en fonction d'un nombre figurant dans une cellule (a1)
d'une autre feuille.
Merci pour votre aide et excellente journée.
Charly
Merci beaucoup pour l'aide. Il y qqch qui m'échappe car la Private sub ne génère pas les nouvelles données provenant de la cellule A1, après une modification de la valeur, dans les chamos MAX et MIN du spinbutton. Un petit coup de pouce supplémentaire me rendrait grand service ! Merci (également à jps pour ses proprositions) Charly
Salut Charly à copier dans la feuille qui prend en compte la cellule qui change
Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then Feuil3.SpinButton1.Max = [A1] + 100 'à modifier Feuil3.SpinButton1.Min = [A1] End If End Sub
Youky
"Charly" a écrit dans le message de news:
Bonjour,
Est-ce possible d'attribuer à un spinButton une valeur maximale (ou minimale) variant en fonction d'un nombre figurant dans une cellule (a1) d'une autre feuille.
Merci pour votre aide et excellente journée. Charly
Youky
re: Cette macro s'execute que lorsque tu changes la valeur de A1 Si en A1 tu as une formule l'evenement n'a pas lieu. Il faudra tester la cellule qui influence sur A1 ou encore Private Sub Worksheet_Change(ByVal Target As Range) If lemax <> [A1] Then Feuil3.SpinButton1.Max = [A1] + 100 Feuil3.SpinButton1.Min = [A1] lemax = [A1] End If End Sub
et en workbook
Public lemax As Integer Private Sub Workbook_Open() lemax = Feuil1.[A1] End Sub Youky
re:
Cette macro s'execute que lorsque tu changes la valeur de A1
Si en A1 tu as une formule l'evenement n'a pas lieu.
Il faudra tester la cellule qui influence sur A1
ou encore
Private Sub Worksheet_Change(ByVal Target As Range)
If lemax <> [A1] Then
Feuil3.SpinButton1.Max = [A1] + 100
Feuil3.SpinButton1.Min = [A1]
lemax = [A1]
End If
End Sub
et en workbook
Public lemax As Integer
Private Sub Workbook_Open()
lemax = Feuil1.[A1]
End Sub
Youky
re: Cette macro s'execute que lorsque tu changes la valeur de A1 Si en A1 tu as une formule l'evenement n'a pas lieu. Il faudra tester la cellule qui influence sur A1 ou encore Private Sub Worksheet_Change(ByVal Target As Range) If lemax <> [A1] Then Feuil3.SpinButton1.Max = [A1] + 100 Feuil3.SpinButton1.Min = [A1] lemax = [A1] End If End Sub
et en workbook
Public lemax As Integer Private Sub Workbook_Open() lemax = Feuil1.[A1] End Sub Youky
Charly
Un très grand merci pour cet aide. J'ignorais le fait qu'une cellule "mouvante" pouvait se montrer aussi radicalement désagréable !
Tout est rentré dans l'ordre. Merci pour ce partage de connaissance et très bon après-midi.
Charly
re: Cette macro s'execute que lorsque tu changes la valeur de A1 Si en A1 tu as une formule l'evenement n'a pas lieu. Il faudra tester la cellule qui influence sur A1 ou encore Private Sub Worksheet_Change(ByVal Target As Range) If lemax <> [A1] Then Feuil3.SpinButton1.Max = [A1] + 100 Feuil3.SpinButton1.Min = [A1] lemax = [A1] End If End Sub
et en workbook
Public lemax As Integer Private Sub Workbook_Open() lemax = Feuil1.[A1] End Sub Youky
Un très grand merci pour cet aide.
J'ignorais le fait qu'une cellule "mouvante" pouvait se montrer aussi
radicalement désagréable !
Tout est rentré dans l'ordre. Merci pour ce partage de connaissance et très
bon après-midi.
Charly
re:
Cette macro s'execute que lorsque tu changes la valeur de A1
Si en A1 tu as une formule l'evenement n'a pas lieu.
Il faudra tester la cellule qui influence sur A1
ou encore
Private Sub Worksheet_Change(ByVal Target As Range)
If lemax <> [A1] Then
Feuil3.SpinButton1.Max = [A1] + 100
Feuil3.SpinButton1.Min = [A1]
lemax = [A1]
End If
End Sub
et en workbook
Public lemax As Integer
Private Sub Workbook_Open()
lemax = Feuil1.[A1]
End Sub
Youky
Un très grand merci pour cet aide. J'ignorais le fait qu'une cellule "mouvante" pouvait se montrer aussi radicalement désagréable !
Tout est rentré dans l'ordre. Merci pour ce partage de connaissance et très bon après-midi.
Charly
re: Cette macro s'execute que lorsque tu changes la valeur de A1 Si en A1 tu as une formule l'evenement n'a pas lieu. Il faudra tester la cellule qui influence sur A1 ou encore Private Sub Worksheet_Change(ByVal Target As Range) If lemax <> [A1] Then Feuil3.SpinButton1.Max = [A1] + 100 Feuil3.SpinButton1.Min = [A1] lemax = [A1] End If End Sub
et en workbook
Public lemax As Integer Private Sub Workbook_Open() lemax = Feuil1.[A1] End Sub Youky