Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Bonjour job,
Merci pour ta réponse et ta réactivité
J'ai fait tout comme tu dis (je me suis relu plusieurs fois pour être sûr) mais j'obtiens sur chaque ligne la concaténation de 3 fois la même cellule...
Merci pour votre aide à tous les 2, je vais me contenter de mettre une largeur à 500 via macro puis je réglerai à la main le reste ...
Encore merci,
@+
Je suis entièrement d'accord avec toi PatrickToulon, c'est pour ça que j'ai besoin de largeur fixe et hauteur auto (c'est le meilleur moyen que j'ai trouvé pour gérer cette "base de données")
je sais ce que c'est Wraptext, mais les lignes, c'est moi qui les ai rentré (presque) a main.
Qd je dis "presque" c'est parce que j'ai fait la "mise en forme" sous Word puis j'ai copié/collé
Pour te dire à quel point je suis une bille, je sais pas ce que ÇA signifie :
Dim c As Excel.Comment
For Each ws In Worksheets
For Each c In ws.Comments
J'ai bien vu ton msg où tu me dis qu'il faut mixer un peu toutes ces solutions mais je suis une bille en VBA, j'arrive tout juste à voir à quel endroit rentrer la largeur que je veux et mettre un ' devant la ligne qui règle la couleur
Merci aussi Staple1600 de me fournir toutes ces solutions, mais malheureusement ça marche pas (on y est presque pourtant).
Ta dernière macro me laisse voir que la 1ère ligne de mes commentaires, et celle d'avant me montrait qlq lignes mais tronque le commentaire
Celle-là :
Sub FormaterCommentaires()
Dim c As Excel.Comment
For Each ws In Worksheets
For Each c In ws.Comments
c.Shape.Height = 100
c.Shape.Width = 100
c.Shape.Fill.ForeColor.RGB = RGB(170, 255, 155)
c.Visible = True
'c.Shape.TextFrame.AutoSize = -1
Next c
Next ws
End Sub
est mieux car j'ai...
Alors, j'ai testé celle-là :
Sub Formater_Commentaires_II()
'NB:
'Si incompatible avec Excel 2007
'dans ce cas, mettre un ' devant la ligne de code ne fonctionnant pas
Dim c As Excel.Comment
For Each ws In Worksheets
For Each c In ws.Comments
c.Shape.OLEFormat.Object.AutoSize =...
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.