XL 2010 Ne pas voir la sélection cellule sur plusieurs onglet

[Caroaix]

Bonjour à tous,

Y aurait-il un code pour que je ne vois pas la cellule sélectionnée (cadre vert) et que je puisse affecter à plusieurs onglets de mon classeur ?
Je joins une image
Merci d'avance

 

[Staple1600]

Bonjour,

Oui, c'est possible
Tout comme il t'est possible de joindre un fichier exemple qui existe déjà sur ton disque dur
(Ce qui me permettrait de boire mon café chaud plutôt que de recréer un fichier Excel que je sais déjà exister quelque part sur cette planète 😉)

 

[Caroaix]

🙂
Voilà le fichier

 

[Staple1600]

Re

Voila c'est plus simple
Colle ce code dans ThisWorkbook

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Sh.Range("E10").Activate
End Sub

Ca règlera ton souci pour une feuille
(Je te laisse deviner laquelle 😉
Tu trouveras en testant mon code
Mais comment on fait pour les autres ?

 

[Caroaix]

eh bien je n'ai pas compris

 

[TooFatBoy]

Bonjour,

Y aurait-il un code pour que je ne vois pas la cellule sélectionnée (cadre vert) et que je puisse affecter à plusieurs onglets de mon classeur ?

Moi, je dirais que non, ce n'est pas possible... 😁

eh bien je n'ai pas compris

Ah, toi non plus tu n'es pas un adepte des jeux de pistes ?
Toi aussi, ta période Castor Junior est révolue ?

 

[Staple1600]

Bonsoir Marcel32

Caroaix
Si tu as bien testé, normalement sur la feuille nommée Dashboard, tu ne dois plus voir ce qui te gène
(@Marcel32 pourra te le confirmer 😉)
Par contre, comme tes autres feuilles n'ont pas de shapes où dissimuler la cellule active, je plussoie aux propos de @Marcel32

NB: Aucun jeu de piste
J'ai bien écris qu'il fallait mettre le VBA dans ThisWorkBook
(comme le laisse supposer le nom de la procédure Workbook_SheetActivate) )
Ensuite il suffit de changer de feuille puis de revenir sur Dashbord pour voir l'effet produit.

Pour être roche comme Claire
Quand on active la feuille, c'est la cellule E10 qui sera active (donc derrière la forme qu'il y a sur la feuille Dashbord)
Or sur les autres feuilles, il n'y a pas de formes automatiques ou de boutons.
D'où ce que je dis dans mon message.

 

[TooFatBoy]

Voui, je confirme qu'on ne voit plus la cellule sélectionnée. Mais...

Comme on ne peut pas "ne pas voir la cellule sélectionnée", le problème a été contourné en sélectionnant une cellule cachée derrière le rectangle orange.

On doit aussi pouvoir "sélectionner" la cellule XFD1048576, qui a peu de chances d'être dans l'espace affiché.

 

[mapomme]

Bonjour à tous 🙂

Un truc de ce style peut-être pour ne plus voir la bordure de la sélection:

 

[Staple1600]

Re

@Marcel32
J'ai édité mon précédent message

Ci-dessous le message où je proposais le code VBA

Ca règlera ton souci pour une feuille
(Je te laisse deviner laquelle 😉
Tu trouveras en testant mon code
Mais comment on fait pour les autres ?

Il était simple de voir ce qu'il y a avait dans les cellules E10 de toutes les feuilles
et de voir que sur une seule feuille, il y avait une forme.
Enfin ma question indiquait qu'on ne pouvait pas résoudre le problème pour les autres feuilles.
Donc aucun jeu de piste, juste une incitation à tester le code proposé.

 

[mapomme]

Re,

Le plus simple est encore d'apprendre aux utilisateurs de se servir d'Excel...
En plus, il seront infiniment reconnaissant à celui qui leur aura appris.

 

[TooFatBoy]

Aucun jeu de piste
J'ai bien écris qu'il fallait mettre le VBA dans ThisWorkBook

Au temps pour moi ! Réellement désolé ! Shame on me !!! 😔😔😔

 

[Staple1600]

Voui, je confirme qu'on ne voit plus la cellule sélectionnée. Mais...

Comme on ne peut pas "ne pas voir la cellule sélectionnée", le problème a été contourné en sélectionnant une cellule cachée derrière le rectangle orange.

On doit aussi pouvoir "sélectionner" la cellule XFD1048576, qui a peu de chances d'être dans l'espace affiché.

Hélas non,
J'avais testé ceci
(désolé pour l'adresse de la cellule 😉)

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Sh.Range("S1600").Select
End Sub
'et aussi
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Sh.Range("S1600").Activate
End Sub

Bah, on se retrouve dans la cellule

D'où la dissimulation derrière une forme
(Mais comme il n'y a pas de forme partout)

 

[TooFatBoy]

Bah, on se retrouve dans la cellule

C'est pour ça que j'ai mis sélectionner entre guillemets. 😉

 

[Staple1600]

Re

J'allais le dire mapomme
Quand je tabule, j'aime bien savoir dans quelle cellule je suis
C'est quand comme je regarde la TV, j'aime bien savoir sur quelle chaine je suis
Ou quand je bois une bière, j'aime bien voir la jolie étiquette sur la bouteille
Après 11 bières, il est pas dit que je finisse dans un autre type de cellule, ou y aura pas de TV, mais c'est très rare et cela n'arrive jamais dans VBE 😉