La cellule liée d'un scrollbar n'effectue pas
BertrandGueroult
-
eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention -
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
- Aller à la ligne dans une cellule excel - Guide
- Proteger cellule excel - Guide
- Excel cellule choix multiple - Guide
- Excel compter cellule couleur sans vba - 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
