Méthode Comment.Previous (Excel)

Article
04/07/2023

Cette méthode renvoie un objet Comment qui représente le commentaire précédent.

Syntaxe

expression. Précédente

Expression Expression qui renvoie un objet Comment .

Valeur renvoyée

Commentaire

Remarques

Cette méthode ne fonctionne que sur une seule feuille. L'utilisation de cette méthode sur le premier commentaire d'une feuille renvoie la valeur Null et pas le dernier commentaire de la feuille précédente.

Exemple

Cet exemple montre comment obtenir chaque deuxième commentaire en utilisant la méthode Suivant method.

Remarque

Testez cet exemple dans un nouveau classeur sans commentaires existants. Pour effacer tous les commentaires d’un classeur, utilisez Selection.SpecialCells(xlCellTypeComments).delete dans le volet Exécution.

'Sets up the comments 
For xNum = 1 To 10 
 Range("A" & xNum).AddComment 
 Range("A" & xNum).Comment.Text Text:="Comment " & xNum 
Next 
 
MsgBox "Comments created... A1:A10" 
 
'Deletes every second comment in the A1:A10 range 
For yNum = 10 To 1 Step -2 
 Range("A" & yNum).Comment.Previous.Shape.Select True 
 Selection.Delete 
Next 
 
MsgBox "Deleted every second comment"

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.

Partager via