2 commentaires sur une meme cellule

  • Initiateur de la discussion Initiateur de la discussion Esox
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Esox

XLDnaute Occasionnel
Bonjour le forum,

J'aimerai pouvoir rajouter un second commentaire dans une cellule avec un petit repère (triangle) vert en bas à gauche de la cellule. est ce réalisable ?

Merci à vous,
 
Re : 2 commentaires sur une meme cellule

Bonjour,

c'est intéressant mais énigmatique ce que vous avez réussi à faire ...

-> pas de vba, et je ne vois pas par quel sous-menu pouvoir y accéder ...?
et pourtant, cela ne fonctionne que sur une seule cellule !

Si vous avez quelques détails ....

Essart
 
Re : 2 commentaires sur une meme cellule

Bonjour,

Pour tuer le temps, cette macro dans le code de la feuille :

Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Me.Hyperlinks(1).ScreenTip = IIf(ActiveCell.Address = "$D$5", "Belle journée n'est-ce pas ?", "Cliquez sur D5")
End Sub
Fichier (2).

A+
 

Pièces jointes

Dernière édition:
Re : 2 commentaires sur une meme cellule

Bonjour job75 pas mal du tout tout ca...

Mais je vais etre chiant 😉

J'aimerai faire une macro lié à un bouton de ma barre outils personnalisée
Je clique dessus, et un commentaire sajoute en bas a droite de la cellule avec un repère triangle vert. Le meme principe commentaire classique mais qui ne le remplacerai pas et repéré différement.

Est ce possible ?
 
Re : 2 commentaires sur une meme cellule

Bonjour Esox,

Je vois que vous n'avez toujours pas compris que ce que vous demandez est impossible, sinon on vous l'aurait fait.

Quant à mettre des boutons dans la barre d'outils c'est archi classique, cherchez sur le forum.

A+
 
Re : 2 commentaires sur une meme cellule

Re,

Evidemment si l'on aime le capillotracté :

Code:
Private Sub CommandButton1_Click()
Dim t As Boolean
t = CommandButton1.Caption Like "Afficher*"
CommandButton1.Caption = IIf(t, "Masquer", "Afficher") & " les commentaires"
Me.Shapes("Texte").Visible = t
Me.Shapes("Flèche").Visible = t
Me.Shapes("Triangle").Visible = t
If t Then
  With [D5].AddComment("Bonjour Esox")
    .Shape.TextFrame.AutoSize = True
    .Visible = True
  End With
  Else
    [D5].ClearComments
  End If
End Sub
Fichier (3).

A+
 

Pièces jointes

Re : 2 commentaires sur une meme cellule

Re,

Une autre macro (plus générale et plus simple) dans ce fichier (4) :

Code:
Private Sub CommandButton1_Click()
Dim t As Boolean, s As Shape
t = CommandButton1.Caption Like "Afficher*"
CommandButton1.Caption = IIf(t, "Masquer", "Afficher") & " les commentaires"
Application.DisplayCommentIndicator = t
For Each s In Me.Shapes
  If s.Name <> "CommandButton1" Then s.Visible = t
Next
End Sub
A+
 

Pièces jointes

Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
2
Affichages
259
Retour