VBA – Ajouter ou Supprimer des Commentaires de Cellule
In this Article
Ce tutoriel montre comment utiliser les commentaires de cellule en VBA.
Les extraits de code suivants vous montrent comment ajouter ou supprimer un commentaire dans une cellule
Ajouter un Commentaire de Cellule en Utilisant VBA
1. Placez le code suivant quelque part dans votre macro pour ajouter un commentaire.
Feuil1.Range("A1").AddComment ("Hello World")
Supprimer un Commentaire de Cellule en Utilisant VBA
2. Pour supprimer un commentaire, utilisez le code suivant
Feuil1.Range("A1").Comment.Delete
Modifier un Commentaire de Cellule à l’Aide de VBA
3. Pour modifier un commentaire dans une cellule donnée, vous devez lire le commentaire existant et le modifier. Utilisez le code ci-dessous
Dim AncienComment As Variant
Dim NouveauComment As Variant
AncienComment = Feuil1.Range("A1").Comment.Text
NouveauComment = AncienComment & " Commentaire modifié"
Feuil1.Range("A1").Comment.Delete
Feuil1.Range("A1").AddComment (NouveauComment)
Tout d’abord, vous devez lire le commentaire existant et le placer dans la variable AncienComment.
Ensuite, vous pouvez modifier un commentaire, par exemple en ajoutant le nouveau texte à celui existant dans la variable NouveauComment.
Maintenant, vous devez supprimer l’ancien commentaire et ajouter le nouveau. Afin de supprimer le commentaire, vous devez utiliser la commande .Comment.Delete.
Enfin, vous pouvez ajouter le commentaire de la variable NouveauComment en utilisant la commande .AddComent .
La Programmation VBA Simplifiée
Ne cherchez plus de code VBA en ligne. Découvrez AutoMacro – un générateur de code VBA qui permet aux débutants de créer leurs propres procédures avec des connaissances minimales en programmation et avec de nombreuses fonctionnalités permettant à tous les utilisateurs de gagner du temps!
VBA Coding Made Easy
Stop searching for VBA code online. Learn more about AutoMacro - A VBA Code Builder that allows beginners to code procedures from scratch with minimal coding knowledge and with many time-saving features for all users!Learn More!