Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Autres Ajouter date dans un commentaire

Christian0258

XLDnaute Accro
Bonjour à tout le forum,
Cette macro, qui fonctionne bien, ajoute en commentaire le contenu de la cellule, puis efface son contenu.
Comment faire pour ajouter, la date du jour, à la suite dans le commentaire ainsi créé.

La macro :

Sub AjouteCommentaire()
Selection.ClearComments
For Each c In Selection
c.AddComment CStr(c.Value)
c.Comment.Shape.TextFrame.AutoSize = True
c.Comment.Shape.OLEFormat.Object.Font.Size = 12
Next c
Selection.ClearContents
End Sub

Merci pour votre aide.
Bien amicalement,
Christian
 

Hasco

XLDnaute Barbatruc
Repose en paix
Bonjour,

VB:
' inscrit en commentaire la valeur de la cellule plus "au 04/04/2020" (pour aujourd'hui)
c.AddComment CStr(c.Value) & Format(Date,"\au dd/mm/yyyy")

Cordialement
 

Christian0258

XLDnaute Accro
Re, le forum,
Je reviens vers vous pour cette petite question ;
si à la fin de la macro je veux mettre un zéro dans toutes les cellules sélectionnées au lieu de Selection.ClearContents ???

Merci pour votre aide.
Bien à vous,
Christian
 

Christian0258

XLDnaute Accro
Re, le forum, Roblochon

Merci, Roblochon, pour ton aide. Dis-moi c'est bizarre chez moi le zéro ne s'inscrit pas...si je pointe sur la/les cellules concernée(s) c'est blanc et non 0
à te lire,
Bien amicalement,
Christian
 
Dernière édition:

Christian0258

XLDnaute Accro
Re, le forum, Roblochon, Thierry

C'est ok, ça fonctionne, sur la base de la macro (post1) et le rajoût
"selection.value =0" du post6 de Roblochon ça fonctionne parfaitement....j'ai du cafouiller à un moment...Lol
Un grand merci à vous.
Bien amicalement,
Christian
 

Discussions similaires

Réponses
0
Affichages
153
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…