2 commentaires sur une meme cellule

job75

XLDnaute Barbatruc

• 1 Juillet 2013

• #2

Re : 2 commentaires sur une meme cellule

Bonjour Esox,

Fichier joint si vous ne connaissez pas

A+

 

Pièces jointes

• Classeur(1).xls

  23.5 KB · Affichages: 131
• Classeur(1).xls

  23.5 KB · Affichages: 113
• Classeur(1).xls

  23.5 KB · Affichages: 113

Vote positif 0 Vote négatif

E

Essart

XLDnaute Junior

• 2 Juillet 2013

• #3

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

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 2 Juillet 2013

• #4

Re : 2 commentaires sur une meme cellule

Bonjour Essart,

C'est simple : la cellule D5 est dotée d'un commentaire et d'une validation de données...

A+

 

Vote positif 0 Vote négatif

E

Essart

XLDnaute Junior

• 2 Juillet 2013

• #5

Re : 2 commentaires sur une meme cellule

Bonjour,

Mais oui, bien sûr, sauf que je n'y avait pas pensé ...

bien vu

merci pour le retour d'info

Essart

 

Vote positif 0 Vote négatif

E

Esox

XLDnaute Occasionnel

• 6 Août 2013

• #6

Re : 2 commentaires sur une meme cellule

Bonjour,

Désolé pour ma réaction tardive.... je regarde ca et je vous dis...

En tout cas merci d'avance...

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 6 Août 2013

• #7

Re : 2 commentaires sur une meme cellule

Bonjour Esox,

Esox à dit:

En tout cas merci d'avance...

Cliquez pour agrandir...

Bah on n'est plus à un mois près n'est-ce pas

A+

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 7 Août 2013

• #8

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

• Classeur(2).xls

  33 KB · Affichages: 46
• Classeur(2).xls

  33 KB · Affichages: 55
• Classeur(2).xls

  33 KB · Affichages: 47

Dernière édition: 7 Août 2013

Vote positif 0 Vote négatif

E

Esox

XLDnaute Occasionnel

• 8 Août 2013

• #9

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 ?

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 8 Août 2013

• #10

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+

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 8 Août 2013

• #11

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

• Classeur(3).xls

  50 KB · Affichages: 65
• Classeur(3).xls

  50 KB · Affichages: 48
• Classeur(3).xls

  50 KB · Affichages: 44

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 8 Août 2013

• #12

Re : 2 commentaires sur une meme cellule

Re,

Je suis perfectionniste, sur mon ordi (Excel 2010) le triangle vert est mieux.

Fichier (3 bis).

A+

 

Pièces jointes

• Classeur(3 bis).xls

  42.5 KB · Affichages: 43

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 9 Août 2013

• #13

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

• Classeur(4).xls

  42 KB · Affichages: 51
• Classeur(4).xls

  42 KB · Affichages: 45
• Classeur(4).xls

  42 KB · Affichages: 88

Dernière édition: 9 Août 2013

Vote positif 0 Vote négatif