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

Autres Ajouter date dans un commentaire

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

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
 
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
 
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
 
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:
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
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…