Créer un macro pour ajouter un commentaire pour chaque cellule

mthuong Messages postés 15 Date d'inscription Statut Membre Dernière intervention -
mthuong Messages postés 15 Date d'inscription Statut Membre Dernière intervention - 3 août 2015 à 13:51

Bonjour,

Je souhaiterais créer un macro pour ajouter un commentaire dans un cellule. Quand j'ai lancé le macro, une boîte de dialogue a indiqué qu'il y a un erreur d'exécution 1004

Et mon code est :

Sub Ajoutcommentaire()
'
' Ajoutcommentaire Macro
'

'
Range("C2").AddComment
Range("C2").Comment.Visible = False
Range("C2").Comment.Text Text:="Location pour etudiants portable1:" & Chr(10) & ""
Range("C2").Select
End Sub

Apparemment, l'erreur se trouve dans " Range("C2").AddComment"

Je suis débutante avec VBA donc je ne sais pas encore corriger le code. Est ce que quelqu'un peut m'aider?
Je vous remercie!

Afficher la suite

1 réponse

Réponse 1 / 1
f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717
Bonjour,

Vous ne pouvez pas ajouter un commentaire s'il existe deja, il faut l'effacer
```
Sub Ajoutcommentaire()
'
' Ajoutcommentaire Macro
'
    Range("C2").ClearComments
    Range("C2").AddComment
    Range("C2").Comment.Visible = False
    Range("C2").Comment.Text Text:="Location pour etudiants portable1:" & Chr(10) & ""
    Range("C2").Select
End Sub
```
0
1. mthuong Messages postés 15 Date d'inscription Statut Membre Dernière intervention
  
  Merci votre réponse. J'ai réussi à ajouter un commentaire en cliquant sur le bouton mais le problème c'est que je peux appliquer le macro seulement sur la cellule C2 (celle avec la quel j'ai sélectionné pour créer le macro) et non pour d'autres cellules.
  Est ce que c'est normal?
  
  0
  1. f894009 Messages postés 17417 Date d'inscription Statut Membre Dernière intervention 1 717 > mthuong Messages postés 15 Date d'inscription Statut Membre Dernière intervention
    
    Re,
    
    Est ce que c'est normal? Boh oui, puisque c'est ecrit C2 dans le code !!!!
    
    Que voulez-vous faire precisement ???
    
    0
2. mthuong Messages postés 15 Date d'inscription Statut Membre Dernière intervention
  
  Je voudrais créer un macro pour ajouter un commentaire quand j'ai 50 cellules à l'appliquer. J'ai revu mes macros et effectivement, je l'ai remarqué aussi. Pour créer le macro, j'ai du enregistrer les étapes d'ajout d'un commentaire appliqué sur la cellule C2. J'ai crée un autre macro sur C2 ( par exemple mettre le texte en rouge); dans le code C2 ne s'affiche pas tant dis que pour le macro "ajoutcommentaire", il y a C2. J'espère que mes explications sont claires pour vous.
  
  0
3. mthuong Messages postés 15 Date d'inscription Statut Membre Dernière intervention
  
  Re bonjour, j'ai réussi à faire. En fait, j'ai changé "Rang C2 " par "ActiveCell" sauf sur la première ligne et ça marche ! Merci votre aide!!!
  
  0

Newsletters