Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel inserer un commentaire

inserer un commentaire

14 réponses
Avatar
yan
Bonjour à tous
Je reviens de excelabo mais je n'ai pas trouver mon bonheur.
Peut-on lorsque l'on insère un commentaire que la date du jour s'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que l'on a
y mettre.
Merci
Yan
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
1 2
Avatar
JB
Bonjour,

Saisie d'un commentaire dans un formulaire:

Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As
Boolean)
UserForm1.Show
Cancel=true
End Sub

Private Sub B_Ok_Click()
On Error Resume Next
With ActiveCell
.AddComment
On Error GoTo 0
.Comment.Text Text:=Replace(Me.TextBox1, Chr(13), "")
.Comment.Visible = True
.Comment.Shape.Select
Selection.AutoSize = True
.Comment.Visible = False
End With
Unload Me
End Sub

Private Sub UserForm_Initialize()
If ActiveCell.NoteText = "" Then
UserForm1.TextBox1 = Now & Chr(10) & Environ("username") & Chr(10)
Else
UserForm1.TextBox1 = ActiveCell.NoteText
End If
Me.Left = 300
Me.Top = 100
End Sub

http://cjoint.com/?lbrgx3cScY

JB


Bonjour et merci
Est ce que je peut en faisant un clic droit sur une celulle ouvrir une
fenetre de commentaire?
Si oui quel serait le code?
A+
Yan

"MichDenis" a écrit dans le message de news:
OrGWqCc$
Automatiquement... c'est impossible sauf si tu utilises
cette supercherie

Barre des menus / outils / options / onglet général /
tu inscris la date désirée à la place du "nom utilisateur"

Évidemment à chaque jour, tu devras changer la date
manuellement ou utiliser l'événement Open dans les thisWorkbook
pour modifiier la date.
Si ceci t'intéresse, l'enregistreur de macro devrait te donner l'esse ntiel
du code.



"yan" a écrit dans le message de news:
4548a788$0$27384$
Bonjour à tous
Je reviens de excelabo mais je n'ai pas trouver mon bonheur.
Peut-on lorsque l'on insère un commentaire que la date du jour s'insc rive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que l'on
a
y mettre.
Merci
Yan







Avatar
JB
Insère la date du jour et le nom d'utilsateur sur le clic droit

http://cjoint.com/?lbthkMWTec


Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As
Boolean)
If ActiveCell.NoteText = "" Then
Target.AddComment
Target.Comment.Text Text:=CStr(Now) & Chr(10) &
Environ("username") & Chr(10)
SendKeys "m"
Else
SendKeys "m"
End If
End Sub

JB



Bonjour à tous
Je reviens de excelabo mais je n'ai pas trouver mon bonheur.
Peut-on lorsque l'on insère un commentaire que la date du jour s'inscri ve
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que l 'on a
y mettre.
Merci
Yan


Avatar
yan
Bonjour et mrci à tous pour ces solutions
bonne journée
Yan

"JB" a écrit dans le message de news:

Insère la date du jour et le nom d'utilsateur sur le clic droit

http://cjoint.com/?lbthkMWTec


Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As
Boolean)
If ActiveCell.NoteText = "" Then
Target.AddComment
Target.Comment.Text Text:=CStr(Now) & Chr(10) &
Environ("username") & Chr(10)
SendKeys "m"
Else
SendKeys "m"
End If
End Sub

JB



Bonjour à tous
Je reviens de excelabo mais je n'ai pas trouver mon bonheur.
Peut-on lorsque l'on insère un commentaire que la date du jour s'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que l'on
a
y mettre.
Merci
Yan


Avatar
yan
Le principe de la supercherie ....


C'est au sujet de ce que j'ai demandé que tu dit cela?
A+
Yan

1 2