La cellule liée d'un scrollbar n'effectue pas
BertrandGueroult
-
eriiic Messages postés 25847 Statut Contributeur -
eriiic Messages postés 25847 Statut Contributeur -
Voici la partie du code
If croix <= 3 Then TypeFiliere = 1
If croix = 4 Then TypeFiliere = 2
If croix = 5 Then TypeFiliere = 3
If croix = 6 Then TypeFiliere = 4
If croix = 7 Then TypeFiliere = 5
ActiveSheet.Shapes.Range(Array("Scroll Bar 37")).Select
With Selection
.Value = TypeFiliere
.Min = 1
.Max = 5
.SmallChange = 1
.LargeChange = 10
.LinkedCell = c.Cells(9, 1)
.Display3DShading = True
End With
Pouvez vous m'aider. je dois rentrer la liaison en mode manuel ce qui n'est pas tres pratique
If croix <= 3 Then TypeFiliere = 1
If croix = 4 Then TypeFiliere = 2
If croix = 5 Then TypeFiliere = 3
If croix = 6 Then TypeFiliere = 4
If croix = 7 Then TypeFiliere = 5
ActiveSheet.Shapes.Range(Array("Scroll Bar 37")).Select
With Selection
.Value = TypeFiliere
.Min = 1
.Max = 5
.SmallChange = 1
.LargeChange = 10
.LinkedCell = c.Cells(9, 1)
.Display3DShading = True
End With
Pouvez vous m'aider. je dois rentrer la liaison en mode manuel ce qui n'est pas tres pratique
A voir également:
- La cellule liée d'un scrollbar n'effectue pas
- Excel cellule couleur si condition texte - Guide
- Proteger cellule excel - Guide
- Aller à la ligne dans une cellule excel - Guide
- Excel cellule choix multiple - Guide
- Excel somme si couleur cellule - Guide
2 réponses
Bonjour,
Tu balances du code sans préciser ce que tu veux obtenir, il aurait sans doute plus judicieux de faire le contraire car lorsque l'on sait où aller c'est plus facile de choisir le chemin.
Alors essayes de nous expliquer.
Tu balances du code sans préciser ce que tu veux obtenir, il aurait sans doute plus judicieux de faire le contraire car lorsque l'on sait où aller c'est plus facile de choisir le chemin.
Alors essayes de nous expliquer.
Bonjour,
A quoi est égal c dans .LinkedCell = c.Cells(9, 1) ?
On ne le voit pas dans ton extrait.
De toutes les propriétés, seule .Value = TypeFiliere devrait figurer dans ton code.
Les autres, si elles ne changent pas, n'ont aucune raison d'y être. Met-les en les éditant manuellement. Si bien fait la cellule liée ne pourra être que correcte.
eric
A quoi est égal c dans .LinkedCell = c.Cells(9, 1) ?
On ne le voit pas dans ton extrait.
De toutes les propriétés, seule .Value = TypeFiliere devrait figurer dans ton code.
Les autres, si elles ne changent pas, n'ont aucune raison d'y être. Met-les en les éditant manuellement. Si bien fait la cellule liée ne pourra être que correcte.
eric
