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

10 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
Mario Limoges
Salut Yan,
Une solution possible, j'y suis arrivé en insérant la ligne de code
"Range(nini).Comment.Text infotext" dans l'objet this Workbook de l'éditeur
VBA section SheetChange où infotext est un variable dans laquel j'ai
innitialement passé la date et l'heure.

"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'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que l'on
a y mettre.
Merci
Yan




Avatar
MichDenis
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'essentiel
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'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que l'on a
y mettre.
Merci
Yan
Avatar
yan
Salut et merci
N'étant pas encore un grand spécialiste du VBA peut tu détailler ce que je
doit ecrire comme proc dans Workbook
Pour info mon mode opératoire est le suivant
Je clic droit sur une celulle puis "inserer un commentaire"
Merci
Yan


"Mario Limoges" a écrit dans le message de
news: 2%12h.5678$
Salut Yan,
Une solution possible, j'y suis arrivé en insérant la ligne de code
"Range(nini).Comment.Text infotext" dans l'objet this Workbook de
l'éditeur VBA section SheetChange où infotext est un variable dans laquel
j'ai innitialement passé la date et l'heure.

"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'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que
l'on a y mettre.
Merci
Yan








Avatar
yan
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'essentiel
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'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que l'on
a
y mettre.
Merci
Yan





Avatar
yan
Pour l'instant j'en suis là avec ce bout de code fait avec mes connaissance
actuelle

Sub Worksheet_Change(ByVal choix As Range)
d = Date
ad = choix.Address
c = Mid(ad, 2, 1) (y aura un probleme au dela de la 26eme colonne mais
chaque chose en son temps)
r = Mid(ad, 4, 2)
Cells(r, c).AddComment
Cells(r, c).Comment.Visible = False
Cells(r, c).Comment.Text Text:="Admin:" & Chr(10) & d

ça fontionne mais pour malheureusement pour tout type d'évenement dans une
celulle
il faudrait que ce ne soit que sur un evenement du type "clic droit/inserer
un commentaire
Mais là je sais pas faire c'est trop fort pour moi
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'essentiel
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'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que l'on
a
y mettre.
Merci
Yan





Avatar
MichDenis
Ouvre l'éditeur de code : Raccourci clavier : Alt + F11
Dans le ThisWorkbook , tu copies ce qui suit, tu sauvegardes
ton fichier .... tu fermes et à la réouverture, tu auras la date
directement dans ton commentaire... si tu peux modifier
le format de la date directement dans la procédure "Activate"


'Déclaration de la variable dans le haut du ThisWorkbook
Dim Usager As String
'-------------------------------
Private Sub Workbook_Activate()
With Application
Usager = .UserName
.UserName = Format(Date, "D mmm yyyy")
End With
End Sub
'-------------------------------
Private Sub Workbook_Deactivate()
With Application
.UserName = Usager
End With
End Sub
'-------------------------------



"yan" a écrit dans le message de news: 4548b256$0$25946$
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'essentiel
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'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que l'on
a
y mettre.
Merci
Yan





Avatar
RGI
Bonjour

une solution

mettre ce code dans la feuille

au double click le commentaire sera mis avec la date

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If Target.Comment.Text <> "" Then Exit Sub
Target.AddComment
Target.Comment.Text Text:=""
Target.Comment.Text Text:="[" & Format(Date, "dd mm yy") & "]"
End Sub

salutations

RGI

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
ok je viens de le faire impec c'est ce que je voulais
Pas encore tout compris à la proc mais je vais essayer de comprendre
trop pro le MichDenis!!!
Encore merci
A+
Yann
"MichDenis" a écrit dans le message de news:
O%233a1Yc$
Ouvre l'éditeur de code : Raccourci clavier : Alt + F11
Dans le ThisWorkbook , tu copies ce qui suit, tu sauvegardes
ton fichier .... tu fermes et à la réouverture, tu auras la date
directement dans ton commentaire... si tu peux modifier
le format de la date directement dans la procédure "Activate"


'Déclaration de la variable dans le haut du ThisWorkbook
Dim Usager As String
'-------------------------------
Private Sub Workbook_Activate()
With Application
Usager = .UserName
.UserName = Format(Date, "D mmm yyyy")
End With
End Sub
'-------------------------------
Private Sub Workbook_Deactivate()
With Application
.UserName = Usager
End With
End Sub
'-------------------------------



"yan" a écrit dans le message de news:
4548b256$0$25946$
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'essentiel
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'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que
l'on
a
y mettre.
Merci
Yan










Avatar
yan
Pourquoi au redemarrage d'excel maintenant j'ai une fenetre "nom
d'utilisateur"
avec deux renseignement à donner
nom et initial

"MichDenis" a écrit dans le message de news:
O%233a1Yc$
Ouvre l'éditeur de code : Raccourci clavier : Alt + F11
Dans le ThisWorkbook , tu copies ce qui suit, tu sauvegardes
ton fichier .... tu fermes et à la réouverture, tu auras la date
directement dans ton commentaire... si tu peux modifier
le format de la date directement dans la procédure "Activate"


'Déclaration de la variable dans le haut du ThisWorkbook
Dim Usager As String
'-------------------------------
Private Sub Workbook_Activate()
With Application
Usager = .UserName
.UserName = Format(Date, "D mmm yyyy")
End With
End Sub
'-------------------------------
Private Sub Workbook_Deactivate()
With Application
.UserName = Usager
End With
End Sub
'-------------------------------



"yan" a écrit dans le message de news:
4548b256$0$25946$
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'essentiel
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'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que
l'on
a
y mettre.
Merci
Yan










Avatar
MichDenis
Le principe de la supercherie ....

Lorsque tu désires insérer un commentaire par les commandes
de la feuille de calcul, Excel ajoute automatiquement ce qui
est écris dans :
barre des menus / outils / options / onglet général / Item:=Nom de l'usager

Les petites procédures que je t'ai soumises substituaient le nom de l'usager
pour la date...au lieu de la date, tu peux inscrire n'importe quoi ...mais ce que
je t'ai proposé à des limites... tu ne peux pas modifier le contenu de cet item
au gré du vent ... !



"yan" a écrit dans le message de news: 4548b950$0$25953$
Pourquoi au redemarrage d'excel maintenant j'ai une fenetre "nom
d'utilisateur"
avec deux renseignement à donner
nom et initial

"MichDenis" a écrit dans le message de news:
O%233a1Yc$
Ouvre l'éditeur de code : Raccourci clavier : Alt + F11
Dans le ThisWorkbook , tu copies ce qui suit, tu sauvegardes
ton fichier .... tu fermes et à la réouverture, tu auras la date
directement dans ton commentaire... si tu peux modifier
le format de la date directement dans la procédure "Activate"


'Déclaration de la variable dans le haut du ThisWorkbook
Dim Usager As String
'-------------------------------
Private Sub Workbook_Activate()
With Application
Usager = .UserName
.UserName = Format(Date, "D mmm yyyy")
End With
End Sub
'-------------------------------
Private Sub Workbook_Deactivate()
With Application
.UserName = Usager
End With
End Sub
'-------------------------------



"yan" a écrit dans le message de news:
4548b256$0$25946$
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'essentiel
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'inscrive
immédiatement dans le commentaires,puis qu'ensuite on inscrive ce que
l'on
a
y mettre.
Merci
Yan










1 2