Retour à la ligne dans commentaire

[Ken Hutchinson]

Hello,

J'ai une macro qui créé des commentaires dans des cases. Ces comm viennent de plusieurs cellules dans d'autres feuilles excel.

AQuestion : comment faire un retour à la ligne dans un commentaire entre chaque données pour ne pas qu'elles appareissent en ligne ?

Merci de votre aide.

 

[PascalXLD]

Re : Retour à la ligne dans commentaire

Bonjour

tu as essayé en inserant un Chr(13) dans ta macro

exemple

toto=range("A1") & chr(13) & Range("B1")

 

[Ken Hutchinson]

Re : Retour à la ligne dans commentaire

Oui je viens d'essayer ça fait une barre verticale mais pas de retour à la ligne...

 

[PascalXLD]

Re : Retour à la ligne dans commentaire

Re

tu pourrais mettre ta macro actuelle stp

 

[BOISGONTIER]

Re : Retour à la ligne dans commentaire

Bonjour,


Chr(10)

JB

 

[Ken Hutchinson]

Re : Retour à la ligne dans commentaire

Et zou !!!

Sub AjouterCommentaires()


Sheets("Résultats").Select

' Ajout du COMM Récap vert LUNDI
Range("Am10").AddComment "blabla1 : " & Sheets("RECAP").Range("C27").Value & Chr(13) & "blabla2 : " & Sheets("RECAP").Range("J27")
Range("Am11").AddComment "blabla1 : " & Sheets("RECAP").Range("T39").Value & Chr(13) & "blabla2 : " & Sheets("RECAP").Range("B76")

End Sub

 

[matthieu33]

Re : Retour à la ligne dans commentaire

Bonjour à tous,

Peux-tu essayer ceci ?

Sub AjouterCommentaires()

Sheets("Résultats").Select

' Ajout du COMM Récap vert LUNDI
Range("Am10").AddComment "blabla1 : " & Sheets("RECAP").Range("C27").Value & vbCrLf & "blabla2 : " & Sheets("RECAP").Range("J27")
Range("Am11").AddComment "blabla1 : " & Sheets("RECAP").Range("T39").Value & vbCrLf & "blabla2 : " & Sheets("RECAP").Range("B76")

End Sub

@+

 

[Ken Hutchinson]

Re : Retour à la ligne dans commentaire

CHR10 marche très bien...

Merci