commentaires

[dan 52]

bonjour à tous,
une question toute simple.
j'insère un commentaire sur une cellule, il se positionne systématiquement à droite sur la cellule.
comment faire pour qu'il soit ancré à gauche ?
merci de vos réponses.
amitiés.

 

[Dugenou]

Salut Dan52,

Si tu parles du triangle rouge : à ma connaissance y'a pas moyen (sauf peut être en utilisant une version orientale d'Excel et encore !)

Si tu parles du cadre de texte c'est un peu plus compliqué : si tu coches outils option affichage 'indicateur et commentaire' (les commentaires se voient tout le temps) il restent là ou tu les as placés avec la souris mais quand tu les crées, il sont toujours à droite.
Si tu coches que indicateur seul ils restent à droite (mais il me semble que par VBA ça doit être possible de les déplacer.

Désolé pour cette réponse très ZOP !

 

[dan 52]

oui, c'est bien du triangle rouge dont je parle.

le fait d'avoir répondu st déjà important en soi.
merci

 

[Celeda]

Bonsoir,

C'est impossible, il faudrait créer un 'faux commentaire' par vba (et vi!!) mais attention sur xp, la gauche de la cellule est réservée pour la gestion des erreurs et le triangle est vert!! 😉


Celeda

 

[pat1545.]

Bonsoir,

oui c'est +/- possible , mon ami ChrisV qui sévit sur un forum excel l'a fait:

Patrick


Option Explicit

Sub cloneCommentaire()
Dim com As String
Dim aSh As Worksheet
Dim poZ, p1, P2
Dim cloneC As Shape
com = InputBox('Saisissez votre commentaire...', _
'Insérer un commentaire')
If com <> '' Then
On Error Resume Next
With Selection.Validation
.Add Type:=xlValidateInputOnly
.InputTitle = 'Faux commentaire :'
.InputMessage = com
End With
Else: Exit Sub
End If
Application.ScreenUpdating = False
Set aSh = ActiveSheet
Set poZ = ActiveCell
p1 = poZ.Top
P2 = poZ.Left
Set cloneC = aSh.Shapes.AddShape(msoShapeRightTriangle, _
P2, p1, 5#, 5#)
With cloneC
.IncrementRotation 90#
.Fill.ForeColor.SchemeColor = 10
.Line.Visible = msoFalse
End With
End Sub 'ChrisV