Commentaires

C

C@thy

Guest

• 29 Décembre 2003

• #2

Bonsoir Stéphane,

pour ma part j'utilise

Edition ATTEINDRE CELLULES Commentaires,

ensuite rien ne t'empêche de le faire par macro avec l'enregiustreur de macros et de faire :

for each cel in selection toto = toto+1 et tu auras le nombre de cellules.

C@thy

 

Vote positif 0 Vote négatif

@

@+Thierry

Guest

• 29 Décembre 2003

• #3

Re-Salut Stéphane, Coucou à C@thy, hello Forum

Heu oui C@thy, mais un peu expéditif comme reply ! (lol)

Moi j'ai préparé ceci :

Sub CountComment()
Dim C As Comment
Dim i As Byte

For Each C In ActiveSheet.Comments
i = i + 1
Next

MsgBox i

End Sub

Bonne soirée à tous et toutes
@+Thierry

 

Vote positif 0 Vote négatif

@

@+Thierry

Guest

• 29 Décembre 2003

• #4

Re-Salut Stéphane, Coucou à C@thy, hello Forum

Heu oui C@thy, mais un peu expéditif comme reply ! (lol)

Moi j'ai préparé ceci :

Sub CountComment()
Dim C As Comment
Dim i As Byte

For Each C In ActiveSheet.Comments
i = i + 1
Next

MsgBox i

End Sub

Bonne soirée à tous et toutes
@+Thierry

 

Vote positif 0 Vote négatif

C

C@thy

Guest

• 29 Décembre 2003

• #5

SUPER Thierry, c'est vrai, j'avais pas tout dit. Merci à toi pour ce petit cours VBA gratuit.


C@thy

 

Vote positif 0 Vote négatif

C

C@thy

Guest

• 29 Décembre 2003

• #6

Re tout le monde,

ah ben tiens, on peut faire encore plus court :

Sub CountComment()
Dim C As Comment
Dim i As Byte

i = ActiveSheet.Comments.Count

MsgBox i & " commentaires"

End Sub

C@thy

 

Vote positif 0 Vote négatif

S

Stéphane

Guest

• 29 Décembre 2003

• #7

Big bigup à tous...
Ca va bien me servir!
Stéphane de Be

 

Vote positif 0 Vote négatif

@

@+Thierry

Guest

• 29 Décembre 2003

• #8

Bonsoir tout le monde

Perfecto C@thy !!!!!

Bravo

Bonne Soirée

@+Thierry

 

Vote positif 0 Vote négatif