Bonjour à tous du forum,
besoin d'une condition
uniquement s'îl y a une couleur de fond mis dans une plage de données, qu'est affiché l'historique de changement dans commentaire,
sinon rien est affiché ( pour éviter que pour n'importe click avec le curser sur ActiveWorksheet qu'est affiché un commentaire )
Ne sait pas quel code est à utiliser pour ajouter cette conditon à la procédure suivante:
besoin d'une condition
uniquement s'îl y a une couleur de fond mis dans une plage de données, qu'est affiché l'historique de changement dans commentaire,
sinon rien est affiché ( pour éviter que pour n'importe click avec le curser sur ActiveWorksheet qu'est affiché un commentaire )
Ne sait pas quel code est à utiliser pour ajouter cette conditon à la procédure suivante:
Code:
[B]Private Sub Worksheet_SelectionChange(ByVal Target As Range)[/B]
Application.EnableEvents = False
If Target.Column <> 0 Then
On Error Resume Next
Err = 0
temp = Target.Comment.Text
If Err <> 0 Then Target.AddComment
Target.Comment.Text Text:=Target.Comment.Text & _
Target.Value & " Modifié par:" & NomUtil() & _
" Le " & Now & vbLf
Target.Comment.Visible = True
Target.Comment.Shape.Select
Selection.AutoSize = True
Target.Comment.Visible = False
On Error GoTo 0
End If
Application.EnableEvents = True
End Sub