Add comment en vba avec variable

Bonjour et merci d'avance

Depuis 1/2 heure et assayé de toute les façons je bug et je réclame votre aide sur:

...
v = Range("A" & s).Value
Sheets(Mois).Range("A" & b).AddComment
Sheets(Mois).Range("A" & b).Comment.Text Text:=v

Le Range("A" & s).Value est bon mais ne colle pas dans le commentaire!

Merci

GRRR posté trop vite Range("A" & s).Text pas Range("A" & s).Value

Ca fonctionne merci

Temjeh